明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2115|回复: 5

什么是宏名称?只有一个command_click的算是宏吗?

[复制链接]
发表于 2012-3-12 16:35 | 显示全部楼层 |阅读模式
1明经币
VBA中只有这样几句:
Private Sub CommandButton1_Click()
  ThisDrawing.SendCommand ("(load " & """" & "cx001.lsp" & """" & ")" & " ")
  ThisDrawing.SendCommand "cx001" & " "
  Me.Hide
End Sub
LISP的代码是:
(defun c:cx001()
  (setq os_mode(getvar "osmode"))
  (setvar "osmode" 0)
  (command "_line" '(0 0) '(100 100) "")
  (command "_circle" '(0 0) 15)
  (command "_circle" '(100 100) 30)
  (sevar "osmode" os_mode)
  (princ)
)
这个属于VBA调用LISP,如果想改写成LISP调用VBA的界面该如何写?
如果使用LISP调用VBA,且VBA的界面由四个textbox和一个command组成,LISP中将前两个textbox的内容组成第一点,后两个textbox组成第二点,用line连接两点,并以两点为圆心,各画一个半径为20的圆,此DVB和LISP该如何写?

最佳答案

查看完整内容

这个不算宏名称吧.你在Thisdrawing里面写下这段 Sub test() UserForm1.Show End Sub test就是宏名称.用这个宏来调用你的窗体userform1
发表于 2012-3-12 16:35 | 显示全部楼层
这个不算宏名称吧.你在Thisdrawing里面写下这段
Sub test()
UserForm1.Show
End Sub
test就是宏名称.用这个宏来调用你的窗体userform1
回复

使用道具 举报

 楼主| 发表于 2012-3-19 11:00 | 显示全部楼层
是的,一个朋友也是这样给我建议的,已解决,他用VBA来二次开发
回复

使用道具 举报

发表于 2012-3-22 23:21 | 显示全部楼层
革天明 发表于 2012-3-19 11:00
是的,一个朋友也是这样给我建议的,已解决,他用VBA来二次开发

问题都解决了,还不给分啊?哈哈
回复

使用道具 举报

 楼主| 发表于 2012-3-23 12:49 | 显示全部楼层
回复

使用道具 举报

发表于 2012-3-25 22:24 | 显示全部楼层
革天明 发表于 2012-3-23 12:49

回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-7 00:14 , Processed in 0.265586 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表