中国IT动力,最新最全的IT技术教程
最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像
首 页 | 程序开发 | 操作系统 | 软件应用 | 图形图象 | 网络应用 | 精文荟萃 | 教育认证 | 硬件维护 | 未整理篇 | 站长教程
ASP JS PHP工程 ASP.NET 网站建设 UML J2EESUN .NET VC VB VFP 网络维护 数据库 DB2 SQL2000 Oracle Mysql
服务器 Win2000 Office C DreamWeaver FireWorks Flash PhotoShop 上网宝典 CorelDraw 协议大全 网络安全 微软认证
硬件维护  CPU  主板  硬盘  内存  显卡  显示器  键盘鼠标  声卡音箱  打印机  机箱电源  BIOS  网卡  C#  Java  Delphi  vs.net2005
  当前位置:> 程序开发 > 编程语言 > Visual Basic > 网络
VB与VC混合编程中处理消息的方法
作者:gnuljf 时间:2001-11-03 10:47 出处:互联网 责编:chinaitpower
              摘要:VB与VC混合编程中处理消息的方法
VB与VC混合编程中处理消息的方法
http://www.tongyi.net    点击:401  

  现在越来越多的人采用VB与VC的混合编程:用VB快速开发出漂亮的界面以及外围处理程序,再用VC编写底层的各种操作,例如内存的操作、IO端口的操作等,VC中还可以嵌入汇编语言进行更底层的操作。 
  一般的做法是将VC程序编译成DLL,在VB中用Declare语句声明DLL中的函数,例如: 
  Declare Function SendCommand Lib ″c:\program files\devstudio\wjfprojects\Hr0506dllMnsr\debug\Hr0506dllMnsr.dll″(CmdNum As Integer) As Boolean 
  声明以后,函数SendCommand 就可以当作VB自己的函数使用了。 
  但是,怎样将VC中的各种消息(例如各种底层的状态)及时通知VB并且VB能够及时处理呢?这是VB的一个缺陷:不能方便地处理自定义的Windows消息。例如在VC中自定义了两条消息:MW_TAPI_DATACOME,MW_TAPI_BUSY,在C语言中,用PostMessage(hWnd,MW_TAPI_CONNECTED,0,0);语句可以很方便地将MW_TAPI_CONNECTED消息传递给窗体(窗体句柄为hWnd),在主回调函数中就可以处理了。但是要把这条消息传递给VB,并让VB处理这条消息,并不太容易。虽然在VB5.0以上的版本中,可以定义自己的事件(EVENT),但比较麻烦。这里介绍一种简单的方法,让VB巧妙地处理自定义的消息: 

  1.首先将VB窗体中TextBox控件Text1的句柄传递给DLL(注意:VB中的TextBox控件有hWnd属性)。 
  VB中: ′声明DLL中的函数 
  Declare Function SendhWnd Lib ″c:\program files\devstudio\wjfprojects\Hr0506dllMnsr\debug\ Hr0506dllMnsr.dll″ ((ByVal hWnd As Long) As Boolean 
  ′传递text1的句柄 
  SendhWnd(text1.hWnd) 
  VC中://句柄接收函数 
   declspec(dllexport) BOOL GethWnd(HWND hWnd1) 
  { hWnd=hWnd1; 
  if (hWnd==NULL) 
  { return FALSE; } 
  return TRUE;} 
  2.在VC中用API函数SetWindowText取代PostMessage直接发送消息给VB中的Text1控件: 
  SetWindowText(hWnd,″ MW_TAPI_DATACOME ″); 
  3.在Text1_Change事件中处理消息: 
  Private Sub Text1_Change() 
  Select case Text1.text 
  case W_TAPI_DATACOME: 
  ′消息处理语句 
  case MW_TAPI_BUSY: 
  ′消息处理语句 
  default: 
  ′其他处理语句 
  End Select 
  End Sub 
  以上方法在作者编写的“TAPI远程监控系统”中使用,效果很好。 

关闭本页
 
首页 | 投资与合作 | 服务条款 | 隐私政策 | 收藏本站 | 设为首页 | 新用户注册 | 免责声明 | 使用帮助
Copyright ©2005-2008 chinaitpower.com All rights reserved. www.chinaitpower.com 版权所有