Question

vb中数组元素的提取问题

text1中接收到三个数据中间以空格间隔开，如何将这三个数分别显示到text2，text3，text4中
从串口接收来的三个数据在text1中显示出来了，如何让这三个数据分别显示在text2，text3
text4中

Answer 1

Dim s() As String
s = Split(Text1.Text, " ")
Text2.Text = s(0)
Text3.Text = s(1)
Text4.Text = s(2)

Answer 2

dim a(3) as string
a=split(text1.text," ")
text2.text=a(1)
text3.text=a(2)
text4.text=a(3)

追问

Private Sub TxtReceive_Change()
Dim a() As String
a = Split(TxtReceive.Text, " ")
TxtDisplay1.Text = a(0)
TxtDisplay2.Text = a(1)
TxtDisplay3.Text = a(2)
End Sub
但是有个新问题TxtDisplay1.Text = a(0)这句下标越界怎么解决