QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
goto3d 说: 此次SW竞赛获奖名单公布如下,抱歉晚了,版主最近太忙:一等奖:塔山817;二等奖:a9041、飞鱼;三等奖:wx_dfA5IKla、xwj960414、bzlgl、hklecon;请以上各位和版主联系,领取奖金!!!
2022-03-11
全站
goto3d 说: 在线网校新上线表哥同事(Mastercam2022)+虞为民版大(inventor2022)的最新课程,来围观吧!
2021-06-26
查看: 3458|回复: 21
收起左侧

[原创] 公差编辑器

[复制链接]
发表于 2009-5-27 13:42:19 | 显示全部楼层 |阅读模式

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
这是我用 VBA做一个公差编辑器,可以很方便地给基本公差增加前辍、后辍、中间文字、公差,尺寸可以反复编辑。图片为运行的界面和修改后的效果:
& P3 Z) k" P% U7 l/ C! b 01.GIF 1 V) F$ G. D: m! L2 C

' Y/ E$ i# \6 y5 u 02.GIF
- ^( g9 r0 d- v: N6 B
$ i1 {+ E( Q' ?6 V* O/ m源程序:
8 ?) }. f2 F$ u; }2 E. ~' F. i8 I- _" Z TolEdit.rar (18.87 KB, 下载次数: 118)

评分

参与人数 1三维币 +10 收起 理由
woaishuijia + 10 经验分享

查看全部评分

 楼主| 发表于 2009-5-27 13:56:02 | 显示全部楼层
图片中的公差是随便加的,只是为了说明一下
发表于 2009-5-27 16:18:26 | 显示全部楼层
我试过了,当公差中又一个偏差为“0”时,会出现“小数点对齐”的问题,请楼主进行改进。当然,如果在“0”前输入空格的话也可以对齐,只是楼主不是为了让用的人方便吗?所以建议楼主进行适当改进。
 楼主| 发表于 2009-5-27 16:36:17 | 显示全部楼层
原帖由 胡志勇 于 2009-5-27 16:18 发表 http://www.3dportal.cn/discuz/images/common/back.gif
: N6 x! y/ J0 D7 j' G# q/ W' b我试过了,当公差中又一个偏差为“0”时,会出现“小数点对齐”的问题,请楼主进行改进。当然,如果在“0”前输入空格的话也可以对齐,只是楼主不是为了让用的人方便吗?所以建议楼主进行适当改进。

$ V3 q; Q+ p- P7 x, A能不能做个截图传上来,我在我的电脑(AutoCAD2009)用时一直是好的呀?
 楼主| 发表于 2009-5-27 16:44:19 | 显示全部楼层
我新做的测试结果(我在程序中自动调整空格对齐的):
, U# N: B% a# W) x$ b: |" i 05.GIF , X5 L4 c+ ^$ B7 b% `2 S6 ^
" X+ o; N: U& W* ]- k& @4 T
06.GIF
发表于 2009-5-28 22:35:27 | 显示全部楼层
不错啊,下了,呵呵,谢谢楼主
发表于 2009-5-30 17:29:53 | 显示全部楼层

不错

很好啊。受教了!
 楼主| 发表于 2009-6-3 11:45:04 | 显示全部楼层
呵呵,我利用空闲时间做的,前后花了2个星期的零碎时间,才完成的。(主要困难在于解析公差文字,分成前辍、中间文字、公差、后辍)
发表于 2009-6-7 11:59:02 | 显示全部楼层
感谢楼主热心提供!以后写公差就方便多了
5 i  x7 ~' T. O& T( d  d8 U
" h1 ^+ P' d7 d: y  ~" F9 w[ 本帖最后由 OUCEGEN 于 2009-6-7 12:25 编辑 ]
发表于 2009-6-8 15:55:14 | 显示全部楼层

简单的问题

下了怎么使用呀 》》》???? 谢谢了. l  t1 z" W/ o2 `
好像是要黏贴到什么地址的
, H5 E9 K3 {( P' j* _% U$ q请告知 谢谢
发表于 2009-6-10 06:21:57 | 显示全部楼层
我学习了三天,就会画点简单的,我郁闷了,
 楼主| 发表于 2009-6-16 12:40:45 | 显示全部楼层
原帖由 longjianwy 于 2009-6-10 06:21 发表 http://www.3dportal.cn/discuz/images/common/back.gif; ~6 d4 N0 G) W! G1 m
我学习了三天,就会画点简单的,我郁闷了,

6 ^+ M% F% |$ K1 X0 f) J: u1 ^5 T; f那已经是学得很快的了,呵呵,我是边学边干,花了一个星期,才把链轮做完的(有VB基础和一个链轮的.lsp程序)
发表于 2009-6-16 15:43:59 | 显示全部楼层
这个是不是在天河cad里也有的,感觉差不多
 楼主| 发表于 2009-6-16 16:48:40 | 显示全部楼层
原帖由 syx2008 于 2009-6-16 15:43 发表 http://www.3dportal.cn/discuz/images/common/back.gif
, w0 v. o7 `; ]# \这个是不是在天河cad里也有的,感觉差不多

3 e- @% L, L! p1 X9 y' r兄弟,我还没有用过天河cad,但这个插件绝对是原创作品
发表于 2009-6-24 10:21:36 | 显示全部楼层
下来看看...谢谢分享!!
发表于 2009-6-25 09:14:21 | 显示全部楼层
请楼主告知详细使用方法。万分感谢!
 楼主| 发表于 2009-6-25 10:38:23 | 显示全部楼层
工具/宏/加载工程,选择要加载的工程6 Z# V2 E2 {4 r. ~" ^/ z. ^1 H
01.GIF : @% h$ g# ]3 N* E8 u8 H
工具/宏/宏 中选中TolEdit, x% Z; D$ ^3 Y2 Q2 z  S) z+ M" Y+ n* m
02.GIF
 楼主| 发表于 2009-6-26 10:01:24 | 显示全部楼层
原帖由 ugnxs 于 2009-6-25 17:56 发表 http://www.3dportal.cn/discuz/images/common/back.gif
3 O# E' `( b5 P/ H7 J" t2004的上下差不能居中啊!

4 y+ b8 r' _* C( X! r1 M4 v  t3 @9 l5 k不好意思,我刚学二次开发,是在2009版里做的,所以2004版我不熟悉,也没有用过
发表于 2009-6-26 10:27:23 | 显示全部楼层
很实用,谢谢楼主!
发表于 2009-7-27 20:57:05 | 显示全部楼层

回复 1# lioney 的帖子

快捷键是什么?
 楼主| 发表于 2009-7-28 13:17:09 | 显示全部楼层
原帖由 chenbitian0919 于 2009-7-27 20:57 发表 http://www.3dportal.cn/discuz/images/common/back.gif
! I2 ~2 Y* r3 u快捷键是什么?
( L' ?% G" h: m' H2 f2 ~  [
没有直接的快捷键,可以用VBA、Lisp做一个,我是用VBA做的菜单,Lisp做快捷键
发表于 2011-3-4 16:31:50 | 显示全部楼层
分享是美德) P1 I6 H8 W0 `- B+ ?1 a

. `* [. _- N2 T9 O: L: v0 [. M5 q吝嗇是無明& \9 e' a  k; D! I- V2 z
% \6 s& N3 R* y  N! T, A# D7 b8 Z
謝謝您的分享' Z) {+ @) }: z* U9 a& p' i: l+ G

* q5 }6 s0 C$ ~! @# s, D願天下慈善眾生了悟
3 E* F2 l. _: r3 ?. R, B, \& w! H/ |6 r9 S6 F* R3 [: g
讓世界更溫馨, 讓人類更良善" N3 x( G( O  ^* X% K, h0 w
" X/ k7 w. u+ Q1 T
感恩 謝謝您
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

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