用VB发送数据问题

来源：百度知道 编辑：UC知道 时间：2024/05/31 09:13:50
比如我得到一个数为123,但是我想通过VB程序把这个三位数据拆开成一位一位的发送到单片机上,就是1 , 2 , 3分开成3个字节发给单片机,请问如何拆分这个数并发送啊,我初学者不太会谢谢拉
那如果要把123作为一个整体用一个字节发送又怎么做呢

aaa=123
第一位
b=mid(str(aaa),1,1)
发送b'字符型,如要数值型,可加val(b)进行转换
第二位
b=mid(str(aaa),2,1)
第三位
b=mid(str(aaa),3,1)

你问题中仅涉及拆分,我也仅能就此做一回答,发送部份要根据你的代码看了

1、
Dim xx(0) As Byte
data_str="12345"
for i=1 to len(data_str)
xx(0) = CByte(mid(data_str,i,1))
MSCOMM1.Output = xx
next

2、
Dim xx(4) As Byte
data_str="12345"
for i=0 to len(data_str)-1
xx(i) = CByte(mid(data_str,i+1,1))
next
MSCOMM1.Output = xx

-----如果小于一个字节的数（num<256）则直接x(0)=num就可以了。

使用数组发送就OK
接触不是很深, 可以一同探讨下！

我可以地分肯定的告诉你，VB程序可以一下子发给单片机的，为什么要分一个字节一个字节发呢？为什么多此一举呢，MSCOMM1.Output="123"，这样一样不是挺好吗？为什么要分开呢？MSCOMM1控件在发的时候，会帮你一个一个发下去的，你去操这个心干嘛？？？