您现在的位置: 天极网 > 开发频道 > VB COM基础讲座之建立测试程序
全文

VB COM基础讲座之建立测试程序

2004-09-14 10:05作者:adding出处:天极网责任编辑:方舟
  这里我们直接创建一个应用程序来测试一下前面生成的ActiveX EXE文件监视组件:

  新建一个"Standard EXE"工程;



  下面需要添加一个引用到我们的新的文件组件中去,然后添加少量的代码作尝试:

  选择"Project"->"References"菜单;

  选中"File"组件选项,然后单击[OK]按钮;

  在表单的通用声明部分添加下列代码:

  Dim WithEvents MyFileObject As FileCheck

  从"Object"下拉列表中选择"MyFileObject";

  确保插入符在FileFound事件程序中;

  键入下列代码:

  MsgBox "Found: " & Filename

  在表单Form1中添加一个命令按钮;

  在该按钮中添加下列代码:

  Set MyFileObject = New FileCheck

  MyFileObject.MonitorFile ("c:\test.txt")

  这里,我们是将MyFileObject定义成FileCheck的一个新实例,然后用c:\test.txt参数运行MonitorFile方法。这时,程序在后台中启用计时器,且每隔60秒都来检测一次这个文件。

  由于,我们的计算机中还没有这个文件,所以什么也没有发生。现在,我们用Notepad(记事本)在C盘中创建一个名为test.txt的文件。

  则在60秒内,弹出一个消息对话框用来表示我们的文件被找到。这就是我们刚刚创建的ActiveX EXE!

  对于上述这样的组件,使用异步处理是没有太大的必要的。正如我们以前讨论的那样,ActiveX EXE是有自己的进程空间的。因此,当计时器启用并检测文件的存在性时,它不会使其它程序暂停。而如果使用的是DLL,那么就可以使用异步处理了。

  即使这样,你能在计时器中放入任何代码吗?是能放入创建大型报表的程序、复杂的计算代码,还是其他?

  至此,我们构造了一些实际的常规组件,但我们还没有来得及讨论它们的发布问题,这将在下一节中进行。


软件资讯·软件下载尽在天极软件

相关搜索:
相关文章及软件
关注此文读者还看过
热门关注
特别推荐
网友关注
软件下载
娱乐下载
驱动下载
文章排行
本周
本月
最近更新
关于我们|About us|网站律师|天极服务|电子杂志|RSS订阅|加入我们|网站地图
TMG
Copyright (C) 1999-2009 Chinabyte.com, All Rights Reserved 版权所有 天极网络
商务联系、网站内容、合作建议:010-82657868
版权声明 在线提交意见反馈 渝ICP证B2-20030003号
经营性网站备案信息 网警备案 中国网站排名
天极传媒:天极网|比特网|IT专家网|IT商网|52PK游戏网|IT分众