您现在的位置: 中国男护士网 >> 考试频道 >> 计算机等级 >> 二级辅导 >> VB >> 辅导 >> 正文    
  VB动态调用自己的ActiveXDLL 【注册男护士专用博客】          

VB动态调用自己的ActiveXDLL

www.nanhushi.com     佚名   不详 

     这几天在琢磨自己编写一个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

 

文章录入:杜斌    责任编辑:杜斌 
  • 上一篇文章:

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
     

    联 系 信 息
    QQ:88236621
    电话:15853773350
    E-Mail:malenurse@163.com
    免费发布招聘信息
    做中国最专业男护士门户网站
    最 新 热 门
    最 新 推 荐
    相 关 文 章
    没有相关文章
    专 题 栏 目

      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)                            【进男护士社区逛逛】
    姓 名:
    * 游客填写  ·注册用户 ·忘记密码
    主 页:

    评 分:
    1分 2分 3分 4分 5分
    评论内容:
  • 请遵守《互联网电子公告服务管理规定》及中华人民共和国其他各项有关法律法规。
  • 严禁发表危害国家安全、损害国家利益、破坏民族团结、破坏国家宗教政策、破坏社会稳定、侮辱、诽谤、教唆、淫秽等内容的评论 。
  • 用户需对自己在使用本站服务过程中的行为承担法律责任(直接或间接导致的)。
  • 本站管理员有权保留或删除评论内容。
  • 评论内容只代表网友个人观点,与本网站立场无关。