📄 cad世界__autocad vba初级教程 (第四课 程序的调试和保存).htm
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0055)http://old.icad.com.cn/html/2005-5-30/2005530153745.asp -->
<HTML><HEAD><TITLE>CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存)</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>BODY {
BACKGROUND-IMAGE: url(image/pagebg.gif)
}
.style1 {
FONT-WEIGHT: bold; COLOR: #ff0066
}
.style2 {
FONT-WEIGHT: bold; FONT-SIZE: 9pt; COLOR: #333333; FONT-FAMILY: Times New Roman, Times, serif, "黑体"
}
.style3 {
COLOR: #336699
}
.style4 {
COLOR: #333333
}
.style6 {
COLOR: #f76c8c
}
.style15 {
COLOR: #ff0033
}
.style16 {
FONT-WEIGHT: bold; COLOR: #ff0000
}
</STYLE>
<SCRIPT language=JavaScript type=text/JavaScript>
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</SCRIPT>
<LINK href="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/main_c1.css"
rel=stylesheet>
<META content="MSHTML 6.00.2900.2995" name=GENERATOR></HEAD>
<BODY leftMargin=0 rightMargin=0>
<DIV align=center>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/headadA.js"></SCRIPT>
<TABLE height=17 width=800 align=center bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/headmenuA.js"></SCRIPT>
</TD></TR></TBODY></TABLE><!--以上为导航菜单-->
<TABLE width=800 align=center bgColor=#ffffff>
<TBODY>
<TR>
<TD width=6>
<TABLE width=1 bgColor=#999999>
<TBODY></TBODY></TABLE></TD><!--左侧通栏开始-->
<TD vAlign=top width=174>
<TABLE width=140 align=left><!--搜索-->
<TBODY>
<TR>
<TD width="100%">
<TABLE height=40 cellSpacing=0 cellPadding=3 width="100%"
align=center>
<FORM action=../../srcsearch.asp method=post>
<TBODY>
<TR>
<TD><IMG height=20
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/mu_search_red.gif"
width=159></TD></TR>
<TR>
<TD align=middle colSpan=2><INPUT size=14 name=keyword> <INPUT type=submit value=搜索 name=submit> <INPUT type=hidden
value=all name=datesearch> <INPUT type=hidden value=2
name=AreaSearch> </TD></TR></FORM></TBODY></TABLE></TD></TR><!--精品导读开始-->
<TR>
<TD vAlign=top width=157 bgColor=#ffffff><IMG height=20
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/leftmenu2_01_red.gif"
width=159>
<TABLE width="100%" align=left>
<TBODY>
<TR>
<TD align=left>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/class2.js"></SCRIPT>
</TD></TR></TBODY></TABLE></TD></TR><!--热点新闻结束--><!--论坛热门开始-->
<TR>
<TD vAlign=top width=157 bgColor=#ffffff><IMG height=20
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/leftmenu2_02_red.gif"
width=160>
<TABLE width="100%" align=left>
<TBODY>
<TR>
<TD align=left>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/lttop6.js"></SCRIPT>
</TD></TR></TBODY></TABLE></TD></TR><!--论坛热门结束--><!--投稿-->
<TR>
<TD vAlign=top width=157 bgColor=#ffffff><IMG height=20
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/mu_mail_red.gif"
width=160>
<TABLE>
<TBODY>
<TR>
<TD vAlign=top align=left>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/tougaoA.js"></SCRIPT>
</TD></TR></TBODY></TABLE></TD></TR><!--投稿结束--></TBODY></TABLE></TD><!--左侧通栏结束-->
<TD width=1
background="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/lbg1.gif"></TD><!--中间通栏开始-->
<TD vAlign=top width=660><!-- <table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="650" height="500" valign="top">-->
<TABLE width="100%" border=0>
<TBODY>
<TR>
<TD align=left>当前位置:ICAD >> 数字化设计 >> CAD >>
正文</TD></TR></TBODY></TABLE><BR>
<TABLE width="100%" border=0>
<TBODY>
<TR>
<TD align=middle bgColor=#eeeeee height=40><FONT
style="FONT-SIZE: 16px"><B>Autocad VBA初级教程 (第四课 程序的调试和保存)</B><IMG
height=12 src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/zi.jpg"
width=15></FONT></TD></TR>
<TR>
<TD align=right>作者:普天同庆 | 阅读次数:1172 <FONT color=#999999>转自:<FONT
color=#cc0000>CAD世界网-论坛</FONT>
时间:2005年5月30日15:37</FONT></TD></TR></TBODY></TABLE><BR>
<TABLE cellPadding=5 width=600 border=0>
<TBODY>
<TR>
<TD class=c align=left><FONT id=zoom style="FONT-SIZE: 14px"><FONT
size=3></FONT>
<P>人非圣贤,孰能无过,初学者在编写复杂程序时往往会出现一些意想不到的错误,所以程序的调试显得尤为重要,随着学习的深入,以后我们需要经常进行程序调试。事实上,对于那些资深程序员来说,调试程序也是一项不可或缺的重要工作。</P>
<P>首先,在程序输入阶段,应该充分利用VBA编辑器的智能功能。当你在写代码时,输入一些字母后,编辑器可以自动列出合适的语句、对象、函数供你选择,可以用上下键选择,然后按TAB键(它位于“Q”键左边)确认。当输入一个回车符后程序会自动对这条语句进行分析,如果出现错误就会提示。<BR>我们经常碰到的麻烦是程序的运行结果和预计的不一样,一般我会这样做:首先要想一想可能是哪一个变量有问题,然后去监视这个变量(或表达式),在程序合适的位置设置断点,这样可以使程序停下来看一看这个变量有没有按照我的设想在变化。下面我举一个简单的例子,先看源代码:<BR>sub
test()<BR>for i=2 to 4 step 0.6<BR>next i<BR>end
sub<BR>这是一个非常简单的循环,每一次循环i便会增加0.6,当循环3次后i值就变为4.4,但问题是每一次循环时i值变为多少?<BR>第一步:在菜单中选“调试”—“添加监视”,在表达试中填“i”,点击确定,这时你会看到临视窗口中会多一行。<BR>第二步:把光标移到代码窗口中的“next
i”行,按一下“F9”,于是每当程序运行到这里时就会暂停了。<BR>好,一切就绪,请按F5执行程序,在监视窗口中C值立刻变为2,再按F5继续,C值为2.6,再按几次F5,直到程序结束,这样我们就成功监视了C值的变化。<BR>第三步:在next
i行再按一次F9,清除断点。监视的表达式的右键菜单选择“删除监视”。<BR>另外,还可以用“逐语句”、“逐过程”、“运行到光标处”等方法进行调试,这些都在调试菜单中,操作比较简单,请读者自行领悟。</P>
<P>到目前为止,我们所做的工程都是“嵌入式工程”,它只是嵌入在当前的Autocad图形文件中,
以后打开这个文件时代码才会加载,如果别的dwg文件也要使用,那就需要把代码导出为.bas文件,供其他dwg文件导入。在VBA编辑器的“文件”菜单中有这两个功能,一试便知。<BR>ACAD
VBA还有一种工程叫“通用式工程”,只要进入ACAD就可以运行,程序可以在不同用户、不同的图形文件中共享,但是由于VBA功能太强,有时候会出现一些意想不到的事情,所以在学习阶段请暂时不要这样做。</P>
<P>本课结束,请做思考题;监视下列代码中的i和j的值,注意,此题虽然要监视2个变量,但是在代窗口中只要设置1个断点就足够了。<BR>sub
test()<BR>for i=2 to 4 step 0.6<BR> for j=-5 to 2 step
5.5 <BR> next j<BR>next i<BR>end
sub<BR></P></FONT><BR>(编辑:zhaozh)</TD></TR>
<TR>
<TD align=right>
<SCRIPT language=JavaScript>
<!-- Begin
if (window.print) {
document.write('【<a href="#" onClick="javascript:window.print()"><font color=cc0000>打印本文</font></a>】 ');
}
// End -->
</SCRIPT>
【<A
href="http://old.icad.com.cn/review/index.asp?article=2005530153745"
target=_blank><FONT color=#cc0000>发表评论</FONT></A>】【<A
href="javascript:window.close()"><FONT
color=#cc0000>关闭窗口</FONT></A>】</TD></TR></TBODY></TABLE>
<TABLE align=left>
<TBODY>
<TR>
<TD align=left>上一篇:<A
href="http://old.icad.com.cn/html/2005-5-30/2005530153633.asp"
target=_blank>[文章]Autocad VBA初级教程 (第三课 编程基础二)</A><BR>下一篇:<A
href="http://old.icad.com.cn/html/2006-6-1/200661105959.asp"
target=_blank>[文章]CATIA车座设计中文教程(二)</A><BR></TD></TR></TBODY></TABLE></TD><!--中间通栏结束--><!--<td width="2" background="../../image/lbg1.gif"></td>--><!--右侧通栏开始--></TR></TBODY></TABLE></TBODY></TABLE>
<SCRIPT language=JavaScript
src="CAD世界__Autocad VBA初级教程 (第四课 程序的调试和保存).files/endA.js"></SCRIPT>
</DIV></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -