VB温度显示乱码

wang117834 2015-05-27 10:51:13
下位机温度程序正确上位机温度显示乱码
下位机程序
void StartUART( void )
{ //波特率4800
SCON = 0x50;
TMOD = 0x20;
TH1 = 0xFA;
TL1 = 0xFA;
PCON = 0x00;
TR1 = 1;
}
//---------------------------------------------------串口发送数据-----------------------------------------------------
void R_S_Byte(uchar R_Byte)
{
SBUF = R_Byte;
while( TI == 0 ); //查询法
TI = 0;
VB上位机温度显示程序
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comEvReceive
val_str = MSComm1.Input
MSComm1.InBufferCount = 0
Text1.Text = val_str
val_num = Asc(val_str)
...全文
333 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
of123 2015-05-29
  • 打赏
  • 举报
回复
试试: Dim varTmp As Variant Dim i As Integer Private Sub MSComm1_OnComm() Select Case MSComm1.CommEvent Case comEvReceive varTmp = MSComm1.Input Text1.Text = StrConv(varTmp, vbUniCode) 'For i = 0 To Ubound(varTmp) 'Debug.Print Hex(varTmp(i)) 'Next i 如果还不对,开放后面的调试语句,看看传过来的数据是什么格式。
赵4老师 2015-05-27
  • 打赏
  • 举报
回复
设置 InputMode 为 comInputModeBinary,Input 属性通过一个 Variant .返回一二进制数据的数组
wang117834 2015-05-27
  • 打赏
  • 举报
回复
我把InputMode 为 comInputModeBinary之后温度显示还是不对
我测得温度为37.5度VB显示
温度模块驱动,2009/01/04 V6.20 更新DLL(MZG) 2009/02/03 V6.21 更新DLL(MZG)高级程序(LYB) 2009/03/16 V6.22 更新DLL(LYB)高级程序(LYB)添加VB简易程序 2009/03/26 V6.23 添加用户向导(MZG) 2009/04/14 V6.24 修改VC高级程序(LYB) 2009/04/24 V6.25 修改VC高级程序、添加Delphi简易程序(LYB) 2009/05/12 V6.26 添加DAM3058AH模块(LYB) 2009/05/22 V6.27 修改VC高级程序(LYB) 2009/07/09 V6.28 修改VC高级程序(LYB) 2009/07/11 V6.29 修改VC高级程序、DLL(LYB) 2009/07/23 V6.30 修改VC高级程序(LYB) 2009/08/22 V6.31 修改VC高级程序(LYB) 2009/12/07 V6.32 修改VC高级程序(LYB)、DLL(HY) 2009/12/12 V6.33 修改VC高级程序(QH) 2010/01/06 V6.34 添加VB.NET简易程序(TW) 2010/03/08 V6.35 改为IIS11.5安装包(LYB) 2010/03/015 V6.36 添加DAM3029模块(LXY) 2010/03/017 V6.37 修改DAM3052界面上的错别字(LXY) 2010/03/24 V6.38 添加C++Builder简易程序、更新VC简易程序头文件(LYB) 2010/04/23 V6.39 更新VB简易程序(LYB) 2010/05/11 V6.40 添加C#简易程序,DAM3039和DAM3058的VC程序增加存盘功能(TW) 2010/05/29 V6.41 修改VC程序(TW) 2010/06/22 V6.42 安装时注册控件,添加LabView程序(LYB) 2010/06/22 V6.43 修改LabView的AD程序(TW) 2010/09/14 V6.44 修改VC的高级程序(TW) 2010/10/19 V6.45 修改VC的高级程序,添加DAM3230安装驱动功能(LYB) 2010/11/30 V6.46 修改VC的高级程序,修改3504,添加DO、DI功能(LYB) 2010/12/28 V6.47 更新DAM3000MS.pdf,解决乱码问题(LYB) 2011/04/22 V6.48 添加Delphi的AD通用简易程序(TW) 2011/04/26 V6.49 添加VB的Energy(电量模块)通用简易程序(TW) 2011/04/29 V6.50 修改VB DIO简易程序创建设备失败问题(LYB) 2011/07/01 V6.51 增加DAM3506模块程序(HY) 2011/08/03 V6.52 去掉DAM3000MH.pdf,DAM3000MS.pdf,DAM-3000用户向导.pdf(TW)(董传阳要求) 2011/09/17 V6.53 添加VC的CNT简易程序(ZHL) 2011/11/10 V6.54 添加DAM3920模块程序(LHL) 2011/11/14 V6.55 重新打包 解决部分模块显示不了模块信息问题 (ZHL) 2012/03/05 V6.56 修改VC高级程序 (TW)

1,066

社区成员

发帖
与我相关
我的任务
社区描述
VB 资源
社区管理员
  • 资源
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧