关于写tcp通信程序的问题

Question

理论上是可以
不过,最好不要写在change事件中

Answer 1

楼上说得对！最好写在keypress事件中，再判断回车键进行发送

Answer 2

Private Sub Text_Change(Index As Integer)
Dim i As Integer
    For i = 0 To Text.Count - 1
        tcpServer.SendData Text(i).Text
    Next
End Sub
'或
'Private Sub Text_Change(Index As Integer)
'    tcpServer.SendData Text(Index).Text
'End Sub

Answer 3

Private Sub Text_Change(Index As Integer)
Dim i As Integer
    For i = 0 To Text.Count - 1
        tcpServer.SendData Text(i).Text
    Next
End Sub
'或
'Private Sub Text_Change(Index As Integer)
'    tcpServer.SendData Text(Index).Text
'End Sub