设为首页 |收藏本站 |帮助 |加入VIP |积分充值

QQ登录

只需一步，快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步，快速开始

返回
发新贴
展开

通知     

查看: 1147|回复: 6
收起左侧

[分享] 星外之語_vba隨機取值 7#附檔

[复制链接]
ryouss
发表于 2015-6-22 14:43:05 | 显示全部楼层 |阅读模式 来自： 中国浙江嘉兴

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

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

x
本帖最后由 ryouss 于 2015-6-23 16:56 编辑
, O4 J8 k4 n+ o6 K+ C* d7 v7 L- h! i
. K  `* f0 [% e9 y- T+ B2 { capture-92.gif capture-102.gif 9 g3 q. u5 G/ }& w; c* ^
7 H9 ]2 m# }/ _
1.png 3.png

评分

参与人数 1三维币 +1 收起 理由
阿帕奇 + 1 如可以，请分享源文件

查看全部评分

回复

举报

板上沙丁鱼
发表于 2015-6-22 15:22:09 | 显示全部楼层 来自： 中国浙江杭州
太强大了
回复 支持 反对

举报

keilei001
发表于 2015-6-22 20:16:12 | 显示全部楼层 来自： 中国广东肇庆
强大啊，梁大开始研究外星人了。

点评

ryouss
利用假期胡思亂想!  发表于 2015-6-22 20:31
回复 支持 反对

举报

judyyai
发表于 2015-6-22 20:54:25 | 显示全部楼层 来自： 中国台湾台南市
好可愛啊~梁書的VBA玩真好~

点评

ryouss
謝輔仔關心,僅是簡單的vba應用.  发表于 2015-6-22 20:59
回复 支持 反对

举报

阿帕奇
发表于 2015-6-23 08:11:06 | 显示全部楼层 来自： 中国辽宁盘锦
精彩啊，梁大
回复 支持 反对

举报

ryouss
 楼主| 发表于 2015-6-23 15:57:39 | 显示全部楼层 来自： 中国浙江嘉兴
在 Photoview 360 應用光射
& t5 t7 d$ I" ?' S4 ~% G6 u
- X& v8 q3 X' K* _9 Q6 F5 c$ r! A5 H4 l6 E8 B
capture_06232015_154459.png
回复 支持 反对

举报

ryouss
 楼主| 发表于 2015-6-23 16:55:30 | 显示全部楼层 来自： 中国浙江嘉兴
本帖最后由 ryouss 于 2015-6-23 17:11 编辑 ( r/ T# {& m. V/ F  n' h

8 i* [7 z* Y; j! ^& p7 e分享原檔,因主要考慮張口問題,, _( F) I/ I; R1 B( b7 b& v9 Z6 d
其他可能不是很嚴謹作圖.
9 s0 I1 |+ p3 r1 @9 v& R8 e$ ]張口是控制如下三尺寸
9 q0 O8 e9 \& W6 f4 S9 bSet myDimension_11 = Part.Parameter("D1@草圖1")9 X) S9 R# d0 F; i
Set myDimension_21 = Part.Parameter("D1@草圖2")
# v) Y1 B  P2 {& T0 K0 {Set myDimension_22 = Part.Parameter("D2@草圖2")+ V) V* z' I6 o: f- ]' ^4 p  Q

! y$ @0 [" C/ x; `8 O8 h- ]( w' t1 N: X3 u8 r3 O7 {) n
' \- e! [$ ]/ a9 J
ET_X.png capture_06232015_171036.png
. c( v6 r6 @8 C: t7 C+ L& V# U( [- z6 R3 Q8 `* {
ET_X.rar (437.98 KB, 下载次数: 6)
回复 支持 反对

举报

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

本版积分规则


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

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

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