VB中的split 函数,分割后有多少个字符
比如a="abcdefghi"b=split(a,"")那我怎么知道a分割后,b数组有9个值?...
比如
a="a b c d e f g h i "
b=split(a," ")
那我怎么知道a分割后,b数组有9个值? 展开
a="a b c d e f g h i "
b=split(a," ")
那我怎么知道a分割后,b数组有9个值? 展开
展开全部
Function testSplit()
Dim a As String
a = "1,2,3,4,dsd-ad5,6,45,656465,564,45"
Dim b() As String
b() = Split(a, ",")
Debug.Print b(4)
End Function
解释如下:
Split函数
返回一个从零开始的一维数组,其中包含指定数量的子字符串。
FunctionSplit(
ByVal Expression As String,
Optional ByVal Delimiter As String = " ",
Optional ByVal Limit As Integer = -1,
Optional ByVal Compare As CompareMethod = CompareMethod.Binary
) As String()
参数
Expression
必选项。字符串表达式,包含子字符串和分隔符。如果 Expression 是零长度的字符串 (""),Split 函数将返回长度为一的数组,其中包含一个空字符串。
Delimiter
可选项。单个字符,用于标识子字符串的界限。如果省略了 Delimiter,则假定空白字符 ("") 为分隔符。如果 Delimiter 为零长度字符串,则返回包含整个 Expression 字符串的单元素数组。
Limit
可选项。要返回的子字符串数;默认值为 -1,表示返回所有子字符串。
Compare
可选项。数值,指示计算子字符串时使用的比较模式。具体的值请参见“设置”。
Dim a As String
a = "1,2,3,4,dsd-ad5,6,45,656465,564,45"
Dim b() As String
b() = Split(a, ",")
Debug.Print b(4)
End Function
解释如下:
Split函数
返回一个从零开始的一维数组,其中包含指定数量的子字符串。
FunctionSplit(
ByVal Expression As String,
Optional ByVal Delimiter As String = " ",
Optional ByVal Limit As Integer = -1,
Optional ByVal Compare As CompareMethod = CompareMethod.Binary
) As String()
参数
Expression
必选项。字符串表达式,包含子字符串和分隔符。如果 Expression 是零长度的字符串 (""),Split 函数将返回长度为一的数组,其中包含一个空字符串。
Delimiter
可选项。单个字符,用于标识子字符串的界限。如果省略了 Delimiter,则假定空白字符 ("") 为分隔符。如果 Delimiter 为零长度字符串,则返回包含整个 Expression 字符串的单元素数组。
Limit
可选项。要返回的子字符串数;默认值为 -1,表示返回所有子字符串。
Compare
可选项。数值,指示计算子字符串时使用的比较模式。具体的值请参见“设置”。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
计算 UBound(b) - LBound(b) + 1 就知道b数组有几个值了。
注意,实际计算结果为10,因为a字符串最后有一个空格,所以分割后最后会多一个空值。
注意,实际计算结果为10,因为a字符串最后有一个空格,所以分割后最后会多一个空值。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
ubound(b)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以输出一下b数组的大小就行了,b.length或者b.count吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询