以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数组写入串口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85131)

--  作者:ljh29206
--  发布时间:2016/5/18 15:38:00
--  数组写入串口
Dim COM As String =  "com5" 
Dim strmm As String = "01 05 00 00 FF 00 8C 3A"  \'输入的字符串命令
    Dim Val() As String = strmm.Split(" ")
    Dim Valb(7) As Byte
    For vb As Integer = 0 To Val.Length - 1
        valb(vb) = HexToDec(Val(vb))
        \'MessageBox.Show(VALB(VB))
    Next    \'在把 这段字符串转为10进制 然后 写入机械
    
    Ports(COM).Write(Valb, 0, Valb.Length)

以上代码有错吗?求指点,

好像写入的数据不对!


------------------------------------

没错!  原来波特率设置错了 打扰了
[此贴子已经被作者于2016/5/18 15:42:42编辑过]