none
关于在一个字符串中取数字的问题!未解!帮忙 RRS feed

  • 问题

  •  

    数组dim a(100) as long  字符串dim line as string

    在line 中用空格隔开各个数字,把这些数字放入数组a

    例: line = "1 2 3 4 5 6"

    a(1)=1   a(2)=2   a(3)=3   a(4)=4....

    我的思路

      找空格,把空格跟前一个空格之间的字符一起集合在一个字符串,在Clng转为long

    但程序不成功,写到一半就有错误,不知到是什么原因:Chars 为 ReadOnly 

     

    2008年11月26日 14:02

答案

  • vb6写法,vb.net思路相同

     

    line = "1 2 3 4 5 6"

    arr = Split(line," ")

    for i = 0 to UBound(arr)

    a(i+1) = CLng(arr(i))

    Next

    2008年11月26日 14:53
    版主

全部回复