乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 71|回复: 6

请高手赐教!!!!

[复制链接]

11

主题

40

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
84
发表于 2005-9-17 17:37:00 | 显示全部楼层 |阅读模式
VLAX类的应用
在调用VLAX类(乐筑天下提供)时总是出错,并且引用了Visual Lisp ActiveX Model类,下面语句无法执行:
Set VL = ThisDrawing.Application.GetInterfaceObject("VL.Application.16")
提示是无法加载!
请高手相助!我在2004、2005中均试而且用GetInterfaceObject加载其它模块也不行!
回复

使用道具 举报

158

主题

2315

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2951
发表于 2005-9-18 07:55:00 | 显示全部楼层
请把置顶的VLAX贴子看完。
回复

使用道具 举报

11

主题

40

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
84
发表于 2005-9-20 19:27:00 | 显示全部楼层
二楼的兄弟能不能讲明白一点呀!
回复

使用道具 举报

11

主题

40

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
84
发表于 2005-9-20 19:35:00 | 显示全部楼层
VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
END
Attribute VB_Name = "VLAX"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False


这几行代码在运行是出错是何故!
是否有VBA爱好者的QQ群!!
回复

使用道具 举报

13

主题

107

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2005-9-21 08:21:00 | 显示全部楼层
看来你接触VB时间不长,你写的那段代码是描述类模块用的。
你先:
1。将下载的txt文件后缀改为CLS。
2。在VBA中导入刚才的cls文件。
3。使用时,在模块中先定义  Dim Vl as new VLAX

回复

使用道具 举报

11

主题

40

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
84
发表于 2005-9-21 15:37:00 | 显示全部楼层
五楼的说法不对。
我搞VB有一段时间,当然你说的我知道,因为我自己也常编类。
能否有高手留下QQ不胜感激!
回复

使用道具 举报

13

主题

107

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
159
发表于 2005-9-21 20:15:00 | 显示全部楼层
不解。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-4 14:19 , Processed in 1.172728 second(s), 67 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表