VB动态调用自己的ActiveX DLL

新客网 XKER.COM 2005-08-16 来源： 收藏本文

这几天在琢磨自己编写一个MS-OFFICE基础操作的阅卷系统，当然类似的系统已经有不少了：国家计算机等级一级辅助学习系统、各地方的计算机职称考试系统、各高校的计算机文化基础辅助学习系统以及一些商业的及个人的类似的系统。那么我的阅卷系统要有什么特点呢？
     这类系统。无非就是调用MS的OFFICE类库，然后使用其提供的各种对象来判断操作者的对错。开发工具首选VB6.0，开发效率高，最重要的就是其和VBA本身就是一家。系统框架采用主程序（exe）加ActiveX DLL。优点是，系统开发好后，扩展比较方便。可以随时增加一个阅卷功能，例如增加一个批阅WORD表格方便的功能。并且，提供一个接口，用户也可以按照说明随时增加自己的批阅点(制作自己的ActiveX DLL)。扩展的DLL名称自定义，但是要填写表格以告诉主程序，类名称统一。

例子：
 pclass.dll (ActiveX DLL ，类名称：class1)
Public Function myFunction(ByVal i As Integer) As Integer
    myFunction= i
End Function

主程序调用：
Private Sub Command1_Click()
    On Error GoTo errorHandle:
    Dim obj As Object
    Set obj = CreateObject("pclass.class1")
    'pclass是DLL名称,class1是pclass.dll中的类名称
    '注意：不是模块名称
    MsgBox obj.myFunction(20)
    Set obj = Nothing
    Exit Sub
errorHandle:
    MsgBox Err.Description & " -- 清检查DLL文件名称、类名称、是否注册等！"
    Err.Clear
End Sub

• ·身份证函数 查看身份证地区信息
• ·VS2008 第一次安装心得及使用
• ·ASP.NET 2.0跨网页提交的三法
• ·编程实例 WebGroupBox(Aspx控件)
• ·asp.net mvc脚手架代码生成工具
• ·用独立的DLL来存储图片(资源文件)
• ·ASP.NET中多国语言的实现方法
• ·实例 .net生成静态页方法总结
• ·ASP.NET控件学习笔记之ViewState
• ·用递归在TreeView价节点
• ·经验总结 关于.NET 中的Event机制
• ·.NET应用程序开发标准化(z)
• ·在DataTable中查询应该注意的问题
• ·LINQ 中调用存储过程自动绑定列名
• ·如何用.NET技术在线生成网站LOGO
• ·对于访问IIS元数据库失败的解决