十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
假设你要分割的字符串是string1的话
十多年的雨城网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。成都全网营销的优势是能够根据用户设备显示端的尺寸不同,自动调整雨城建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联从事“雨城网站设计”,“雨城网站推广”以来,每个客户项目都认真落实执行。
分割代码就是:
dim s as string=strings.split(string1,vbcrlf)
这样s就是一个阵列了。s(0)是第一段内容,s(1)是第二段内容,以此类推。~~
googles8 的写法也对的。不过我的代码省去了声明的一行。只用一行就好了。
用split函数
dim a()
a = split("-48.437500 0.000000 -0.000011 0.000011"," ")’按空格将文本拆分成数组赋值给a
得到的是文本,如果想得到数字就a(1) = val(a(1))‘把a(1)的值强制转化成数字赋值给a(1),全部转换自己弄个循环搞定
大概就这样,你自己试试吧
VB中的split函数,可以按指定的符号将字符串分解为字符串数组,返回分割后的数组。
用法: split( 字符串,分割符 )
例子:
dim a() as String
dim s as String
s = "曲折的荷塘上面,弥望的是叶子,叶子出水"
a = split( s, "," )
msgbox( a(0) )
msgbox( a(1) )
至于逗号和句号混杂的问题,可以用replace函数先进行一遍替换,也可以多次使用split