| t.Enabled = True
''''接收的字节数组 Dim BR As Byte() = m_Client.Receive(host) Dim A As System.Text.Encoding = System.Text.Encoding.Default
''''用来存储当前字符串 Dim S As String = ""
''''从第4个数字开始,前三个字符为非打印字符 S = A.GetString(BR, 3, BR.Length - 3) Console.WriteLine(S)
''''这里解析获取的文本 atemp.Add(New SqlServer(S))
''''关闭 t.Enabled = False End While Catch ex As Exception Console.WriteLine(ex.Message) 上一页 [1] [2] [3] [4] [5] [6] 下一页 |