Foxtable(狐表)用户栏目专家坐堂 → 已知串口指令为a01d102 要怎么发送a01d102这个内容给串口呢?


  共有6035人关注过本帖树形打印复制链接

主题:已知串口指令为a01d102 要怎么发送a01d102这个内容给串口呢?

帅哥哟,离线,有人找我吗?
cnsjroom
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
已知串口指令为a01d102 要怎么发送a01d102这个内容给串口呢?  发帖心情 Post By:2022/6/29 16:42:00 [显示全部帖子]

已知串口指令为a01d102 要怎么发送a01d102这个内容给串口呢?

 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)http://www.foxtable.com/webhelp/to...  发帖心情 Post By:2022/6/29 17:05:00 [显示全部帖子]

怎么获取当前所有的端口  然后赋值给选择框呢?

Dim c1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim s As String
For Each sp As String In Ports.PortNames
    s = sp
    s = s & "|"
    Output.Show(s)
Next
c1.ComboList = s

当前代码得到的数据输出为空?


 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)For Each sp As String In Ports.Por...  发帖心情 Post By:2022/6/29 17:22:00 [显示全部帖子]

zhDim s As String
For Each sp As String In Ports.PortNames
    If sp.Contains("COM") = False Then
        s = "空"
    Else
        s = s & "|" & sp
    End If
   
Next
Output.Show(s)

 

怎么判断当前是否存在com系列的串口号呢?不存在就提示未空  上述运行直接是空白

 

发送字节  按钮代码如下:

红色部分要怎么表示呢?

 

Dim t1 As WinForm.TextBox = e.Form.Controls("TextBox1")

Dim c1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")

Dim Val()As Byte = New Byte() {t1.Text}

Ports(c1.Text).Write(Val, 0, Val.Length)

 

帮助中的{49,50,51,52}这个代表什么意思呢?


 回到顶部