[.NET] textbox 內容未更新?
大家好!
我開了一個 thread-S 監聽有無 client連入，
當有 client連入時， textbox印出 "client no.? 連入"，
並開一個 thread-C 處理資料的傳送接收。
code片段如下：
Private Sub btOpenServer_Click()
Dim ListenThread As New Thread(AddressOf StartListen)
ListenThread.IsBackground = True
ListenThread.Start()
End Sub
Private Sub StartListen()
UpdateText("Server started at: " + serverIP.ToString() + ":" +
Port + ".", "on")
While True
linkCount += 1
ClientSocket = serverSocket.Accept()
UpdateText("Client No:" + Convert.ToString(linkCount) + "
started!", "on")
>>>此時 textbox顯示 Client No:1 started!<<<
Dim client As New handleClinet
client.startClient(ClientSocket, Convert.ToString(linkCount))
End While
End Sub
>>> 以下是另一個 .vb檔 <<<
Module HandleClient
Public Class handleClinet
Public Sub startClient(ByVal inClientSocket As Socket, ByVal clineNo As
String)
Dim ctThread As Threading.Thread = New Threading.Thread(AddressOf
doChat)
ctThread.Start()
End Sub
Private Sub doChat()
Dim networkStream As New NetworkStream(clientSocket)
networkStream.Read(bytesFrom, 0,
CInt(clientSocket.ReceiveBufferSize))
dataFromClient = System.Text.Encoding.ASCII.
GetString(bytesFrom)
************** Form1.UpdateText("From client-" + dataFromClient)
>>>此時 textbox依然只有顯示 Client No:1 started!<<<
>>>並未顯示 From client-?????????? <<<
End Sub
End Class
End Module
請問，為什麼 ***那行把資料傳回去時，textbox並未更新
"From client-" + dataFromClient 該行資料呢?
我下中斷去看，textbox的資料是有改變的，
但是實際上看到的卻是沒變的。
感謝賜教!
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.221.47.106
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1464148315.A.651.html
※ 編輯: Xavier (61.221.47.106), 05/25/2016 11:53:59
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
