VB Split怎样多个字符分割?
3个回答
展开全部
分别分解。如有:
DIM x() AS STRING,y() as string,s as string
DIM i as integer,j as integer
s="a1,a2,a3;b1,b2,b3,b4"
x=split(s,";") ' 结果x有两个元素:"a1,a2,a3"和"b1,b2,b3,b4"
for i=LBOUND(X) TO UBOUND(X)
y=split(x(i),",")
for j=LBOUND(y) to UBOUND(y)
print y(j),
next j
print
next i
DIM x() AS STRING,y() as string,s as string
DIM i as integer,j as integer
s="a1,a2,a3;b1,b2,b3,b4"
x=split(s,";") ' 结果x有两个元素:"a1,a2,a3"和"b1,b2,b3,b4"
for i=LBOUND(X) TO UBOUND(X)
y=split(x(i),",")
for j=LBOUND(y) to UBOUND(y)
print y(j),
next j
next i
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Split函数:
返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法:
Split(expression[, delimiter[, count[, compare]]])
Split函数语法有如下几部分:
1、expression,必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。
2、delimiter,可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
3、count,可选的。要返回的子字符串数,–1表示返回所有的子字符串。
4、compare,可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。
compare参数的设置值如下:
vbUseCompareOption,–1,用Option Compare语句中的设置值执行比较。
vbBinaryCompare,0,执行二进制比较。
vbTextCompare,1,执行文字比较。
vbDatabaseCompare,2,仅用于Microsoft Access。基于您的数据库的信息执行比较。
返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法:
Split(expression[, delimiter[, count[, compare]]])
Split函数语法有如下几部分:
1、expression,必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。
2、delimiter,可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
3、count,可选的。要返回的子字符串数,–1表示返回所有的子字符串。
4、compare,可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。
compare参数的设置值如下:
vbUseCompareOption,–1,用Option Compare语句中的设置值执行比较。
vbBinaryCompare,0,执行二进制比较。
vbTextCompare,1,执行文字比较。
vbDatabaseCompare,2,仅用于Microsoft Access。基于您的数据库的信息执行比较。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询