- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助 全局代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113624)
-- 发布时间：2018/1/19 15:26:00
-- 求助 全局代码
请问全局代码里 为啥不能用HexToDec ~？
有是么办法完成16进制转10进制吗？
-- 发布时间：2018/1/19 15:43:00
--
什么意思？你怎么写代码报什么错？
-- 发布时间：2018/1/19 15:52:00
--
If Vars("com")=True Then
Dim s As String = ""
Do While s =""
Ports(Tables("系统参数").Rows(3)("值")).Write("01 0D" & vbcrlf)
s = Ports(Tables("系统参数").Rows(3)("值")).ReadExisting()
application.doevents
Loop
If s.Length=18 Then
r("行驶速度") =HexToDec(right(left(s,14),2))
End If
End If
全局代码里 出现错误
此主题相关图片如下：微信截图_20180119155023.png
此主题相关图片如下：微信截图_20180119155023.png-- 发布时间：2018/1/19 16:12:00
--
全局代码执行一个内部函数，在内部函数写代码
http://www.foxtable.com/webhelp/scr/1486.htm