VB中创建超长时间计时器对象 第3页

对ActiveX DLL部件进行测试，与标准的EXE程序一样，可分为单步运行或全运行。在写完所有程序代码后，建议用户先用Ctrl+F5进行全编译执行，发现检查NewTimer程序的语法错误。也可建立一个测试工程与NewTimer链接进行测试，针对由NewTimer类模块提供的每个属性和事件，添加测试代码来测试它们的属性和方法。按F8，进入单步运行状态，逐个语句察看对NewTimer类模块的调用情况。

3．编译NewTimer.DLL
完成测试，排除所有错误后，从“文件（F）”菜单中选择“生成NewTimer.dll（K)”命令，编译生成NewTimer.dll文件。编译成功后NewTimer.dll文件将自动注册到Windows注册表中，

4．引用NewTimer.DLL
引用ActiveX DLL部件同引用其他对象一样，从“工程（P）”菜单中选择“引用（N）”命令，打开引用窗口，从引用列表中选中NewTimer对象。如果是第一次引用NewTimer，则在引用窗体上单击“游览（B）”命令按钮，将NewTimer.DLL文件添加到可引用列表框中方可使用。

5．调用NewTimer.DLL
在应用程序中加入下述程序代码，实现参NewTimer.dll的调用：
    Option Explicit
    Dim WithEvents LongTimer1 As LongTimer

    Private Sub LongTimer1_Tick()
      Print "时间到，此处添加处理程序"
    End Sub

    Private Sub Command1_Click()
      LongTimer1.Interval = 12000     ‘两分钟
      LongTimer1.Enabled = True
    End Sub

    Private Sub Form_Load()
       Set LongTimer1 = New LongTimer
    End Sub


参考文献
[2]东箭工作室.Visual Basic5.0中文版程序设计.清华大学出版社，1997
[3]Evangelos Petroutsos. Visual Basic5从入门到精通.北京：电子工业出版社，1997

上一页  [1] [2] [3] 

VB中创建超长时间计时器对象 第3页下载如图片无法显示或论文不完整，请联系qq752018766