No.92201 作者:erhong2003 邮件:erhong2003@eyou.com ID:51845 登陆:9次 文章数:3篇 最后登陆IP:222.24.20.205 最后登陆:2006/5/18 8:59:53 注册:2006/4/24 11:45:14 财富:122 发帖时间:2006/4/26 17:28:22 发贴者IP:222.24.20.209 标题:erhong2003:帮帮忙了 摘要:No.92201帮帮忙了 大家好啊,谁能帮帮我,为什么单片机往PC机发送的数据,PC机接受不到呢,程序如下: Private Sub Form_Load() MSComm1.CommPort = 1 MSComm1.Settings = "2400,n,8,1" MSComm1.PortOpen = True Command1.Visible = True Command2.Visible = True MSComml.RThreshold = 1 MSComml.InputLen = 1 Dim inte as integer MSComm1.InBufferCount = 0 End Sub Select Case MSComm1.CommEvent Case comEvReceive Receive(comm_time) = Asc(Comml.Input) Print "inte" Print int ......
>>返回讨论的主题
|
老古网执行:11毫秒 最大:7276毫秒 查询6次
|
|