如何在vb中动态调用其他类，能不能实现？

Question

myObj=createObject(className)
callByName(myObj,ProcedureName,vbMethod,Args())要给分哦

Answer 1

一定给!
如果有参数
是不是写成这样
callbyname(myobj,ProcedureName,vbMethod,Args(argumen1,argumen2))

Answer 2

应该写成
 callbyname myobj,ProcedureName,vbMethod,argumen1,argumen2....

Answer 3

应该写成
 callbyname myobj,ProcedureName,vbMethod,argumen1,argumen2....例如：
  CallByName Text1, "Move", VbMethod, 100, 100

Answer 4

加个set :set myObj=createObject(className)
可直接调用，例如：
 Dim fs, f, ts, s
    
    Set fs = CreateObject("Scripting.FileSystemObject")
    
    Set f = fs.GetFile(tFile)
    Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault)

Answer 5

请你再费点心！
页面报错
ActiveX component can't create object 

Answer 6

'800a01ad' ActiveX component can't create object 

Answer 7

知道了：
你用的登陆身份不允许创建DLL中的对象。Browser error: 
Microsoft VBScript runtime error '800a01ad' ActiveX component can't create object /test.asp, line 1 
The line in the Active Server Pages file reads as follows: 
<% set db = Server.CreateObject("ADODB.Connection") %> CAUSE
This problem is related to the permissions granted to your DLLs. The IUSR_computer and IWAM_computer account (where computer is the name of the machine) do not have the permissions necessary to execute the DLLs being instantiated on the "Server.CreateObject" line in the ASP code. RESOLUTION
The IUSR_computer and IWAM_computer account must be granted read permissions to the <drive letter>:\Program Files\Common Files\System\ADO directory.

Answer 8

不是字符串变量，是对象名
the following is an example in MSDN:CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100