文件名称:VB串口常用代码
文件大小:4KB
文件格式:TXT
更新时间:2015-12-17 16:42:57
VB 串口
Private Sub Form_Load() MSComm1.RThreshold = 1 '自动接收数据 MSComm1.CommPort = 1 '使用串行口1 MSComm1.Settings = "4800,N,8,1" '波特率4800,无校验,8个数据位,1个停止位。 MSComm1.InputLen = 1 '当使用MSComm1.Input时,每次从接收缓冲区取一个字节。 TestTimer.Interval = 20 '定时器的中断间隔为20ms,用于更新显示时间。 End Sub