注册 登录
编程论坛 VB6论坛

求哪位编程高手帮我看下下面这段vb代码为何会报错

btt6 发布于 2016-08-13 13:42, 2303 次点击
有个应用程序放在下面这个目录里(C:\Users\Administrator\Desktop\HideGhost-v2.6.6\HideGhost 2.6.6) 我想把它作为对象引用,下面这行vb代码为何会报错,应该怎么写呢?

Private Sub Command1_Click()
Dim CADObject As Object
CADObject = GetObject("C:\Users\Administrator\Desktop\HideGhost-v2.6.6\HideGhost 2.6.6")
End Sub
4 回复
#2
xiangyue05102016-08-13 17:03
根据你的说明,你给一个目录C:\Users\Administrator\Desktop\HideGhost-v2.6.6\HideGhost 2.6.6 创建了一个对象实例。这个没有见过,应该是不行的。
另外,VB中的引用不会是一个打包好的应用程序的,而是一个对象(DLL文件)。对象会有属性、方法、子对象这些东西,下面是Microsoft Excel9.0 Object Library的对象模型的简图。
只有本站会员才能查看附件,请 登录

其代码也是这样的
程序代码:
Dim xlApp As Excel.Application  
Dim xlBook As Excel.WorkBook  
Dim xlSheet As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象   
Set xlBook = xlApp.Workbooks.Open("文件名")  '一级子对象
xlApp.Visible = True
Set xlSheet = xlBook.Worksheets("表名") '二级子对象
xlSheet.Cells(row, col) =值
xlSheet.PrintOut '打印工作表  
xlBook.Close (True) '关闭工作簿  
xlApp.Quit '结束EXCEL对象   
Set xlApp = Nothing '释放xlApp对象

VB中创建对象正常的做法是,一般都是在“工程-引用”中添加引用之后才可以使用的。 然后用GetObject或者CreateObject获得对象的。

如果只是运行这个Exe程序,可以使用Shell命令


[此贴子已经被作者于2016-8-13 17:04编辑过]

#3
btt62016-08-14 08:49
麻烦再帮我解答一个疑问,getobject()这个函数里,PathName这个参数用零长度字符串 (""),和省略这个参数有什么区别,msdn里关于这部分的解释看不太明白,求哪位好心人可以给个小例子。还有,msdn上说如果省略 PathName 参数,则 GetObject 返回在 Class 中指定的类类型的当前活动对象。,它这个当前活动对象是什么意思,
#4
Artless2016-08-21 00:13
以下是引用btt6在2016-8-14 08:49:44的发言:

麻烦再帮我解答一个疑问,getobject()这个函数里,PathName这个参数用零长度字符串 (""),和省略这个参数有什么区别,msdn里关于这部分的解释看不太明白,求哪位好心人可以给个小例子。还有,msdn上说如果省略 PathName 参数,则 GetObject 返回在 Class 中指定的类类型的当前活动对象。,它这个当前活动对象是什么意思,

我的理解它必须已启动
#5
pengzhanggui2016-08-23 16:14
回复 2楼 xiangyue0510
说明得相当好啊
1