求组 Client 报错

苹果

If Client.Client.Connected = True Then
            Else
                'TextBox9.Text = " 网络断开"
                ' Timer2.Enabled = False
                'Exit Try
                'Exit Sub
            End If
            Dim OutBuffer() As Byte
            'OutBuffer = System.Text.Encoding.Default.GetBytes("#020" & vbCr)
            '  OutBuffer = System.Text.Encoding.Default.GetBytes("#022" & vbCr) '集中模块
            OutBuffer = System.Text.Encoding.Default.GetBytes("#022" & M_ab & vbCr) '集中模块
            Client.GetStream.Write(OutBuffer, 0, OutBuffer.Length)
准备把以前的WCE版转到安卓机上

this.Form.Client 没有GetStream
https://www.smobiler.com/Help/ht ... ClientVariables.htm