| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 406 人关注过本帖
标题:vb的数据类型问题
只看楼主 加入收藏
lvguidong123
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2012-10-24
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:3 
vb的数据类型问题
为什么提示我ByRef参数类型不符。DataFromCom和Data都是什么数据类型?
下面是部分代码:
Dim DataFromCom As Single '从串口读过来的实时值
Dim DataFromComLast As Single '上次的串口值
Dim Data As Single
Dim px(5000) As Single, py(5000) As Single
Dim ab(5) As Byte
Dim Buffer As Variant
Buffer = MSComm1.Input
ab(2) = Buffer(0) - 48
Buffer = MSComm1.Input
ab(3) = Buffer(0) - 48
Buffer = MSComm1.Input
ab(4) = Buffer(0) - 48
Buffer = MSComm1.Input
ab(5) = Buffer(0) - 48
b1 = CInt(ab(2))
b2 = CInt(ab(3))
b3 = CInt(ab(4))
b4 = CInt(ab(5))
Data = 20 * (b1 + b2 / 10 + b3 / 100 + b4 / 1000)
DataFromCom = Data

[ 本帖最后由 lvguidong123 于 2012-10-24 13:02 编辑 ]
2012-10-24 10:47
学编程啊
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:66
专家分:110
注 册:2012-7-25
收藏
得分:7 
好晕
2012-10-24 12:28
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
收藏
得分:7 
Buffer(0) - 48=?

无知
2012-10-24 13:06
lvguidong123
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2012-10-24
收藏
得分:0 
回复 3楼 Artless
我这个式子ab(2) = Buffer(0) - 48是将ASCII码转换成字符型的意思。
2012-10-25 10:29
快速回复:vb的数据类型问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015837 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved