[VB6 ] 救命阿
Private Sub Form_Load()
MSComm1.PortOpen = True
End Sub
Private Sub Command1_Click()
buf = Trim(Text1.Text)
MSComm1.Output = Chr(buf)
End Sub
Private Sub Command2_Click()
MSComm1.Output = Chr(1)
End Sub
Private Sub Command3_Click()
MSComm1.Output = Chr(2)
End Sub
Private Sub Command4_Click()
MSComm1.Output = Chr(3)
End Sub
Private Sub Command5_Click()
MSComm1.PortOpen = False
End
End Sub
在第二行的地方他一直出現執行階段13
我不太懂這是什麼意思，想請教會vb6的人
感恩
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.70.157.194
推
08/29 23:14, , 1F
08/29 23:14, 1F
→
08/29 23:15, , 2F
08/29 23:15, 2F
→
08/29 23:48, , 3F
08/29 23:48, 3F