1、必须要有仪器(台式光功率计)的通信协议,没有到网上下或者找生产厂商要,一般都会给的。
2、熟悉VB串口编程,像这种情况,首先得把的USB-RS232线安装(装驱动)。可以在网上下个串口调试助手(很多的),直接在串口调试助手上按照通信协议发命令,仪器就会有反应。
有串口控件MSComm控件MSComm 控件示例
下面这个简单的例子演示了用调制解调器进行基本的串行通讯:
Private Sub Form_Load ()
' 保存输入子串的缓冲区
Dim Instring As String
' 使用 COM1。
MSComm1.CommPort = 1
' 9600 波特,无奇偶校验,8 位数据,一个停止位。
MSComm1.Settings = "9600,N,8,1"
' 当输入占用时,
' 告诉控件读入整个缓冲区。
MSComm1.InputLen = 0
' 打开端口。
MSComm1.PortOpen = True
' 将 attention 命令送到调制解调器。
' Chr$函数:返回 String,其中包含有与指定的字符代码相关的字符 。
MSComm1.Output = "ATV1Q0" &Chr$(13) ' 确保
' 调制解调器以"OK"响应。
' 等待数据返回到串行端口。
Do
DoEvents
Buffer$ = Buffer$ &MSComm1.Input
Loop Until InStr(Buffer$, "OK" &vbCRLF)
' 从串行端口读 "OK" 响应。
' 关闭串行端口。
MSComm1.PortOpen = False
End Sub
串口接收
可以放在MScomm控件的
OnComm
事件里
推荐看书
Visual_Basic与_RS-232_串行通信控制
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)