簡單實現如何透過RS-232 Com port 收送資料 Private Sub btnOpenCOM_Click() //設定Com Port 號碼 MSComm1.CommPort = CInt(txtCOM.Text) //設定鮑率,Dataformat MSComm1.Settings = "9600,n,8,1" //開啟Com Port MSComm1.PortOpen = True End Sub