如何在不使用数组的情况下将单行输入分成 3 个不同的变量?(x,y,z) 每个部分用空格隔开
前任。184 41890 42891
到目前为止,我的代码只是在循环中一次读取一个字符。
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