<span style="color: #000000;"> SynchronousSocketClient.Main()
<span style="color: #008000;">'<span style="color: #008000;">AsynchronousClient.Main() ' 异步功能并未实现呢
<span style="color: #0000ff;">End Sub
<span style="color: #0000ff;">Private</span> <span style="color: #0000ff;">Sub</span> Form1_Load(<span style="color: #0000ff;">ByVal</span> sender <span style="color: #0000ff;">As</span> System.Object,<span style="color: #0000ff;">ByVal</span> e <span style="color: #0000ff;">As</span> System.EventArgs) <span style="color: #0000ff;">Handles</span> <span style="color: #0000ff;">MyBase</span><span style="color: #000000;">.Load
</span><span style="color: #0000ff;">End Sub</span>
<span style="color: #0000ff;">Private</span> <span style="color: #0000ff;">Sub</span> Button2_Click(<span style="color: #0000ff;">ByVal</span> sender <span style="color: #0000ff;">As</span> System.Object,<span style="color: #0000ff;">ByVal</span> e <span style="color: #0000ff;">As</span> System.EventArgs) <span style="color: #0000ff;">Handles</span><span style="color: #000000;"> Button2.Click
infoText.Text </span>= <span style="color: #800000;">""</span>
<span style="color: #0000ff;">End Sub</span>
<span style="color: #0000ff;">Private</span> <span style="color: #0000ff;">Sub</span> Button3_Click(<span style="color: #0000ff;">ByVal</span> sender <span style="color: #0000ff;">As</span> System.Object,<span style="color: #0000ff;">ByVal</span> e <span style="color: #0000ff;">As</span> System.EventArgs) <span style="color: #0000ff;">Handles</span><span style="color: #000000;"> Button3.Click
SynchronousSocketClient.send()
</span><span style="color: #0000ff;">End Sub</span>
<span style="color: #0000ff;">Private</span> <span style="color: #0000ff;">Sub</span> Button4_Click(<span style="color: #0000ff;">ByVal</span> sender <span style="color: #0000ff;">As</span> System.Object,<span style="color: #0000ff;">ByVal</span> e <span style="color: #0000ff;">As</span> System.EventArgs) <span style="color: #0000ff;">Handles</span><span style="color: #000000;"> Button4.Click
SynchronousSocketClient.closeSocket()
</span><span style="color: #0000ff;">End Sub</span>
<span style="color: #0000ff;">End Class
到此,打完,收工。由于异步的调试没有成功,就此打住吧,以后有兴趣再去搞了! (编辑:晋中站长网)
【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!
|