| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 435 人关注过本帖
标题:[求助]将下面代码转换成VB代码
只看楼主 加入收藏
tanghuawei
Rank: 4
来 自:美丽的湖南
等 级:业余侠客
威 望:3
帖 子:531
专家分:220
注 册:2006-3-16
结帖率:100%
收藏
 问题点数:0 回复次数:0 
[求助]将下面代码转换成VB代码

程序在初始化的时候,自动检测系统的串口是否存在或者被占用,可以使用如下的方法:

在基于对话框的设计中,我们采用MSComm控件作为串口接口使用,但该控件没有提供检测所使用串口是否存在的函数,所以我们在程序初始化的时候如果使用了系统中不存在的串口(如,在有些笔记本中,COM1是不存在的),系统会异常,造成系统初始化不正常。为了解决这个问题,同时使我们的程序有更好的交互特性,我们可以采用如下的方法来实现这个判断。该代码仅供参考。该段代码一般放在OnInitDialog中。

HANDLE m_hCom;

CString com[2] = {"COM1", "COM2"};

CString str="";

int cnt = 0;

for(int i = 0; i< 2; i++)

{

m_hCom = CreateFile(com[i], GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL| FILE_FLAG_OVERLAPPED, NULL); // 这里的CreateFile函数起了很大的作用,可以用来创建系统设备文件,如果该设备不存在或者被占用,则会返回一个错误,即下面的 INVALID_HANDLE_VALUE ,据此可以判断可使用性。详细参见MSDN中的介绍。

if(m_hCom == INVALID_HANDLE_VALUE) // 如果没有该设备,或者被其他应用程序在用 *******************

{

str+=com[i]; // 记录下该串口名称,以备后面提示用

str+=" ";

}

else

{

cnt = i + 1; // 如果存在,则记录下来。这里只记录了一个,也可以采用一个数组来记录所有存在串口;

}

CloseHandle(m_hCom); // 关闭文件句柄,后面我们采用控件,不用API

}

if(cnt) // 如果串口存在,则执行相应的初始化(采用控件)

{

if(m_ctrlMscom.GetPortOpen()) // m_ctrlMscom是控件的一个实例

{

m_ctrlMscom.SetPortOpen(FALSE);

}

m_ctrlMscom.SetCommPort(cnt);

if(!m_ctrlMscom.GetPortOpen())

{

m_ctrlMscom.SetPortOpen(TRUE);

}

m_ctrlMscom.SetSettings("4800,n,8,1");

m_ctrlMscom.SetInputMode(1);

m_ctrlMscom.SetRThreshold(RX_PKG_SIZE);

m_ctrlMscom.SetInputLen(0);

m_ctrlMscom.GetInput();

m_strComStatus.Format("COM%d, 4800, n, 8, 1", cnt);

m_ComSettting[0] = cnt-1;

}

else // 如果不存在,则显示错误信息,而不进行串口操作,防止系统异常造成界面的初始化不完全

{

AfxMessageBox(str+"doesn't exist or is being used by other program",MB_OK);

m_ComSettting[0] = 0;

m_strComStatus.Format("No COM can be used! Plesase check your hardware!");

}

程序中标记***************的部分是该实现的关键,也就是CreateFile()这个API的调用的作用和返回值得判断,对于一般串口设置程序来说,很好用了。这样我们就可以设计一个比较完整的串口设置代码了。

搜索更多相关主题的帖子: 代码 
2006-12-23 15:12
快速回复:[求助]将下面代码转换成VB代码
数据加载中...
 
   



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

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