split求助
大家好 我想用vb6.0 编一个小软件 功能是把逗号前面的内容输出来 比如14H,18H,54H,06H,50H,13H想要的功能是输出:1、当要一个一个输出时
14H
18H
54H
……
2、当要每两个输出时 14H,18H
54H,06H
50H,13H
…………
是不是要用到split?怎么写啊??? --------------------编程问答-------------------- 用SPLIT就可以将逗号隔开的每一段内容放到一个数组里了.
既然能够得到每一部分的内容了,一个一个输出还是两个两个输出有什么问题么? --------------------编程问答--------------------
+1 --------------------编程问答-------------------- --------------------编程问答--------------------
Dim strA() As String--------------------编程问答-------------------- 4楼 下标越界哦 --------------------编程问答-------------------- 靠,真楼猪啊。。。 --------------------编程问答-------------------- Split函数
Dim outputStr As String
Dim prLen As Long
Dim i, j As Long
Const str = "14H,18H,54H,06H,50H,13H"
prLen = 4 '几位输出
strA = Split(str, ",")
For i = 0 To UBound(strA) Step prLen
outputStr = ""
For j = 1 To prLen
If prLen > 1 Then outputStr = IIf(outputStr = "", strA(i + j - 1), outputStr & "," & strA(i + j - 1)) Else outputStr = strA(i + j - 1)
Next
Debug.Print outputStr
Next
描述
返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法
Split(expression[, delimiter[, count[, compare]]])
Split函数语法有如下几部分:
部分 描述
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。
delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
count 可选的。要返回的子字符串数,–1表示返回所有的子字符串。
compare 可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。
设置值
compare参数的设置值如下:
常数 值 描述
vbUseCompareOption –1 用Option Compare语句中的设置值执行比较。
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文字比较。
vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。
--------------------编程问答-------------------- 贴名: split求助
此句颇为不通, 除非楼主的名字就叫split ,否则就变成split发帖求助了.
正确的说法应该是: 求助关于split的问题 , 或者:求助关于split的用法等等 (皆省略主语"我")
提请楼主下次发帖也要注意中文语法了. --------------------编程问答--------------------
补充:VB , 基础类