任何利用串口进行收发的程序,都可以利用将单个RS232口自身2与3脚短接,实现自发自收进行代码调试。 新建VB工程,由工程菜单选部件项,在Microsoft Comm Control 6.0部件前打钩确定,VB的工具箱中就有MSCOMM控件,添加到窗体. Private Sub cmdSend_Click() Dim strSend As String strSend = Text2 MSComm1.Output = strSend End Sub Private Sub Form_Load() MSComm1.Settings = "9600,n,8,1" MSComm1.InputMode = comInpu...
|