乐筑天下

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

判断VBA是否从lisp加载?

[复制链接]

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2007-3-9 20:27:24 | 显示全部楼层 |阅读模式
这是在一个讨论小组中提出和回答的
那人再也没有回来承认我的答案的正确性,所以我想我'd把它贴在人们关心的地方
当然,如果需要的话,(VL-VBARUN FileSpec.dvb!MacroName)将运行宏来加载文件
  1. (DEFUN ReturnLoadedVba (/ VBProjects Index ProjectList)
  2.     (SETQ VBProjects (VLAX-GET-PROPERTY (VLA-GET-VBE (VLAX-GET-ACAD-OBJECT))
  3.                                         'VbProjects
  4.                      )
  5.           Index      1
  6.     )
  7.     (REPEAT (VLA-GET-COUNT VBProjects)
  8.         (SETQ ProjectList (CONS (VLA-GET-NAME (VLA-ITEM VBProjects Index))
  9.                                 ProjectList
  10.                           )
  11.               Index       (1+ Index)
  12.         )
  13.     )
  14.     (REVERSE ProjectList)
  15. )
  1. (IF (VL-POSITION "ACADProjectx" (ReturnLoadedVba))
  2.     (ALERT "Yep")
  3.     (ALERT "Nope")
  4. )
只是一个附加说明,需要加载VBAIDE才能工作
因此,您可能需要测试acvba。arx/kwb
回复

使用道具 举报

71

主题

928

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1230
发表于 2007-3-9 21:05:49 | 显示全部楼层
谢谢你,克里
看,我在乎!
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2007-3-9 22:17:09 | 显示全部楼层
 
回复

使用道具 举报

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2007-3-9 23:10:30 | 显示全部楼层
我想我看到了后克里,有趣的部分是为什么人们想加载不同的dvb#039;s、 我把所有的东西都放在一个大盒子里,我不'做这件事不需要口齿不清。根据需要加载它们可能要快0.0001秒,但是
Ps;期待着这一次的猛烈抨击
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2007-3-9 23:18:01 | 显示全部楼层
唐#039;我只是觉得这是一个有趣的编程问题
回复

使用道具 举报

7

主题

35

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
63
发表于 2007-3-10 00:38:53 | 显示全部楼层
克里(Kerry)即使是吃乌鸦的人也会在意香蕉弯曲者的发帖
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2007-3-10 00:50:49 | 显示全部楼层
嗨,约翰。好久不见 
回复

使用道具 举报

7

主题

35

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
63
发表于 2007-3-10 01:18:29 | 显示全部楼层
G#039;天,克里,是的,这是一个很长的时间-我已经潜伏太久了
我已经离开CAD领域一段时间了,进入了管理、会计、工程等领域;m后退;我看你还是很活跃
向所有VBA员工致以诚挚的问候——如果我在担任管理职位时记忆犹新的话,我想我在《午夜快车》中没有头颅
约翰
回复

使用道具 举报

61

主题

792

帖子

35

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1015
发表于 2007-3-10 09:53:38 | 显示全部楼层
好吧,我得问问;“香蕉折弯者”这个名字是怎么命名的' 和“乌鸦食者&#039' 发生(不要试图成为一个达格,叫我“Sepo''因为我没有化粪池!)
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2007-3-10 16:39:55 | 显示全部楼层
&nbsp
我不知道约翰
听起来有点像学校的孩子们会互相辱骂的名字。。。呵呵,也许是'是的,我们'你只是…不
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-7-7 14:20 , Processed in 1.001042 second(s), 73 queries .

© 2020-2025 乐筑天下

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