split(字符串, 分隔符, 拆分次数, 比较)一般split(字符串, 字符, -1, 1)就好了

解决方案 »

  1.   

    dim arsingle() as string
    arsingle=split("A,B,C,D,E,F,G,H", ",")
      

  2.   


    不对啊。那哪能好用呢。 to:zy1910(910:分儿,我来了!)
      

  3.   


    不对啊。那哪能好用呢。 to:zy1910(910:分儿,我来了!)
      

  4.   

    Visual Basic 语言参考   Split 函数请参见
    Join 函数
    返回一个从零开始的一维数组,其中包含指定数量的子字符串。Function Split(
       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 
    可选。数值,指示计算子字符串时使用的比较模式。具体的值请参阅“设置”。 
    设置
    Compare 参数可以具有下列值:常数 说明 
    Binary 执行二进制比较 
    Text 执行文本比较 示例
    下面的示例说明 Split 函数:Dim myString As String = "Look at these!"
    ' Returns ["Look", "at", "these!"]
    Dim myArray() As String = Split(myString)