您现在所在的是:

电脑编程

回帖:11个,阅读:3275 [上一页] [1] [2] [下一页]
1674
qinghuhong
文章数:226
年度积分:56
历史总积分:1674
注册时间:2006/5/2
发站内信
发表于:2006/10/29 22:57:00
#0楼
我要把16进制02用VB写出到串口设备,咋办.那位高手给个提示,先谢谢了!表情表情
匿名用户
文章数:N/A
年度积分:0
历史总积分:0
注册时间:2002/9/12
发站内信
发表于:2006/10/30 0:08:00
#1楼
该用户被锁定,回复内容不予显示!
9012
吴辉
文章数:2351
年度积分:50
历史总积分:9012
注册时间:2002/1/15
发站内信
发表于:2006/10/30 8:28:00
#2楼
dim Byt as byt
byt=2
.output=byt
9012
吴辉
文章数:2351
年度积分:50
历史总积分:9012
注册时间:2002/1/15
发站内信
发表于:2006/10/30 8:29:00
#3楼
dim Byt as byte
1674
qinghuhong
文章数:226
年度积分:56
历史总积分:1674
注册时间:2006/5/2
发站内信
发表于:2006/10/30 21:05:00
#4楼
朋友,能不能给个完整点的?
9012
吴辉
文章数:2351
年度积分:50
历史总积分:9012
注册时间:2002/1/15
发站内信
发表于:2006/11/3 8:47:00
#5楼
找找以前的文章吧
9012
吴辉
文章数:2351
年度积分:50
历史总积分:9012
注册时间:2002/1/15
发站内信
发表于:2006/11/7 10:45:00
#6楼
不好意思,上面的有问题!

Private Sub Command1_Click()
Dim Byt(0) As Byte
MSComm1.Settings = "9600,n,8,1"
If MSComm1.PortOpen = False Then
  MSComm1.PortOpen = True
End If
Byt(0) = 2
MSComm1.Output = Byt

End Sub
1674
qinghuhong
文章数:226
年度积分:56
历史总积分:1674
注册时间:2006/5/2
发站内信
发表于:2006/11/14 20:34:00
#7楼
谢了!
1674
qinghuhong
文章数:226
年度积分:56
历史总积分:1674
注册时间:2006/5/2
发站内信
发表于:2006/11/20 23:18:00
#8楼
辉哥,不错!本人佩服,佩服.
运行了一下很好,只是想再请教下+十六进制字咋办?

表情
[此贴子已经被作者于2006-11-20 23:20:02编辑过]
9012
吴辉
文章数:2351
年度积分:50
历史总积分:9012
注册时间:2002/1/15
发站内信
发表于:2006/11/21 8:17:00
#9楼
发送确定的数组
Dim OutByte(5) As Byte
 OutByte(0) = 0
 OutByte(1) = 1
 OutByte(2) = 2
 OutByte(3) = 65 'A
 OutByte(4) = 66 'B
 OutByte(5) = 67 'C
 MSComm1.Output = OutByte

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 工控网 Copyright©2024 Gkong.com, All Rights Reserved

46.8003