QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
6天前
查看: 71579|回复: 256
收起左侧

[原创] autocad二次开发(VBA)就这么简单

[复制链接]
发表于 2007-1-8 14:31:16 | 显示全部楼层 |阅读模式 来自: 中国辽宁营口

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

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

x
运行autocad,创建一个新文件,Alt+F11(或者在菜单栏点“工具”→“宏”→“Visual Basic 编辑器”),在新出现的窗口菜单栏点“插入”→“模块”,输入下面的代码:
+ ~$ f2 R7 W& I. |
' E5 [9 ?) F, g8 I+ l. TSub 我的第一个程序()
# l0 [6 j/ U0 `( A/ @4 o    Dim 直线1 As AcadLine3 _4 }, o# H5 m# S) v) t
    Dim 起点(2) As Double
# S) `3 Q1 F3 O2 v$ }    Dim 端点(2) As Double8 o# L9 I# }$ U- {
   
% a4 f2 I9 R/ L    起点(0) = 10+ L, }4 V; J# U9 U
    起点(1) = 20$ I* F  Q" [. H' X' y8 g' Y$ N5 c2 e
    端点(0) = 80
! _$ B1 i$ p3 q6 J" x    端点(1) = 100
0 ~" U' T0 @0 b, H/ \9 W$ k   
( N) a6 c1 ^, L  q; A    Set 直线1 = ThisDrawing.ModelSpace.AddLine(起点, 端点): r1 T4 w4 y- E) D: ~: S
End Sub
% T3 n% }, W1 j" m7 _0 f: W0 K " G4 {% p$ c; w
检查一下,确信没有问题后按F5! [8 L5 o4 j; K  `' ~  l5 F5 u2 J
回到autocad窗口,看见了吗?一条直线,起点坐标(10,20),端点坐标(80,100)! T8 P( ^- v! a9 m+ e3 y

1 Y% |( A3 {9 q$ ^" g这个程序的第一行里,“SUB”和“()”是必须有的(人家微软就是这么规定的,我也没办法),“我的第一个程序”是这个程序的名字(如果你不喜欢也可以改个别的名字,我无所谓)。
5 H; |+ n2 U3 v- T- g2 t第二行里,“Dim”是定义一个变量,“直线1”是要画的直线的名字(随便改,中英文都行),后面的英文必须有,意思是说:这是一条autocad直线。
* {, w& ^4 c' R% S第三行里,“起点(2)”是一个数组(因为我要用它给直线赋予起点,所以取了个直观的名字,又因为点的坐标是三维的,所以必须用能容纳三个数据的数组),后面的英文意思是“这个数据是双精度类型”。
/ y2 E; I) d- n8 x  O; @4 g第四行和第三行差不多,是用来给直线赋予端点的。- ?; l" f$ q2 {0 k6 K8 e7 I
第五行和第六行是分别赋值给起点的x和y坐标(因为起点的z坐标是0,而定义这个数组的时候,默认数据就是(0,0,0),所以就不用管z坐标了)。
2 N0 K- E; m( l/ E第七行、第八行赋值给端点x和y坐标。
7 F" d7 ^* T! b7 s第九行画直线,在“当前文件”的“模型空间”“画直线(按起点和端点)”。
" y# o1 P, |/ H5 \7 P第十行,完事了。
' V  I  @) _4 T2 h' R* f2 W+ Q) g + O& P$ E& A% S3 _/ z2 B
有的网友一看见英文,头就会变大。别怕,如果你是用“复制/粘贴”把这段代码拷贝到VB编辑器里,就不会知道autocad有多么友善。试试用键盘把这段代码输入进去,你会发现,每到关键时刻,VBA就会提醒你下面该做什么了。' Y  T# M8 t% e% J8 r2 p# j0 k- |
别听旁人瞎说autocad这不行、那不行,那是因为autocad的两个万能命令(一个是VBA,一个是lisp)你还没学会。这两个命令你只要学会一个(不用太精通,差不多就行),就没人敢说你不是高手。

评分

参与人数 1三维币 +3 收起 理由
blackbird + 3

查看全部评分

发表于 2007-1-8 18:55:51 | 显示全部楼层 来自: 中国湖北武汉
赞成楼主的观点!学习的敌人就是畏惧!
发表于 2007-1-8 20:32:00 | 显示全部楼层 来自: 中国广东广州
看来真的是比较容易,该找本书看目的地。
发表于 2007-1-9 08:15:02 | 显示全部楼层 来自: 中国重庆
既然楼主说这么容易,那我就试试吧
发表于 2007-1-9 08:40:35 | 显示全部楼层 来自: 中国上海
增加我的学习信心,谢谢你啊,楼主
发表于 2007-1-9 08:49:13 | 显示全部楼层 来自: 中国河北石家庄
为了更好的利用CAD工具,听从楼主的意见。学习一下干净二次开发知识。
 楼主| 发表于 2007-1-9 10:11:33 | 显示全部楼层 来自: 中国辽宁营口
既然有网友对这个话题感兴趣,就再画个圆玩玩。
- G: \5 E  N0 J8 D. Q+ ~7 l
( j* P  }' f$ ^5 c; iSub 画个圆玩玩()
( c* z: d: E" \# ?3 J    Dim 我真的是圆吗 As AcadCircle# [6 m1 }+ `* B& [2 T
    Dim 我才是圆心呵呵(2) As Double7 n  e" v$ E0 g7 P6 H' ~
    Dim 我是半径我愿意 As Double8 |& u) p: r- k5 X
    我才是圆心呵呵(0) = 27.5555555555556: ^( u8 A" I* }$ W
    我才是圆心呵呵(1) = 69.12345678798
' z5 m) {& z1 |- ]' j    我是半径我愿意 = 38
3 \8 }9 r3 [) a1 F/ z: x5 X: ]    Set 我真的是圆吗 = ThisDrawing.ModelSpace.AddCircle(我才是圆心呵呵, 我是半径我愿意)- C% T- }# r0 G& D; e5 B
End Sub
1 z1 {8 {  s# a9 [' N* v- f . h4 R; e- r/ i: t( n1 U
用键盘输入时,第一行输入完程序名直接按回车,不用输入“()”,VBA会替你把括号和最后一行填好的。其它的关键字也用不着每个字母都用键盘敲,自己试。
6 A# v1 S. A$ r# c3 s6 a2 o5 [! m* M$ o* Q) S$ b3 V
[ 本帖最后由 woaishuijia 于 2007-1-9 10:20 编辑 ]
发表于 2007-1-9 10:34:14 | 显示全部楼层 来自: 中国广东深圳
还是不会哦
" a) F( E/ S3 |, X6 T2 u郁闷,有高手教教我吗/?想学学.
发表于 2007-1-13 13:34:57 | 显示全部楼层 来自: 中国北京

我想学cad二次开发

我想学习一下cad的基本的二次开发,不知道哪位高手能交一下我啊
8 a9 ?! i' H& F$ y2 H* O" M/ E我的qq是125720096,谢谢啦
发表于 2007-1-13 21:41:24 | 显示全部楼层 来自: 中国山西临汾
谢谢搂主,真的想在这方面学的深刻一点
 楼主| 发表于 2007-1-14 16:12:29 | 显示全部楼层 来自: 中国辽宁抚顺

AAA

有了autocad基础,学习它的VBA并不难,关键是要找准突破口。下面是根据在下的学习经验编写的一个自认为有代表性的简单程序,只要你按步骤做下来,就会发现你已经进入了VBA的天地。8 i, W$ d& o9 m3 w) v2 X
    首先,在autocad上创建一个新文件,按Alt+F11进入Visual Basic编辑器。* h5 ^2 ?% n/ T. M4 E* C( w6 w" x% F
    下面这项工作是我强烈建议你做的:在菜单栏点“工具”→“选项”,在选项窗口选中“要求变量声明”--这可以减少我们的低级错误。
- A7 {: Y) d4 d; ^  Y$ c5 \* k8 N    下面开始编写我们的第一个VBA程序:让VBA在autocad的模型空间按我们指定的位置画一条直线。
6 e' ^2 j5 Y* t- p0 s  a    在编辑器的菜单栏点“插入”→“模块”,屏幕上出现了“模块1(代码)”窗口。在代码窗口的第一行是“Option Explicit”--如果你按我的建议在选项窗口选中了“要求变量声明”的话--在它的下面输入“sub A”,回车。窗口出现下面的代码:0 L9 }& {9 M' `; s# P, ]
  B  V, Y4 T$ ]2 K
Sub A()) x1 @+ |- Z! }9 |

' C$ U" g0 J0 q6 s: S2 ?- v4 t+ TEnd Sub1 i* V+ `& W1 R
" g( b+ \, w% k1 g$ W+ `
    “A”是这个宏的名字。你可以按自己的喜好随便给它取个什么名字,但必须是唯一的,因为它是这段程序的标志。取名字时最好不要用汉字,因为autocad的命令行不支持汉字参数,如果用了汉字,每次运行这段程序的时候就必须使用“宏”对话框,而不能使用命令行。4 X, I/ B2 o* f. {* l: s* p5 a
    在两行代码中间的空行键入“thisdrawing.”,屏幕上会出现一个提示窗口--后面的代码可以在这里面选择,而不是所有文本都靠键盘输入--继续键入“m”,提示窗口高亮显示的是“ModelSpace”--我们要的就是它。继续键入“.”,“ModelSpace.”自动进入了代码行,并且出现了一个新的提示窗口;继续键入“addlin”,提示窗口高亮显示的是“AddLine”,键入空格,它就自动上去了,而屏幕上又出现了一个提示行“AddLine(startpoint,endpoint)as acadline”,其中“startpoint”用粗体显示,这是在提示我们给出直线的起点。继续按下面的顺序键入字符“thisdrawing.ut.getp,thisdrawing.ut.getp”--VBA会像前面一样把我们的代码补全--再敲一下空格,整段代码就是现在这个样子:+ q, i; {. g% v+ s) ?+ |/ A4 k: E& X
; h5 Z: C+ Q+ _; k8 r* A3 g9 [0 F
Sub A()* K/ ~3 p+ v# Y/ W
    ThisDrawing.ModelSpace.AddLine ThisDrawing.Utility.GetPoint, ThisDrawing.Utility.GetPoint
+ Y& {1 ~0 V9 O) ~' m& T/ {
End Sub

# Z/ r; N+ x1 _: b3 U
, v$ f3 H5 C. r, B    这行代码中,“ThisDrawing.ModelSpace.AddLine”的意思是:在“当前文档”的“模型空间”“画直线”。这个画直线方法需要两个必不可少的参数,一个是起点三维坐标,另一个是端点三维坐标。在这行里,起、端点的坐标是由后面两部分代码提供的--“ThisDrawing.Utility.GetPoint”的意思是:在“当前文档”上“由用户输入”而“得到点坐标”。, S3 z4 Y/ C: ]  h/ }% [+ ?- N
    我们的第一个宏已经完成了,现在回到autocad窗口运行一下:
1 a8 i- g' L' }4 n( z1 R0 W    在命令行键入“-vbarun”,回车,再键入"a",回车。光标已经变成了十字线,autocad在等着我们指定点。在屏幕上不同的位置点两下(也可以在命令行输入坐标),一条直线就画好了。
1 _/ D* l% i& r, j8 d, K    我们的第一个程序编写成功。
6 {3 c6 D2 }# N% m    不过别高兴得太早,这段程序有个BUG:再运行一次程序,指定第一个点后别指定第二个点,而是按“Esc”键,会跳出来一个窗口告诉我们程序有错误。+ L5 i9 ?$ z2 D( w! \- }5 G. W- l
    按“结束”关闭这个窗口,回到VBA编辑器,在程序中添加两行代码,让它变成现在这个样子。. A* f) g6 z) E5 M

/ ^& l4 v( c7 V1 _& \4 I/ \Sub A()& K' j/ e' y& n$ Y% D1 F1 s: M4 l
On Error GoTo 10$ f5 U7 U( j: E$ T! y6 y8 R; G) \. \
    ThisDrawing.ModelSpace.AddLine ThisDrawing.Utility.GetPoint, ThisDrawing.Utility.GetPoint
  _% n. V( P) V  i; R4 ^1 n10, H* H8 U& {. W2 k9 {( q4 Q8 B
End Sub
" N, m4 i$ y2 i  @& ]- d, k3 c" ]$ E
    这两行新增的代码告诉计算机“在出错时”“转向执行”“行号为10”的程序行。这个程序里“行号为10”的程序行是空行,程序就会继续向下执行“End Sub”结束程序。" Y; F) h$ Y  X% P+ I9 U- `7 P) b
    再来告诉朋友们一个小技巧。刚才在键入代码时要键入三次“thisdrawing”,太麻烦了。现在把中间这行画直线的程序删掉,在原位置按照下面的方法重新输入:
; ^1 |; d  p" ~: M  D    键入“with thisdrawing”,两次回车,键入“end with”。在中间的空行按下面的顺序键入“.m.addlin .ut.getp,.ut.getp”,空格。代码现在是这个样子:, ]: d+ i! h9 S6 _, E

3 ~& q& I: t, l; u9 [6 q* g. {$ fSub A()" ]$ y# u0 [3 G6 H6 F3 q
On Error GoTo 10
4 m' U. P, Z5 f1 V+ M/ d8 @" O: q    With ThisDrawing
3 Z* {+ W) i; ^. ~8 y" g        .ModelSpace.AddLine .Utility.GetPoint, .Utility.GetPoint( ~% \. X; ?  m( X3 g* `
    End With
# S& I2 Y% F5 X  P) D1 G' u7 N
10
! ^; ^3 B. B( rEnd Sub& b8 |( w! O, B! t, E' \- e

: L3 G; A/ t/ w. s5 \, s    在“With”和“End With”两行之间的所有代码可以省掉“ThisDrawing”,键入的工作量减少了很多。
4 X. E% ^0 Z1 |% F3 b/ D    程序是能用了,但还不够完美。比如说:指定第二个点时看不到第一个点在哪里;命令行里没有提示,不知道下一步要做什么。! t" ]$ l  d$ k1 V
    现在来改进一下程序,让它在指定第二个点时从第一个点处引出一条线,像autocad画线时一样,还要在命令行加上提示内容。
* X8 _7 J, Z/ ^8 p5 d    在上面的程序里,两个点的位置只有画线命令知道,我们并不知道。如果要在程序中不止一次使用这个点的坐标,就必须把这个坐标放到一个地方存放起来,用到的时候就去取。
, j$ ]# {7 W3 _, H, {    在上面的程序中补充、修改一些代码,让它变成这个样子:) W! \' R+ Q4 t4 K" {! K
# ]+ N+ M4 s6 ]. a: Y2 t/ S
Sub A()2 `4 g4 ]5 f0 h, u, R
On Error GoTo 10
9 ^6 }. w8 c6 t% z2 p! p* Y. s    Dim B As Variant
) k1 O9 m. @$ O    With ThisDrawing
; ^, X) g3 M  x        B = .Utility.GetPoint(, vbCrLf & "指定起点:")2 l. c7 Z3 n& {
        .ModelSpace.AddLine B, .Utility.GetPoint(B, vbCrLf & "指定端点:")
' o% a- D* r$ W& c1 F# J/ _    End With# n7 S: I9 r; d+ K! q
10- X! w9 x5 @8 J! b
End Sub; }) @: x8 C/ \; v# K! k
( c& l2 D/ {% m
    新增加的第三行意思是:定义一个“变体”类型(相当于万能)变量,名字叫“B”--其实这就是一个存放数据的地址。, Q, R/ A' k3 w* U. z7 d# I; W
    第五行的意思是把“当前文档”上“由用户输入”而“得到点的三维坐标”存放到“B”。有一个变化,就是“GetPoint”(得到点坐标)的后面增加了一对括号,里面是参数。该方法共有两个参数:第一个参数是一个三维坐标,第二个参数是命令行提示符。两个参数都是可省略的,在前面的程序中这两个参数就被省略了。  U- |9 b' ^3 M$ ~9 l8 o5 `
    第六行中,画直线方法的起点坐标直接用“B”,端点坐标还是使用得到点坐标方法,和前面不同的是得到点坐标方法的第一个参数被指定为“B”,它的作用是在“B”点和十字光标间显示一条提示性的直线。7 n/ Z" O+ i( N1 H
    字符串要用""括起来,让计算机知道这是一串字符而不是别的东西。字符串前面的“vbCrLf &”是这个字符串的另一部分。其中“vbCrLf”是一个VB常数,相当于“回车+换行”;“&”是连接符,用来把两个部分连接起来(也可以用“+”号)。提示符中有了“vbCrLf &”,该字符串就会在命令行中以单独的一行出现;如果把它去掉,提示符就会和“命令:”在同一行里显示。
: n1 R) g% C: _/ j# h# \    在这段程序里,我们用到了错误陷阱、定义变量、赋值语句、操作autocad对象画直线的方法和一个VB常数。下面再把这个程序扩展一下,学习更多的VB语句和对象操作方法。8 r% W4 Q+ A' E( R: M- j
    按用户的指令决定是否画一个圆,这个圆以刚才画的直线中点为圆心、以直线长度为直径。
+ I( H0 A& \, G8 ^: S    下面是修改后的代码:% J9 _% G' w, [2 r' Q. y  }0 V) T" u
# v8 u8 x) I- r  h& k" ?* X
Sub A()& b4 q" A/ |$ L
On Error GoTo 10! H6 r+ O/ G  K* y0 N
    Dim B As Variant '定义一个变体类型变量,用于存放直线起点坐标,被赋值后变为数组+ P8 t: `0 ?; v& K, E  o
    Dim C As AcadLine '定义一个Acad直线对象类型变量,用于存放直线对象
& {" W1 r% X/ R; J2 l/ f% P* Y2 w    Dim D As Variant '定义一个变体类型变量,用于存放直线端点坐标,被赋值后变为数组
* j: a: P1 @( D% z! S7 @3 h, w7 i5 c7 ]    Dim E As String '定义一个字符串类型变量,用于接收用户键盘输入的参数
9 a& q0 s  c6 p  F    Dim F(2) As Double '定义一个双精度类型数组,用于存放圆心三维坐标
2 B9 ?$ D3 \( D6 L6 ~    Dim R As Double '定义一个双精度类型变量,用于存放圆的半径
) K* S. S: z/ N# E3 ]; P   
9 }' X4 J! {+ h" M- f; R3 F    With ThisDrawing
7 j2 r; x, g. a, V8 X        B = .Utility.GetPoint(, vbCrLf + "指定起点:") '由用户指定一个点的位置,将坐标赋值给B
0 Y% {+ C! v/ Z9 q        Set C = .ModelSpace.AddLine(B, .Utility.GetPoint(B, vbCrLf + "指定端点:")) '从上一个点出发,由用户指定另一个点的位置,在两点间画一条直线,将此直线赋值给C) Q" Y4 t5 y, D6 Q
        D = C.EndPoint '将直线C的端点坐标赋值给D
. P6 N8 V8 Q' \
        .Utility.InitializeUserInput 0, "Y N" '规定用户输入Y或N关键字,可以接受直接按回车键或空格键做为默认输入
& E5 P3 v$ c% o        E = .Utility.GetKeyword(vbCrLf & "是否画圆[是(Y)/否(N)]<Y>:") '得到用户输入的关键字并赋值给E( f+ Y5 h5 J  z1 y
        If E = "Y" Or E = "" Then '如果用户输入的是Y或直接按的回车或空格,则执行下面画圆的代码,否则跳过下面五行代码, N8 T; E- O  ?! {  l, @
            F(0) = (B(0) + D(0)) / 2 '这三行是计算圆心即直线中点坐标,取直线起点X坐标和端点X坐标的平均值赋值给圆心的X坐标变量
- t& s6 p; o' c5 p$ Z
            F(1) = (B(1) + D(1)) / 2 '取直线起点Y坐标和端点Y坐标的平均值赋值给圆心的Y坐标变量: D* ~7 T) J/ T0 k
            F(2) = (B(2) + D(2)) / 2 '取直线起点Z坐标和端点Z坐标的平均值赋值给圆心的Z坐标变量- V! g2 i# T- B* I; @7 {1 f! ^
            R = Sqr((D(0) - B(0)) ^ 2 + (D(1) - B(1)) ^ 2 + (D(2) - B(2)) ^ 2) / 2 '用勾股定理计算圆的半径
: S% F7 L1 A# j- ?% \            .ModelSpace.AddCircle F, R '在当前文档的模型空间画圆,以F为圆心,R为半径
, ^  ~, d1 J8 }* @, P        End If
2 m+ c; ]2 s1 k0 P4 t
    End With
3 _2 x2 d+ o& S10
* k& m6 _6 r, U+ T8 OEnd Sub
/ s* I* b* ?) e  D4 x8 w; I# g
& X2 s& w" S3 l( _    这段程序和前面程序的主要区别有:- T% A  o" L% R& U3 k
1、使用了注释语句。单引号后面的文字在程序运行时不被执行,仅起到对编程者的提示作用。这在编制大一点的程序时是很有用的,否则过段时间你自己都会忘记当初是怎么编的了。. d6 t, N8 i6 K  ]% _! x
2、定义变量时,同样是三维坐标,B和D被定义为变体类型,F被定义为双精度数组。这是因为B和D是由方法或对象的属性直接用“点”赋值的,B和D得到数据后自动变为数组;F是由我们对三维坐标分别运算后赋值,只能用数组。
3 u6 @/ i# W: H( O9 v3、“Set C =...."这行,对直线赋值时,参数用括号括起来了。在前面的程序中,直线只是画了出来,并没有赋值给某个变量(没有=号),参数就不能用括号;现在它被赋值给一个变量了,参数要括起来。这是语法。
4 {: i1 J: D# n( M4、“InitializeUserInput”方法有两个参数,第二个参数是关键字列表;第一个参数是对输入方式的限制,这里用了0,可以接受直接按回车键或空格键做为默认输入,但默认输入的是空字符串,而不是关键字列表中的一个。
6 R! |  @+ A9 V1 f5、“If...Then...End If”使用了条件转移语句。具体用法可以参见VB资料。+ \6 T. ^0 j7 x" j$ M& K$ m' f
    弄懂了这段程序,其实你对VBA已经初窥门径了。当然,VB语法和autocad对象远不止这些,但也都大同小异,学会了这些,再学其它的就容易了,就像我们学会了WORD,再学EXCEL就很容易一样。不要被VBA帮助文件那浩如烟海的资料所吓倒,其实那里面绝大部分东西用法都差不多。学会了基本的几个,再浏览一下帮助文件,知道这里面都有什么东西,用到的时候现查都来得及。
8 N& _  A  J0 @* @' X    上传一个《Visual Basic 语言参考-函数速查》,希望对学习VBA的朋友有用。! ~5 E  R* N+ ]
7 x' H1 h; t, X7 @, P4 B
[ 本帖最后由 woaishuijia 于 2007-1-14 16:17 编辑 ]

Visual Basic 语言参考-函数速查.rar

498.79 KB, 下载次数: 1247

评分

参与人数 1三维币 +10 收起 理由
★新手★ + 10 技术分享!奖!

查看全部评分

发表于 2007-1-14 21:54:37 | 显示全部楼层 来自: 中国福建泉州

楼主真是历害

偶也CAD几年了啊,对这是一巧不通啊,真是惭愧啊,楼主能指点下吗?万分感谢啊
发表于 2007-2-1 17:43:03 | 显示全部楼层 来自: 中国北京
非常感谢,学习学习,想完了做几个程序试试
发表于 2007-2-2 19:14:28 | 显示全部楼层 来自: 中国黑龙江哈尔滨
我的宏里怎么一片空白啊  没有Visual Basic 编辑器
 楼主| 发表于 2007-2-3 06:32:18 | 显示全部楼层 来自: 中国

回复 #14 shaoshuai968 的帖子

可能安装autocad时用的是“简单”模式,没有选择安装VBA编辑器吧?用安装盘添加试试。
发表于 2007-2-6 17:57:13 | 显示全部楼层 来自: 中国台湾

試著用VB.NET來二次開發吧!

真的!速度會讓你感動。
发表于 2007-2-15 10:02:52 | 显示全部楼层 来自: 中国广东
看来论坛里面是强手如云啊,以前我还自认为自己的水准还可以的,现在看来差远了!!
发表于 2007-2-20 03:13:17 | 显示全部楼层 来自: 中国辽宁
能不能开辟一个二次开发的专栏?
发表于 2007-2-20 10:29:15 | 显示全部楼层 来自: 中国广东广州
楼主真是有心,深入浅出地引导大家对VBA和LISP的兴趣,不久,我们坛子一定会出现好多高手了,这样也就能提高我们的工作效率,远一点地说就能提高我们国民的水平。多有楼主这样的人,我们国家早晚都会成为世界的强国。  K9 L3 _* l. x- o& T) q3 ~
发表于 2007-7-15 15:16:34 | 显示全部楼层 来自: 中国湖北天门
vba对我来说实在是很难,难的是不知道从哪里下手啊?
# |" d' j- \5 T5 s& r% {5 n+ _请高手指点~
发表于 2007-7-17 21:11:18 | 显示全部楼层 来自: 中国浙江金华
由简到难嘛
发表于 2007-7-18 08:49:53 | 显示全部楼层 来自: 中国广东江门
嘿嘿,偶也正在学习.如果开一个二次开发的子板块就好了.
发表于 2007-7-18 08:59:45 | 显示全部楼层 来自: 中国浙江杭州
为什么我打开以后插入菜单下为灰色,不能使用呢?
11.jpg
发表于 2007-7-18 15:40:08 | 显示全部楼层 来自: 中国北京

题目不错,我看不简单.

题目不错,我看不简单.要达到实际应用更不简单!
; e3 j: A9 d1 u/ S- z( g2 A6 e5 Y" E3 x. }( v- p! r" f+ R
而软件开发更注重的应该是实际应用!
发表于 2007-7-21 13:20:29 | 显示全部楼层 来自: 中国上海
嘻嘻哈哈,现在是.NET的时代了,VB,C++都已经升级了,VISUAL STUDIO 的开发环境是非常棒的
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


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

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

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