-1

配列を使用せずに 1 行の入力を 3 つの異なる変数に分割するにはどうすればよいですか? (x,y,z) 各セクションはスペースで区切られています

元。184 41890 42891

これまでのコードは、ループで一度に 1 文字ずつ行を読み取るだけです。

    c = Chr(reader.Read)
    s = ""
    Do While (ch <> vbCr) And (ch <> Chr(32)) And (reader.Peek <> -1)
        Select Case c
            Case "0" To "9"
                s = s & c
            Case Else
                MsgBox("Error")
        End Select
        c = Chr(reader.Read)
    Loop
4

1 に答える 1