会VB .Net 都请来帮帮忙！！

raymand02

我最近遇到这个问题，

我这个是network send/receive data 的

当我收到data时,

Private Sub OnLineReceived(ByVal sender As UserConnection, ByVal data As String)
        Dim dataArray() As String
        ' Message parts are divided by "|"  Break the string into an array accordingly.
        dataArray = data.Split(Chr(124))
        Select Case dataArray(0)
            Case "Command"
                ProcessCommand(dataArray(1) & Chr(13) & Chr(10))
            Case "CONNECT"
                ConnectUser(dataArray(1), sender)
            Case "DISCONNECT"
                DisconnectUser(sender)
            Case Else
                MsgBox("Unknown message:" & data)

        End Select

    End Sub

Private Sub ProcessCommand(ByVal s As String)

        Try

            textbox1.appendtext(s.tostring())
        Catch ex As Exception
            MsgBox("No data receive")
        End Try



    End Sub

在那个textbox 没有东西出现，但当我用 MsgBox(s.tostring())时， 他就会出现我的data received.

急救！！！ 请帮帮忙，谢谢