如果在文件里保存了一个3行3列的数组,现在要读取这个文件里的数据,如何知道它的行数和列数,该怎么读取这么数组?

解决方案 »

  1.   

    這要看你是怎樣保存的了
    如果是類似:A,B,C;1,2,3;a,b,c
    就可以用雙重split的方法求得
    如果是類似:
    A,B,C
    1,2,3
    a,b,c
    則用split可以求出列數
    文件的行數就是數組的行數
      

  2.   

    Dim strf As String, strLine As String, arrF As Variant, colf As Long, rowf As Long
    Open "c:\1.txt" For Input As #1
    Do While Not EOF(1)
        Line Input #1, strLine
        strf = strf & strLine & vbCrLf
    Loop
    Close #1
    arrF = Split(strf, vbCrLf)
    colf = UBound(arrF)
    'rowf = UBound(Split(arrF(0), " ")) + 1
    rowf = UBound(Split(arrF(0), ",")) + 1
    Debug.Print strf & " " & colf & " " & rowf