乐筑天下

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

[编程交流] autolisp var to VBA文本框?

[复制链接]

9

主题

21

帖子

12

银币

初来乍到

Rank: 1

铜币
45
发表于 2022-7-6 23:01:38 | 显示全部楼层 |阅读模式
嘿,伙计们,我越来越擅长lisp,但现在我也想深入了解一点vba,如果可能的话,我听说它对学习两者都有帮助,我有一个设置变量的lsp,我希望它显示在vba文本框中。我尝试了这个,但它不起作用,感谢您提前提供的任何建议!
 
(测试进行a(setq测试12345)
 
 
  1. Private Sub UserForm_Initialize()
  2. ThisDrawing.SendCommand "testing" & vbCr
  3. TextBox1.Text = ThisDrawing.GetVariable("test")
  4. End Sub
回复

使用道具 举报

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-6 23:14:54 | 显示全部楼层
首先,GetVariable语句用于列出系统变量的值,即控制绘图环境的内置变量。因此,不能用于列出用户定义的AutoLISP变量。
 
第二,由于刚刚开始,也许最好考虑一下。Net定制方法;这是因为微软和Autodesk都放弃了VBA技术。请参阅:
http://www.cadtutor.net/forum/showthread.php?t=33211
http://www.cadtutor.net/forum/showthread.php?t=34389
http://www.cadtutor.net/forum/showthread.php?t=40154
http://www.cadtutor.net/forum/showthread.php?t=41247
http://www.cadtutor.net/forum/showthread.php?t=42385
 
当做
回复

使用道具 举报

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-6 23:30:57 | 显示全部楼层
为了完成AutoLISP-VBA通信,可以尝试使用用户系统变量USERI1-5、USERR1-5和USERS1-5;但是,可以通过这种方式传输的数据量是有限的。
 
AutoLISP:
  1. (setq USERS1 “TransferedString”)

 
VBA:
  1. ThisDrawing.GetVariable "USERS1"

 
当做
回复

使用道具 举报

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-6 23:32:48 | 显示全部楼层
您还可以看看:http://autolisp-exchange.com/Forums/Forum6/F6T7P1.htm.
 
当做
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-6 23:42:57 | 显示全部楼层
您可以在用户中保存变量??这些基本上是15个变量,5作为整数,5作为字符串,5作为实数,这是一个很简单的方法,如果你只在家里工作,如果外部软件“附加组件”也改变了这些值,它可能会有问题。我参与了一些软件,我们利用了这一点,并在其中保存了各种变量,如比例、墙壁厚度等
 
您也可以写入寄存器并保存变量值,但变量值只能在pc上本地保存,否则请查看保存到图形中的扩展图元。
回复

使用道具 举报

9

主题

21

帖子

12

银币

初来乍到

Rank: 1

铜币
45
发表于 2022-7-6 23:59:55 | 显示全部楼层
很酷,谢谢你的信息!让我看看我能想出什么。我想学习。net因为vba正在被删除,我想我应该开始研究它,再次感谢!
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-7 00:04:44 | 显示全部楼层
看看这个
 
http://www.cadtutor.net/forum/showthread.php?t=47652
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-1-31 14:42 , Processed in 0.235064 second(s), 66 queries .

© 2020-2025 乐筑天下

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