乐筑天下

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

[编程交流] 附：VBA应用程序

[复制链接]
Joro--

9

主题

59

帖子

38

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2022-7-6 19:24:59 | 显示全部楼层 |阅读模式
大家好！
 
在暖通空调领域工作时，我开发了一个用于绘制风管的AutoCad VBA应用程序。在过去的几个月里，我一直在添加一些功能，当涉及到风管布局时，我总是使用它。由于我可能不会很快做出新的修改（没有足够的时间），我决定与所有认为它有用的人分享。
 
主要特点包括：连续管道的图形表示；柔性连接；图纸比例；一组工作层；风道计算器；预定义的管道直径；单个风管件的表示（弯头、偏差、T形件）
 
查找随附的应用程序以及如何使用的基本说明
 
欢迎提出任何意见/批评。
 
乔治
管道抽屉。拉链
回复

使用道具 举报

CADMASTER1128

8

主题

125

帖子

117

银币

初来乍到

Rank: 1

铜币
40
发表于 2022-7-6 19:30:41 | 显示全部楼层
您可能需要重新发布：
202505yrg7c3ex9abavhha.jpg
回复

使用道具 举报

Joro--

9

主题

59

帖子

38

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2022-7-6 19:33:42 | 显示全部楼层
嗯，你可能应该用WinRar来解压。事实上，原始文件名为“Duct Drawer.rar”，但无法作为上传。rar，所以我手动将扩展名更改为“Duct Drawer.zip”。真实的zip-ping使文件超过250K（这是此处可以上载的最大值）。我自己也试着下载了这个文件，它运行正常。
回复

使用道具 举报

Joro--

9

主题

59

帖子

38

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2022-7-6 19:35:54 | 显示全部楼层
CADMaster 1128，
如果您在打开档案时仍有问题，请告诉我，我可以通过电子邮件发送给您
回复

使用道具 举报

CADMASTER1128

8

主题

125

帖子

117

银币

初来乍到

Rank: 1

铜币
40
发表于 2022-7-6 19:40:34 | 显示全部楼层
我给你发了一封PM和我的电子邮件。
回复

使用道具 举报

Joro--

9

主题

59

帖子

38

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2022-7-6 19:43:48 | 显示全部楼层
好的，我寄给你了
回复

使用道具 举报

CADMASTER1128

8

主题

125

帖子

117

银币

初来乍到

Rank: 1

铜币
40
发表于 2022-7-6 19:44:36 | 显示全部楼层
谢谢，很好的VBA/LISP
回复

使用道具 举报

JimF

0

主题

2

帖子

2

银币

初来乍到

Rank: 1

铜币
0
发表于 2022-7-6 19:50:19 | 显示全部楼层
非常好的绘制管道的程序！谢谢
只有一个问题-计算部分是如何工作的？
回复

使用道具 举报

Joro--

9

主题

59

帖子

38

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
58
发表于 2022-7-6 19:53:06 | 显示全部楼层
JimF，
很高兴你喜欢。在“尺寸”字段中，输入风管的水平尺寸，“B”-风管高度，“L”-气流。填充后，按“+”或“-”，水平尺寸递增或递减50mm。每次按下这些按钮时，都会重新计算“V”中的速度
 
当做
乔治
回复

使用道具 举报

asafyan

0

主题

1

帖子

1

银币

初来乍到

Rank: 1

铜币
0
发表于 2022-7-6 19:53:34 | 显示全部楼层
乔治，非常感谢你分享你的节目。
有没有办法将其从度量单位重置为英制单位？
 
问候-Alex
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-4 14:39 , Processed in 0.546099 second(s), 74 queries .

© 2020-2025 乐筑天下

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