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

QQ登录

只需一步，快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步，快速开始

12下一页
返回
发新贴
展开

通知     

全站
6天前
查看: 12296|回复: 28
收起左侧

[已解决] 在输入X，Y坐标值的同时如何输入坐标的点号

[复制链接]
tkh125
发表于 2008-3-23 23:36:34 | 显示全部楼层 |阅读模式 来自： 中国新疆昌吉回族自治州

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

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

x
在输入X，Y坐标值的同时如何输入坐标的点号，比如：ZK2012     465432.56,15682413.44。在输入点的时后如何把点号ZK2012也附在点的边缘。又怎么能实现群输点号呢？多谢谢高手的指点。
回复

举报

woaishuijia
发表于 2008-6-9 06:44:36 | 显示全部楼层 来自： 中国
楼主的意思是不是说：现在有一组类似“ZK2012     465432.56,15682413.44”的数据，想一次性输入这些数据，在CAD上按坐标画出这些点，并且在点的旁边要有点编号的文字？" d1 J* ]3 ]" B( p/ ?  `+ m
如果是这样，这需要用二次开发。下面是一段实现上面功能的VBA代码：
' S& D# C& ]# f! z% U
, p0 A/ _3 @8 pSub A()
* U3 j0 k& d. e/ K: Z1 x    Dim S As String, L As Long, L1 As Long, L2 As Long, P(2) As Double
4 R- Q* [' K( N* E3 ^% d    On Error GoTo 10
; F# ^1 {6 N- ?, Z    With ThisDrawing
) u* j7 [+ B& b% m8 K( @) B        Do '用循环方法输入任意多组数据+ t, P6 R4 u8 f, Z/ x9 p, C
            S = .Utility.GetString(100, vbCrLf & "输入数据:") '从命令行输入字符串，格式为“点编号；一个或多个半角空格；点的横坐标；半角逗号；点的纵坐标；回车”
4 n1 V' O! F- c# c% r, c2 C            L = Len(S) '用函数获得字符串长度
2 [; Q9 U* `4 f5 U& @5 m( Q            L1 = InStr(S, " ") '半角空格的位置& J: ~2 ~8 c" U7 N
            L2 = InStr(S, ",") '半角逗号的位置7 x; S. z. r% ^4 t7 c) e
            If L1 > 1 And L2 > L1 + 1 And L2 < L Then '检查输入的字符串中是否含有半角空格和半角逗号及位置是否正确, ]& A$ j9 c) ^8 p# {5 V
                P(0) = CDbl(Mid(S, L1 + 1, L2 - L1 - 1)) '得到点的横坐标. @7 H5 Z1 K- Q- v8 F9 ^: L! R( T  l
                P(1) = CDbl(Mid(S, L2 + 1)) '得到点的纵坐标% i5 k% y* }+ K3 ^, P3 p8 P4 m& T
                .ModelSpace.AddPoint P '画点1 H, R& x  m9 }! M  N+ x( ~: d; f) {. x
                .ModelSpace.AddText Left(S, L1 - 1), P, 2.5 '在点的同一位置写单行文字（点编号）
' g8 M! w) H* U# {& ~4 i4 `            Else '字符串不符合条件则退出，比如直接回车
* d% @/ o) `! w7 r" j) x                Exit Do% }4 L/ A) a' U  }
            End If- z# ^; s7 [! \- Q, g, R9 j+ n9 D7 ?
        Loop; x2 h# j/ Q0 Y2 ^
    End With8 {$ |% M2 m4 S2 n
10: End Sub
) n# {- |; D+ l* M4 y9 k+ Q. N8 O8 t% X, c
用Alt+F11打开VBA编辑器，双击“工程资源管理器”中的ThisDrawing对象，在代码窗口粘贴代码。见图1
" i5 [$ ~7 G% \! U% y6 [8 H  O+ _
8 F0 Z$ ?& y# _3 t

图1

图1 2 }" y' m1 [( S& c' n$ h- k

/ t3 K' q: o. D) G0 u6 D% R4 j回到CAD界面，Alt+F8打开“宏”对话框，点“运行”。见图26 a; Y- q+ @+ [* a; \$ B

  \% R$ n  G0 o8 p: ^) B& n

图2

图2 $ s! R9 i7 A4 J

/ w7 G, P' E! K: R4 `; w打开按代码中注释文字说明的格式准备好的数据，复制，见图3; U# V3 K' _/ ~) p( \! M1 z

' ?1 \' [0 y5 z% ]/ }

图3

图3
1 g. U4 t( r+ v2 h% n5 r. }* @/ e6 V2 D( D& C) @: N4 I
在命令行中粘贴。图4是粘贴前的命令行，图5是粘贴后的。由于数据中含有回车符，程序已开始执行，所以在图片上半部可以看到点已经画出来了，只是由于借用楼主的数据坐标值太大，以至于字高只有2.5的单行文字需要放大才能看见。见图6! ^, r6 f$ _( \$ Z
" G7 A" `. |& ?0 }% q9 m' h0 [( {

图4

图4
: @. g# ?7 Z" B2 |9 z/ O* D- w, _6 Z- j

图5

图5 " ~. r6 ^+ S# B. ?
) R) ]' ^2 v: q/ v+ a1 N6 Y8 }

图6

图6
+ g' K$ p1 `/ E/ Y* T% a; D
- L$ b/ d# {% k! b" K此代码仅供参考。

评分

参与人数 1三维币 +5 收起 理由
番禺理工 + 5 应助

查看全部评分

回复 支持 反对

举报

sjry001
发表于 2011-7-10 17:57:36 | 显示全部楼层 来自： 中国北京
很好，很强大！
回复 支持 反对

举报

lgddk
发表于 2011-7-21 00:59:29 | 显示全部楼层 来自： 中国内蒙古呼和浩特
真的很不多谢谢哦
回复 支持 反对

举报

fcm
发表于 2013-2-16 12:19:08 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2008-6-9 06:44 static/image/common/back.gif8 m/ Z- ~, {! A6 _
楼主的意思是不是说：现在有一组类似“ZK2012     465432.56,15682413.44”的数据，想一次性输入这些数据， ...
( R+ u2 e% l) R- e; }  J
怎样把上面的代码弄成一个有命令的文件啊？有命令的话，就没有必要每次都要运行宏了，可以省略很多操作步骤。
回复 支持 反对

举报

fcm
发表于 2013-2-20 12:28:44 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2008-6-9 06:44 static/image/common/back.gif
7 Y9 N2 k! e1 z- n8 j% d& O楼主的意思是不是说：现在有一组类似“ZK2012     465432.56,15682413.44”的数据，想一次性输入这些数据， ...

; \4 ^' v! j, d$ W, V4 v6 P8 W" F您好！使用您上面的代码，为什么每次启动CAD都会出现“文件已加载......”的对话框？有什么办法每次启动CAD都不要出现“文件已加载......”的对话框吗？还有就是，您上面的代码在CAD里使用是世界坐标系的，您可以把上面的代码修改为在CAD里使用是当前自定义的坐标系吗？
回复 支持 反对

举报

fcm
发表于 2013-2-20 18:29:03 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2008-6-9 06:44 static/image/common/back.gif
+ u9 c( b8 Z1 [! a楼主的意思是不是说：现在有一组类似“ZK2012     465432.56,15682413.44”的数据，想一次性输入这些数据， ...

1 I4 ~4 G( m  V0 A! j' k8 V! }9 ?您好！我已经解决了每次启动CAD都不要出现“文件已加载......”的对话框。可您上面的代码在CAD里使用是世界坐标系的，您可以把上面的代码修改为在CAD里使用是当前自定义的坐标系吗？如果上面的代码修改后能在CAD里使用当前自定义的坐标系，那么就方便很多了，可以大大提高绘图效率。
回复 支持 反对

举报

woaishuijia
发表于 2013-2-22 11:09:03 | 显示全部楼层 来自： 中国辽宁营口
  1. Sub A()
    7 y- c$ i1 Y) _
  2.     Dim S As String, L As Long, L1 As Long, L2 As Long, P(2) As Double, P1 As Variant
    ( p' g4 p- Z* \
  3.     On Error GoTo 10, t: P* ~) @8 }+ |- E1 M
  4.     With ThisDrawing
    ! V+ V$ l$ p. k2 C7 a7 G5 T
  5.         Do '用循环方法输入任意多组数据
    1 D* ]0 L/ A. \. S# e
  6.             S = .Utility.GetString(100, vbCrLf & "输入数据:") '从命令行输入字符串，格式为“点编号；一个或多个半角空格；点的横坐标；半角逗号；点的纵坐标；回车”
    ( X/ @" m& j' R
  7.             L = Len(S) '用函数获得字符串长度6 a) i- P- W: Q1 O+ r: `/ }  ^
  8.             L1 = InStr(S, " ") '半角空格的位置
    " d' J/ ~0 A% l* B1 `5 l8 j" D
  9.             L2 = InStr(S, ",") '半角逗号的位置
    ( o  ^& x8 @( z
  10.             If L1 > 1 And L2 > L1 + 1 And L2 < L Then '检查输入的字符串中是否含有半角空格和半角逗号及位置是否正确
    7 Y/ y6 [, M$ z5 i
  11.                 P(0) = CDbl(Mid(S, L1 + 1, L2 - L1 - 1)) '得到点的横坐标2 q9 h5 A+ c6 I# J9 Z
  12.                 P(1) = CDbl(Mid(S, L2 + 1)) '得到点的纵坐标
    8 Q5 x  Y( p& s% m) g5 @# D
  13.                 P1 = .Utility.TranslateCoordinates(P, acUCS, acWorld, False) '把输入的点坐标从UCS转换到WCS2 y6 i5 c2 b  A6 A5 O1 [
  14.                 .ModelSpace.AddPoint P1 '画点
    3 P3 m4 @. W. ~' {& h7 @+ R
  15.                 .ModelSpace.AddText Left(S, L1 - 1), P1, 2.5  '在点的同一位置写单行文字（点编号）
    7 E4 ~3 s4 `5 k* Q5 {
  16.             Else '字符串不符合条件则退出，比如直接回车1 s5 z% A+ \( I: q, t
  17.                 Exit Do/ t9 s/ X7 D& E' r7 \. G) V. y
  18.             End If8 R5 v1 c6 [( N# i
  19.         Loop
    3 D2 C) y% `* @9 w
  20.     End With
    6 O$ c" e* _" h% j
  21. 10: End Sub
复制代码
回复 支持 反对

举报

fcm
发表于 2013-2-22 14:27:24 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-2-22 11:09 static/image/common/back.gif

! K+ x! y' N5 X4 ?4 r8 C版主真是太厉害了！随心所欲、小菜一碟地就搞好了代码，佩服！佩服！这个代码非常强大！非常实用！
回复 支持 反对

举报

fcm
发表于 2013-2-23 12:03:03 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-2-22 11:09 static/image/common/back.gif
' ^) U6 Y3 M2 c9 L& F* t+ F& [
请问您有AutoCAD VBA插件管理器吗？
回复 支持 反对

举报

woaishuijia
发表于 2013-2-25 06:46:48 | 显示全部楼层 来自： 中国辽宁
本帖最后由 woaishuijia 于 2013-2-25 06:50 编辑
4 r5 t6 B3 D( r, o8 y" E1 d6 k. I4 Y$ P$ `  T
没有这个东西,也不认为这种东西有什么用处,特别是在混合使用VBA和LSP及其它工具进行二次开发时.- ^+ F3 J: H) |3 z
自动加载和运行二次开发程序的方法有多种,个人有个人的喜好,还是按照自己的特点自行编制管理程序为好--如果需要的话.
2 e% Y; T, K& D/ X9 G, N  x1 b2 H: R2 T0 ^8 S: l2 H
PS:不要重复发帖.本论坛只讨论编程技术,不提供无偿编程服务.参见《CAD三维及二次开发》版规及发帖规范
回复 支持 反对

举报

fcm
发表于 2013-5-8 10:03:54 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-2-22 11:09 static/image/common/back.gif
( g, X- c, I& H1 J
您好！版主：
6 F$ J2 Y0 o* n请问上面的代码可以添加一个命令保存为dvb文件吗？如果有命令的话，就可以很方便地在CAD命令行里直接输入命令运行上面代码的dvb文件了，可以省略很多操作步骤。
回复 支持 反对

举报

fcm
发表于 2013-5-8 19:15:29 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-2-22 11:09 static/image/common/back.gif

% a4 e6 U# u% l' K" a您好！您编写的上面代码可以弄一个命令保存为dvb文件吗？
回复 支持 反对

举报

woaishuijia
发表于 2013-5-9 07:00:22 | 显示全部楼层 来自： 中国辽宁
fcm 发表于 2013-5-8 19:15 static/image/common/back.gif
. S  M1 x7 P( K您好！您编写的上面代码可以弄一个命令保存为dvb文件吗？

; h3 V# r1 L/ [2 x! q! b& x参考这个帖子
  i3 |* X# w5 U- o: N1 Y+ U. |极限与配合公差标注程序(31楼,46楼更新)/ R. e* v+ N0 _% e
回复 支持 反对

举报

fcm
发表于 2013-5-9 19:02:19 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-5-9 07:00 static/image/common/back.gif
; M6 C# K& z' L7 ^1 }$ z7 B参考这个帖子
& g8 H4 Q" n8 V# m9 ]( V极限与配合公差标注程序(31楼,46楼更新)

+ H- l0 P& x# S2 {您说的参考的帖子里是要路径的，我说的意思是：在CAD的宏里加载工程后，可以在CAD命令行里直接输入命令就可以运行上面那代码的dvb文件了，那么这个命令怎样弄出来啊？
回复 支持 反对

举报

fcm
发表于 2013-5-9 19:58:37 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-5-9 07:00 static/image/common/back.gif
0 u; _* ^2 x$ C# G4 ]! `2 r( @8 T参考这个帖子" T; H/ c( j" V& x# y# l% u6 S! H6 ?
极限与配合公差标注程序(31楼,46楼更新)

. y) s! p& P. G, l. j: Z% @我说的意思是：在CAD的宏里加载工程后，可以在CAD命令行里直接输入命令就可以运行上面那代码的dvb文件了，不是用lsp文件来引导的，那么这个命令怎样弄出来啊？
回复 支持 反对

举报

woaishuijia
发表于 2013-5-10 01:29:29 | 显示全部楼层 来自： 中国天津
在CAD中运行已加载的VBA宏,只能用"VBARUN"或"-VBARUN"命令先启动VBA,然后再指定宏名称.这两个命令的不同点只是前一个在对话框中指定宏名称,而后一个是在命令行中输入.7 ?' ]2 r) f8 z; U2 n! R# @
用LISP引导,或是在CAD中"自定义"命令宏,都可以实现把上面两个步骤合二为一,从而简化操作--即只需输入一个自定义命令就能运行指定的VBA宏--的目的.
- R# n3 N6 B1 y, N寄希望于VBA本身实现这一功能则是行不通的,因为绝大多数VBA宏都需要通过上面的两个步骤才能执行它而无论它的内容是什么.( h' F6 V0 Y: n1 g, X5 U; |2 y
只有一个例外,在2012及以前版本中,如果这个宏被保存在CAD支持文件目录下的"ACAD.DVB"工程文件中,且被命名为"ACADSTARTUP",这个宏在CAD首次加载VBA模块时就会被执行.在2013SP1和2014版本中,这个功能需要用户的授权.
回复 支持 反对

举报

fcm
发表于 2013-5-10 08:41:00 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-5-10 01:29 static/image/common/back.gif
; x* P. F* ~, r+ b' x: R在CAD中运行已加载的VBA宏,只能用"VBARUN"或"-VBARUN"命令先启动VBA,然后再指定宏名称.这两个命令的不同点只 ...
1 Y# g6 M8 e$ ^9 B
您好！请问在CAD中"自定义"命令宏是怎样弄的啊？
回复 支持 反对

举报

woaishuijia
发表于 2013-5-11 06:58:19 | 显示全部楼层 来自： 中国辽宁
这个问题无法用几句话说清楚,因为它包含的内容足够写一本书了.在这里只能做一点简单的介绍.& {$ x. j3 x+ m
"宏"是一个或多个命令以及参数的组合.
% S7 x: z2 ?' B6 [! a在CAD中可以用多种方法创建不同的宏.比如用VBA编写的程序就是宏的一种(为与用其它方法创建的宏相区别,我们可以称其为VBA宏),用LISP编写的函数也是宏(可以称为LISP宏).不记得从哪个版本开始,CAD还提供了"动作录制器"由用户自己录制,播放和管理宏(可以称为录制宏).当然,我们平时最多用到的是用CAD自己的语言编写的宏.之所以说它是我们平时最多用到的,是因为我们在绘图时点击菜单项或工具按钮,就是在使用CAD的宏.
( v# \, Y; d' E% N: M  ~2 w比如,我们点击"绘图"菜单 > "圆" > "相切、相切、相切".CAD的命令行提示:2 m- V+ h3 |5 X

4 l+ F& x% d$ v5 B命令: _circle
# D. {0 _2 L0 w1 W指定圆的圆心或 [三点(3P)/两点(2P)/切点、切点、半径(T)]: _3p 指定圆上的第一个点: _tan 到$ {) ~/ Q  r3 B
. J: c+ u" b+ ^; U. F1 \7 l$ m4 ~
我们可以看到,在这个"三相切画圆"宏中,首先是调用CAD的画圆命令"circle",然后CAD替我们输入了"3p"关键字,指定了"三点"画圆方式.当命令行提示"指定圆上的第一个点:"时,又替我们输入了"tan"关键字,指定了对象捕捉方式为"切点",然后等待我们在屏幕上指定第一个切点.5 V. }' c) }: _! _: E8 C' \: S7 z! v
当我们指定了第一个切点后,CAD命令行继续提示
6 w! K2 m1 g" Z/ w: k9 r; s8 g% Z# ^$ ]
指定圆上的第二个点: _tan 到6 T/ m7 {$ Q5 @+ U
7 h% G5 u% \) ~7 p6 n9 @
CAD再次替我们输入了"tan"关键字指定了对象捕捉方式为"切点",然后等待我们在屏幕上指定第二个切点.* r1 U* b1 i; M
当我们指定了第二个切点后,CAD命令行继续提示$ L1 G0 J$ B5 I! q3 C, f
# g- u/ R. \, A/ H4 r- a
指定圆上的第三个点: _tan 到
% S) D! \5 U( o$ Y+ g) [( }' D( p) Y3 I+ ^+ r6 n
CAD又替我们输入了"tan"关键字指定了对象捕捉方式为"切点",然后等待我们在屏幕上指定第三个切点.
& }9 j. v5 d9 X% |8 \' W& }
3 d2 n9 U7 n$ X5 t, |现在我们打开CAD的自定义界面,在命令列表中找到"圆, 相切、相切、相切",可以看到这个宏的完整内容"^C^C_circle _3p _tan \_tan \_tan \ "
6 U1 z1 \6 K+ n" ^% H- R  K不同CAD版本的自定义界面也都不太相同，但都可以找到上面的内容.
- F9 b6 n$ v' t/ A& m这个宏当中,"^C"是特殊字符,其含义是"取消活动的命令或命令选项"(相当于 ESC);
1 @% P/ V& k8 R+ S8 U"_circle _3p _tan "与我们在命令行输入的命令和参数一样,"circle",空格键,"3p",空格键,"tan",空格键;' E" M2 {2 S/ j5 {( }$ S$ \
"\"也是一个特殊字符, 其含义是"暂停以等待用户输入".
1 D) [& Y) T. v7 m. n$ q% Q2 _/ ?这个宏只是CAD为我们编写的大量的宏中的一个.我们可以在自定义界面编辑修改它--如果我们对它不太满意的活.还可以创建一个新命令使用自己的宏.
; q4 W! g# H: F3 g6 d% T比如,我们创建一个新命令"命令一",为它制做一个图标并把它插入到某个工具栏或菜单中.再为它编写如下的宏:
4 r* j2 `3 w" y4 {% C9 a
" ]  \7 h$ L3 B: [7 C$ l  l^C^C_-VBARUN E:/AutoCAD/二次开发/型钢/型钢.dvb!xg;
4 i0 U# l) s+ s4 y3 o" c* w* C- f( h( Z+ h( p8 a
这个宏的含义是"-VBARUN"命令,空格键,VBA工程文件的路径和宏名称"E:\AutoCAD\二次开发\型钢\型钢.dvb!xg",回车.% h. e) J2 u, \: S4 I
保存后,在图形界面绘图时,只要用鼠标点击这个工具按钮或菜单项,CAD就能直接运行"E:\AutoCAD\二次开发\型钢\型钢.dvb"VBA工程文件中的"xg"过程.
+ n. X8 |0 v# G在这个宏中,文件路径分隔符使用了"/"而不是"\"--前面已经说到了"\"代表"暂停以等待用户输入".在CAD命令宏中的路径分隔符要用"/";' q6 H% D; G! n: l% Y$ \! G5 z
宏的结尾是一个";",特殊字符,代表回车.0 g" p$ C  \; z( o4 O
+ v7 b9 y  ]+ Q2 \# s6 G( e
关于如何在自定义界面中创建命令,以及更多的命令宏编写方法和特殊字符,在CAD帮助文件中的《自定义手册》> "自定义用户界面" > "自定义命令" 中有详细的说明,可以自行参考学习.
回复 支持 反对

举报

fcm
发表于 2013-5-11 08:22:04 | 显示全部楼层 来自： 中国广西梧州
本帖最后由 fcm 于 2013-5-11 10:07 编辑
  P0 R7 M( L% X, i( T$ ]
woaishuijia 发表于 2013-5-11 06:58 static/image/common/back.gif+ b1 H  t. d+ ?2 [! N% \3 T; A+ l
这个问题无法用几句话说清楚,因为它包含的内容足够写一本书了.在这里只能做一点简单的介绍.
- |+ e. n% {& z3 ^( |"宏"是一个或多 ...

& p* b2 r  J8 @+ O- G+ n谢谢版主精彩的回答！版主说的很详细、很耐心、很负责！不过您说的编写的宏路径不能把dvb文件放在桌面
回复 支持 反对

举报

fcm
发表于 2013-6-14 08:52:24 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-5-11 06:58 static/image/common/back.gif
# C* `7 C& B1 a; g8 H8 f这个问题无法用几句话说清楚,因为它包含的内容足够写一本书了.在这里只能做一点简单的介绍.- i; {9 H# v) O6 `5 J: p" w
"宏"是一个或多 ...

# _* m( @( \- [1 Z* r3 i# U; {  ]版主：您好！可以请教您一个问题吗？8 U7 |: |) t3 p9 G
用OpenDCL制作的CAD对话框，对话框里的文字按钮怎样关联CAD外挂程序的命令？当一点击对话框里的文字按钮就可以运行CAD的外挂程序。
回复 支持 反对

举报

fcm
发表于 2013-6-19 16:19:06 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-5-11 06:58 static/image/common/back.gif
* v) ~; S9 V6 r这个问题无法用几句话说清楚,因为它包含的内容足够写一本书了.在这里只能做一点简单的介绍.& c2 z( m7 B2 [$ L( G3 C
"宏"是一个或多 ...
% J0 x! u5 a* s1 R3 b! \
您好：用OpenDCL制作的CAD对话框，对话框里的文字按钮怎样关联CAD外挂程序DVB文件的命令？当一点击对话框里的文字按钮就可以运行CAD的外挂程序DVB文件。
回复 支持 反对

举报

woaishuijia
发表于 2013-6-19 22:35:34 | 显示全部楼层 来自： 中国浙江杭州
fcm 发表于 2013-6-19 16:19 static/image/common/back.gif7 @; W: r* }( ~& f
您好：用OpenDCL制作的CAD对话框，对话框里的文字按钮怎样关联CAD外挂程序DVB文件的命令？当一点击对话框 ...
$ [- R, V: X. x. E$ ]$ p
抱歉.我从不使用DCL做对话框,对这方面没有研究.我只用VBA做对话框,因为它的用户窗体功能更强大.
回复 支持 反对

举报

fcm
发表于 2013-6-20 08:25:51 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-6-19 22:35 static/image/common/back.gif9 z3 K( G: S: y) j* i# y% s' H
抱歉.我从不使用DCL做对话框,对这方面没有研究.我只用VBA做对话框,因为它的用户窗体功能更强大.

& ^- E5 u# j) C6 N; l版主：您好！
* X4 n4 x7 Z1 g7 K& ^* w( N3 w: [- |怎样用VBA做对话框呢？用VBA做的对话框面板里有按钮吗？那按钮可以关联CAD外挂程序的命令吗？（即一点击按钮就能运行CAD外挂程序，可以实现这样吗？）
回复 支持 反对

举报

fcm
发表于 2013-6-21 17:03:06 | 显示全部楼层 来自： 中国广西梧州
woaishuijia 发表于 2013-6-19 22:35 static/image/common/back.gif6 u, ~, K# z. }" @6 a
抱歉.我从不使用DCL做对话框,对这方面没有研究.我只用VBA做对话框,因为它的用户窗体功能更强大.

7 s; F$ Y8 J/ `( n版主：您好！您看到我的问题了吗？
* {, o1 q7 P5 C$ ?2 g* C5 Y怎样用VBA做对话框呢？用VBA做的对话框面板里有按钮吗？那按钮可以关联CAD外挂程序的命令吗？（即一点击按钮就能运行CAD外挂程序，可以实现这样吗？）
回复 支持 反对

举报

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

本版积分规则


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

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

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