散分``````````````

Question

问个问题额。。 如果  一文件内都是
aaaaa    bbbbb
ccccc    ddddd
...
这样的
怎么取每行的aaaaa 和bbbb啊

Answer 1

Private Sub Command1_Click()
    Dim strLine As String
    Dim strObject() As String
    
    Open 文件名 For Input As #1
    While Not EOF(1)
        Line Input #1, strLine
        strObject = Split(strLine, " ")
        ' strobject(0)和strobject(1)中就是你想要的结果
        ' 加上处理你要的结果的代码
    Wend
    Close #1
End Sub

Answer 2

要进一步说明Split(strLine, " ")的是，有些" "可能不是真的" "，而是其他东东，例如VbTab