VB动态调用自己的ActiveXDLL

这几天在考虑写一个MS-OFFICE基本操作的阅卷系统。当然，类似的系统也不少:全国计算机一级辅助学习系统，地方计算机职称考试系统，高校计算机文化基础辅助学习系统，还有一些类似的商业和个人系统。那么我的阅卷系统有什么特点呢？
这种制度。无非就是调用MS的OFFICE类库，然后用它提供的各种对象来判断运算符的对错。开发工具首选VB6.0，开发效率高，最重要的是和VBA本身一样。该系统采用主程序(exe)和ActiveX动态链接库。好处是系统开发出来后，扩展起来更方便。您可以随时添加标记功能，例如标记单词形式的方便功能。另外提供了一个界面，用户也可以根据说明随时添加自己的复习点(制作自己的ActiveX DLL)。扩展的DLL名是自定义的，但是你要填表告诉主程序类名是统一的。

示例:
pclass.dll(ActiveX dll，类名:class 1)
公共函数my function(byval I as integer)as integer
my function = I
end function。

主程序调用:
private子命令1 _ click ()
on error goto错误句柄:
dimobj as object
set obj = createobject(" pclass . class1 ")
@# pclass是DLL名，class 1是pclass.dll中的类名
@ #注意:不是模块名
msgboxobj . my function(20)
set obj = nothing
exit ust清除
结束Sub