vb程序设计教程第四版课后答案

1、vb 程序设计教程第四版课后答案 【篇一： visual_basic 程序设计教程 (第 4 版)_课后答案】第一章 习题参考答案一、 填空题1、对象事件驱动2、编译运行模式 解释运行模式二、 简答题1、 简述 vb 的特点。答：可视化的程序设计方法面向对象的程序设计思想事件驱动的编程机制结构化的程序设计语言高度的可扩充性强大的数据库访问能力支持动态数据交换支持对象链接与嵌入2、简述 vb 的安装过程。答：向光驱中放入 vb 安装光盘；计算机将运行自动安装程序，若没有，执行 vb 目录下的setup.exe ； 根据提示逐一回答问题，并点击 “下一步 ”；点击 “完成 ”；2、 如何启动 vb

2、 。答：三种方法：单击 “开始 ”按钮，选择 “程序 ”菜单下的 “microsoft visual basic6.0 中文版 ”菜单项并单击；双击桌面上的 vb6.0 快捷图标；在 “开始 ”菜单的运行对话框中输入命令来启动 vb ；第二章习题参考答案一、选择题：1-10 、 dcacdbcbbc11-20 、badcabbaab21-29 、aacbbcddc二、填空题1 窗体、控件2 属性值3 属性窗口设置、代码窗口设置4 事件过程5 对象名、下划线、事件名6 form_click第三章习题参考答案一、选择题1、b 2、c 3 、a4、b5、a6、c 7、c二、填空题1、 11字符型、字

3、节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。 string 、byte 、integer 、long 、single 、double 、currency 、boolean 、date 、object 、variant2、 双引号(英文)、#3、 ascii 、1、24、 public 、通用、 dim 、static 、private 、static5、 、+、+6、 now() 、time 、日期型三、解答题1、(3) 2 、(1 ) 3、（1）常量（关键字） （2）字符型常量（ 3）逻辑型常量（ 4）变量 （5）字符串常量 （6）变量（7）字符串常量（

4、8）变量（ 9）日期型常量 （题目应是#11/16/1999# ）（10）数值型常量（单精度）4、315、（1）(1+y/x)/(1-y/x) （2）x3+3*x*y/(2-y)（3）sqr(abs(a*b-c3) （4）sqr(s*(s-a)*(s-b)*(s-c)6、7、（1）13 （2）17（3）#1999-11-12# （4）zxy123abc8、（1）19（2）8.16666666666667（3）525（4）2 9、（1）-4 （2）2 . 82842712474619 （3）-3（4）49（5）”hello （”6）he7）16 （8） “-459.65 ”（9）510、（4）1

5、1、（2）12、（4）第四章习题参考答案一、选择题： 17: daabbcd 二、填空题1 500.00%2 将字号扩大为原来的二倍3 b三、编程题（略） 1文本框、标签和命令按钮的名称分别为 text1 、label1 、command1 private sub command1_click() label1.caption=text1.text command1.caption=text1.textend sub2单价、数量、折扣和应付款对应的文本框的名称分别为： text1 、text2 、text3 和 text4 ，计算和清除命令按钮的名称分别为：command1 和 command

6、2 。private sub command1_click() text4=val(text1)*val(text2)*val(text3)end subprivate sub command2_click()text1= ” : text2= ”: text3= ”: text4= ” end sub3文本框、 “转大写 ”命令按钮和 “转大写 ”命令按钮的名称分别为text1 、command1 和 command2 private sub command1_click() text1=ucase(text1)end subprivate sub command2_click()text1

7、=lcase(text1)end sub第五章 习题参考答案一、选择题：111: caabbabbbcc二、填空题1(3) 2 1 2 3 3 223 4 160 5 9678 7 x=5 ( 或 x6 或 x7) 8 b9isum isum+j 1250 三、编程题1private sub form_click() dim i%,s%s=0for i = 101 to 200 step 2if i mod 30 thenprint i s=s+i end if next i print send sub2private sub form_click() dim n%,s s=1:n=0whi

8、le s=400000 n=n+1s=s*n wendif s400000 then n=n-1print n end sub 3private sub form_click()dim imin%,imax%,i%,r%imin=100:imax=20for i=1 to 20 r=int(rnd*51+50)if rimax then imax=rif rimin then imin=rnext iprint imax,iminend sub第六章 习题参考答案一、选择题：113: abaaccbadadbb二、填空题1intervallabel1.caption=time2list1.li

9、stcountinterval三、编程题1. private sub command1_click()if option1.value = true and option3.value = true thentext1.fontname = 宋体 text1.fontsize = 8end ifif option1.value = true and option4.value = true then text1.fontname = 宋体text1.fontsize = 12 end ifif option2.value = true and option3.value = true then

10、 text1.fontname = 黑体text1.fontsize = 8 end ifif option2.value = true and option4.value = true then text1.fontname = 黑体text1.fontsize = 12 end ifend sub hscroll1.max 2.9.timer 的 enable 为 falseinterval 为 100 private sub command1_click()timer1.enabled = trueend sub private sub command2_click()timer1.en

11、abled = falseend subprivate sub timer1_timer() 汽车.left = 汽车.left + 100 end sub第七章 习题参考答案一、选择题：112: dcadd bbdac cb二、填空题142 2 index 3 414a(i)=a(11-i) a(11-i)=tmp51 6 x mod 7=0 7 21080 to 8i+1 to 993 k110 1001max maxarrn(i) ( 或者 arrn(i)max)三、编程题1private sub c1_click() if op1(0).value=true then p1.print

12、 选择“了椭圆形 ” if op1(1).value=true then p1.print 选择“了圆形 ” if op1(2).value=true then p1.print 选择“了正方形 ”end sub2统计按钮名为 command1 ，输入框名为 text1 ，输出框为text2(multline 设为 true) private sub command1_click() dim x(1 to 26) as integer,i as integer dim s as string,l as integer l=len(text1.text)for i=1 to l s=mid(te

13、xt1,i,1) s=ucase(s)if s = a and s = z then【篇二： vb 程序设计教程课后答案 (第三版 )】找。习题二1.对象指现实世界中的实体。每个对象有自己的特征 (属性)、行为(方法)和发生在该对象上的活动 (事件)。类是对同一种对象的集合与抽象。类包含所创建对象的属性数据，以及对这些数据进行操作的方法。封装和隐藏是类的重要特性，将数据结构和对数据的操作封装在一起，类的内部实现细节对用户来说是透明的。vb 工具箱中的可视图标是 vb 系统设计好的标准控件类。通过将控件类实例化，得到真正的控件对象。在窗体上画一个控件，就将类转换为对象，创建了一个控件对象。vb

14、中常用的对象是控件。此外， vb 还提供了系统对象。窗体是个特例，它既是类也是对象。当向一个工程添加一个新窗体时，实质就由窗体类创建了一个窗体对象。对象的三要素：属性、事件和方法。属性：存放对象的数据 (决定对象外观及功能 )对象属性的设置方法：在设计阶段，利用属性窗口直接设置属性值；程序运行时，通过语句对象名.属性名 =属性值。若属性只能在设计阶段设置，在程序运行阶段不可改变，称为只读属性。 事件：发生在对象上的事情。同一事件，对不同的对象，会引发不同的反应。 事件过程：应用程序处理事件的步骤。应用程序设计的主要工作就是为对象编写事件过程的代码。方法：面向对象的程序设计语言，为程序设计人员提

15、供了一种特殊的过程和函数。方法是面向对象的，调用时一定要指明对象。2.窗体和控件具有的基本属性 “(1) name 属性：名称所创建的对象名称 ,在程序中引用。(2) caption 属性：标题该属性决定了对象上显示的内容。(3) height 、width 、top 和 left 属性决定对象的大小和位置。(4) enabled 属性：对象是否允许操作(5) visible 属性：对象是否可见(6) font 属性组：文本的外观fontname 字体、fontsize 大小fontbold 粗体、 fontitalic 斜体fontstrikethru 删除线fontunderline 下划

16、线(7) forecolor 属性：前景颜色(8) backcolor 属性：背景颜色(9) mousepointer 属性：鼠标指针类型 , 设置值范围 015，由系统指定 。若为 99，由用户提供的图形文件定义鼠标指针形状。(10) mouseicon 属性：在 mousepointer 属性值为 99 时，存放自定义的鼠标图标文件（ .ico 或.cur ）。图标库在 graphics 目录下。3.窗体的事件： load 事件是在窗体被装入工作区时触发的事件。当应用程序启动，自动执行该事件，该事件通常用来在启动应用程序时对属性和变量进行初始化。窗体的方法 :（1）print 方法用来显示

17、文本内容，格式： 对象.print 表达式（2）cls 方法清除运行时在窗体或图形框中产生的文本或图形 , cls 方法不能清除窗体在设计时的文本和图形。格式： 对象.cls（3）move 方法可移动窗体或控件，并可改变其大小。语法格式如下：对象.move 左边距离 ,上边距离 ,宽度,高度 4. 标签作用：用于显示文本 (输出)信息，不能作为输入信息的界面。其内容只能通过 caption 属性设置或修改，不能直接编辑。5.文本框是一个文本编辑区域，可以在该区域输入、编辑、修改和显示正文内容。在 vb 中字符长度以字为单位，也就是一个西文字符与一个汉字都是一个字，长度为 1。重要属性 (1)

18、text 显示或输入的正文内容。(2) maxlength 设置文本框可输入的文字最大长度。默认值为 0，表示可以输入任意长字符串。(3) multiline 多行属性 设置为 true 时，文本框可以输入或显示多行正文，同时具有文字处理器的自动换行功能，按 enter 键可插入一空行。(4) scrollbars 滚动条属性0-none 无滚动条1-horizontal 水平滚动条2-vertical 垂直滚动条3-both 同时加水平和垂直滚动条注意：当 multiline 为 true 时，scrollbars 才有效 (5) passwordchar 设置显示文本的替代符。例如，当设置

19、为 “*，”则在文本框输入的内容均以 “*”显示，而存储的值是用户输入的原文。一般用于设置口令的输入。当 multiline 为 true 时，该属性不起作用，密码不允许多行。 (6) locked 指定文本控件是否可被编辑，默认值为 false( 可编辑 )，当设置为 true 时，文本控件相当于标签控件的作用。注意： locked 与 enabled 的区别。(7)文本内容进行选择操作的三个属性selstart 选定的正文开始位置sellength 选定的正文长度seltext 选定的正文内容这 3 个属性互相关联 ,例如设置 selstart 、sellength 后，seltext 自

20、动存放指定的文本。注意：属性窗口中没有这三个属性，只能在程序代码中使用。6.文本框的事件： (1) change 事件：当 text 属性值发生改变时引发该事件 (2) keypress 事件：按下并且释放键盘上的一个键时，引发焦点所在控件的 keypress 事件，所按键的值存放在参数 keyascii 中。对回车的判断 keyascii=137.文本框最有用的方法是 setfocus ，把光标移到指定的文本框中。8.命令按钮 picture 属性：按钮可显示图片文件 (.bmp 和.ico) ，当style 为 1 时有效。10. 启动窗体时将命令按钮定位在窗体中央的代码 private

21、sub form_load()command1.left = form1.scalewidth / 2 - command1.width / 2 command1.top = form1.scaleheight / 2 - command1.height / 2 end sub11vb 图片文件在 c:program filesmicrosoft visualstudiocommongraphics 文件夹。安装 vb 时可选择是否安装这些图片文件。习题三1. 合法常量：(1) double(2) 错误 (3) double(4) double(5) 错误(6) integer(7) stri

22、ng (8) string (9) date (10) double(11) 错误（汉字字符）(12)integer( 八进制)(13) 错误（八进制无数码 8） (14) integer(15) boolean(16) 错误(17) 错误（十六进制无数码 g） (18) single 说明：浮点型变量默认为 double 类型而非 single 。2. 合法变量名： (1) (2) (3) 误：数字开头(4) 误：含空格(5) 误：关键字 (6) (7) 误：关键字(8) 误：有括号 (9) (10) (11) (12) （汉字字符可作为变量名，但不常用，且此名称易误解）变量命名规则见 p.

23、41-42 。字母（汉字）开头，字母（汉字）、数字、下划线组成，长度为 1-255 个字符；关键字不可作为变量名，但可在变量名中嵌入关键字；不区分大小写。常量、数组、类型、函数、过程、对象命名规则与此相同。常量名通常全用大写。3. 写 vb 表达式(1) abs(x + y) + z 5 (2) (1 + x * y) 6(3) (10 * x + sqr(3 * y) / (x * y)(4) (-b + sqr(b 2 - 4 * a * c) / (2 * a)(5) 1 / (1 / r1 + 1 / r2 + 1 / r3)(6) sin(45 * 3.14159 / 180) +

24、(exp(10) + log(10) / sqr(x + y + 1)【篇三： vb 程序设计教程课后答案】二章：1、 简述 vb6.0 的主要特点答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。 2、 当正常安装 vb6.0 后，误把 windows 子目录删除。当重新安装 windows 后，是否需要再次安装 vb6.0 ？ 答：要重新安装的。因为安装 vb6.0 时，有些 vb 程序被系统自动安装在 windows 目录下，所以一旦删除 windows 子目录

25、，就必须重 新安装 vb6.0 。3、 visual basic 6.0 分为学习版、专业版和企业版，如何知道所安装的是哪个版本？答：在 vb6.0 的启动界面上，能显示对应的版本。 4、 叙述建立一个完整应用程序的过程答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。5、 visual basic 6.0 有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？答：选择 “视图 ”“代码窗口 ”命令或单击 “工程资源管理器 ”窗口中的“查看代码 ”按钮。 6、 当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。试问

26、该工程涉及多少个要保存的文件？若要保存该工程的所有文件，应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？ 答：涉及两个文件要保存。先保存窗体文件（ .frm ），再保存工程文件（ .vbp ）。若先保存工程文件，系统也会先弹出 “文件另存为 ”对话框，要求先保存窗体文件。 7、保存文件时，若不改变目录名，则系统默认的目录是什么？答：系统默认的目录是 vb988、 安装 visual basic 6.0 后，帮助系统是否也已安装？ 答：没有。 vb6.0 的帮助系统在两张光盘上，即 msdn library ，其中还包含了 vc 、vfp 等其他语言的帮助系统。9、 如何使用

27、visual basic 6.0 的帮助系统？ 答：最方便的方法是选定要帮助的内容，然后按 f1 功能键，这时系统打开 msdn library 查阅器，直接显示与选定内容有关的帮助信息。10、 什么是类？什么是对象？什么是事件过程？答：类是同类对象集合的抽象，它规定了这些对象的公共属性和方法； 对象是类的一个实例，对象包含三个要素：属性、方法和事件。当在对象上发生了事件后，应用程序就要处理这个事件，而处理的步骤就是事件过程。 11、 属性和方法的区别是什么？答：属性是对象的特征，方法是对象的行为。前者有值，可以被赋值或引用；后者没有值，表示能够执行的操作。12、 当标签边框的大小由 capt

28、ion 属性的值进行扩展或缩小时，应对该控件的什么属性进行何种设置？答：将该控件的 autosize 属性值设置为 true 。13、 在 vb6.0 中，命令按钮的显示形式可以有标准的和图形的两种选择，它们通过什么属性来设置？若选择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是caption 属性设置的文字，应怎样修改？ 答：命令按钮的显示形式通过将 style 属性值设置为 graphical 来实现。 通过 picture 属性来装入图形。 不能显示图形是因为 style 属性值被设置为 standard ，只要将其改为

29、graphical ，并且将 caption 的值设置为空即可。14、 如果文本框要显示多行文字，应对什么属性设置为何值？答：将 multiline 属性的值设置为 true 。 15、 标签和文本框的区别是什么？答：在程序运行时，标签只能显示文字，不能输入文字，显示文字通过对 caption 属性赋值来实现；而文本框既能显示文字，也能输入文字，这通过 text 属性来实现。 16 、 要让文本框获得焦点的方法是什么？答：setfocus 方法。17、 简述文本框的 change 和 keypress 事件的区别答：相同点是当在文本框输入内容时，同时激发上述两个事件；不同点是 keypress

30、 事件可通过参数 keyascii 返回所按键的编码值，可依此判断数据输入的正确性或数据输入结束与否，因而该事件使用较多； change 事件还可以发生在程序改变文本框的 text 属性时。18、 当某文本框输入数据后（按了回车键），经判断后认为是数据输入错，应怎样删除原来文本框中的数据？答：假定文本框的名称为 text1 ，则事件过程如下： private sub text1_keypress(keyascii as integer ) if keyascii = 13 thenif 出错条件判断成立 then text1= end if ?end if end sub注意：删除刚输入的字符

31、，通过 keyascii=0 语句实现；焦点定位文本框对象采用 setfocus 方法。19、 在程序运行前，对某些控件设置属性值，除了在窗体中直接设置外，还可以通过代码设置，这些代码 一般存放在什么事件中？如果要将命令按钮定位在窗体的中央，试写出事件过程代码。 答：这些代码一般放在 forem_load （）事件过程中。将窗体定位在屏幕的中央，只能在属性窗口中将 form1 窗口的 startupposition 属性值设置为 2（表示屏幕中心），该属性不能在运行时设置。 要将按钮定位在窗体的中央，事件过程如下：private sub form_load() command1.left= f

32、orm1.scalewidth2-command1.width2 command1.top = form1.scaleheight 2 command1.height 2end sub 其中， scalewidth 、scaleheight 表示窗体的相对宽度和高度。 20、 vb6.0 提供的大量图形文件存放在哪个目录？若你的计算机上没有安装，应怎样安装这些图形文件？ 答：存放在 graphics 目录下。在 vb6.0 的安装盘上可以找到graphics 子目录，将其复制到硬盘上的 vb 目录下。 第 3 章：略（在书本上） 1、 合法的有：（ 1）单精度（ 3）单精度（4）双精度（ 6）

33、整形（ 7）字符型（ 9）日期型（ 10）双精度（ 12） 八进制表示（ 14）十六进制表示（ 15）逻辑型（ 18）单精度数 2、合法变量有：（ 1），（ 2），（6），（ 9），（ 10），（ 11）3、 算术表达式写成 vb 表达式（1）| x+y | + z5? abs(x+y) +z5 （2）(a+xy)6 ? （1 + x * y ） 6（3） ? (10*x + sqr(3*y) ) / (x * y ) （4）? ( -b+sqr(b2- 4*a*c) )/2/a（5）?1 / (1/r1+1/r2+1/r3)（6）? sin(45*3.14/180)+ ( exp(10)+

34、log(10) )/ sqr( x+y+1)4、 根据条件写出相应的 vb 表达式 (1) chr( int ( rnd * 10 +67 ) (2) int ( rnd * 101 +100 ) (3) x * y 0 (4) x%5=0 or x % 7 =0 (5) (x mod 10) 10 + x/10(6)round(123.2389*100)/100 (7) ucase (c ) = a anducase(c )= z or lcase (c ) = a and lcase(c )= z (8) mid ( s, 56 ) (9) x =10 and x 20 (10) ( x

35、z and y z ) or ( x z and y z) (11) xzand y z5、 下出下列表达式的值 :（1） 123+23 mod 10 7 +asc( a) ? 188, （2） 100+100100 ?200100 （3） int ( 68.555*100+0.5)/100 ? 68.56 （4） 已知 a$=“87654321，求表达式 val(left$(a$,4)+ mid(a,4,2)的值? 876554 （5）dateadd( m,1,#1/30/2000#) ? 2000 -2-29 （6） len （vb程序设计）? 6 6 、 略第 4 章：vb 控制语句1、

36、结构化程序设计的三种基本结构是什么？答：顺序结构、选择结构和循环结构。2、 指出下列赋值语句中的错误（包括运行时错误）：（1）10x=sin(x)+y ?10x 是非法变量名 （2）c=3+sqr(-3) ? 待求平方根的数为负数 （3）c+x+y=c*y 赋值符左边是表达式了 （4） x=sin(x)/(20 mod 2) ? 分母为零了3、 msgbox 函数与 inputbox 函数之间有什么区别？各自获得什么值？ 答：两个函数共同之处都显示对话框。区别： inputbox 函数等待用户在文本框中输入数据，获得的是输入的字符串数据； msgbox 函 数等待用户按一按钮，获得的是表示按钮

37、的整数值，以决定程序的流向。 4、 要使单精度变量 x,y,z 分别保留 1 位、2 位、3 位小数，并在窗体显示，应使用什么函数？如何编写对应的print 方法？ 答：使用 format 函数，具体如下： print format(x, 0.0 )print format ( y , 0.00 ) print format ( z , 0.000 ) 5、语句 if 表达式 then 中的表达式可以是算术、字符、关系、逻辑表达式中的哪些？答：算术、关系、逻辑表达式 6、 指出下列语句中的错误：（1） if x y then print x? 表达式书写错误，应写成： x=y （2） if10

38、x20 then x=x+20 ? 表达式书写错，应是： 10x and x207、按照下列条件，写出相应的条件语句 （1）字符型变量中第三个字符是 “c”时，利用 msgbox显示“yes”，否则显示 “no”if mid ( c , 3, 1 ) = c then msgbox yes elsemsgbox no（2）利用 if语句、select case语句两种方法计算 分段函数：y = x * x + 3 * x +2 elseif x=10 theny = sqr ( 3 * x ) 2elseif x0 theny= 1 / x + abs ( x ) end ifprint y

39、end sub （3）利用 if 语句和 iif 函数两种方法求三个数 x,y,z 中的最大值并存入变量 max 中。 if xy then max=x else max = y if zmax thenmax = z max = iif ( xy , x , y ) : max = iif ( max z, max , z ) 8、 在多分支结构的实现中，可以用 if?then?elseif?endif 形式的语句，也可以用 select case?endselect 形式的语句，由于后者的条件书写更灵活、简洁，是否完全可以取代前者？ 答：虽然 select case?end select 形式的语句中条件书写更灵活、简洁，程序可读性强，但使用它有限制。（适合于对一个变量判断的） 首先，看该语句的形式： select case 变量或表达式 cas