|
这几天在琢磨自己编写一个MSOFFICE基础操作的阅卷系统当然类似的系统已经有不少了国家计算机等级一级辅助学习系统各地方的计算机职称考试系统各高校的计算机文化基础辅助学习系统以及一些商业的及个人的类似的系统那么我的阅卷系统要有什么特点呢？ 这类系统无非就是调用MS的OFFICE类库然后使用其提供的各种对象来判断操作者的对错开发工具首选VB开发效率高最重要的就是其和VBA本身就是一家系统框架采用主程序（exe）加ActiveX DLL优点是系统开发好后扩展比较方便可以随时增加一个阅卷功能例如增加一个批阅WORD表格方便的功能并且提供一个接口用户也可以按照说明随时增加自己的批阅点(制作自己的ActiveX DLL)扩展的DLL名称自定义但是要填写表格以告诉主程序类名称统一 例子 pclassdll (ActiveX DLL类名称class) Public Function myFunction(ByVal i As Integer) As Integer myFunction= i End Function 主程序调用 Private Sub Command_Click() On Error GoTo errorHandle: Dim obj As Object Set obj = CreateObject(pclassclass) @#pclass是DLL名称class是pclassdll中的类名称 @#注意不是模块名称 MsgBox objmyFunction() Set obj = Nothing Exit Sub errorHandle: MsgBox ErrDescription & 清检查DLL文件名称类名称是否注册等！ ErrClear End Sub |
