vb课后参考答案汇总

习题1一.单项选择题（要求在四个备选答案中选出一个正确答案）1．Visual Basic是一种（ D ）的可视化程序设计语言。

A．面向机器 B．面向过程 C．面向问题 D．面向对象2.在VB中，下面被称为对象的是（ C ）A. 窗体B.控件C. 窗体和控件D. 窗体、控件、属性3．以下说法正确的是（ A ）A.对象的可见性可设为1或0B.标题的属性值可设为任何文本C.如果属性的值不设置，默认为空D.属性窗口中属性只能按字母顺序排列4．为了在属性窗口中设置窗体的属性，预先要执行的操作是（ A ）。

A．单击窗体上没有控件对象的地方 B．单击任一个控件对象C．双击任一个控件对象 D．双击窗体上没有控件对象的地方5．要设置窗体上各控件的属性，可在（ C ）中进行。

A．窗体布局窗口 B．工程资源管理器窗口C．属性窗口 D．窗体窗口6．在代码窗口中，当从对象框中选定了某一对象后，在（ A ）中会列出适用该对象的事件。

A．过程框 B．属性窗口 C．工具箱 D．工具栏7．创建一个简单的应用程序，该程序只有一个窗体，则该工程至少有（ B ）个文件需要保存。

A．1 B．2 C．3 D．48．程序运行中用鼠标双击当前窗体时，会触发窗体的（ C ）事件。

A．Load B．Unload C．DblClick D．KeyPress9．在Visual Basic 6.0集成开发环境中，可以（ D ）。

A．编辑、调试、运行程序，但不能生成可执行程序B．编辑、运行程序，生成可执行程序，但不能调试程序C．编辑、调试程序，生成可执行程序，但不能运行程序D．编辑、调试、运行程序，并能生成可执行程序10．以下叙述正确的是（ C ）。

A．用属性窗口只能设置窗体的属性B．用属性窗口只能设置工具箱中标准控件的属性C．用属性窗口可以设置窗体和控件的属性D．用属性窗口可以设置任何对象的属性11.在VB程序运行期间，若改变窗体大小，则自动触发的窗体事件是（ B ）A. ClickB. ResizeC. LoadD. Unload12.以下为窗体文件扩展名的是（ C ）A. .basB. .clsC. .frmD. .ers13.能确定控件尺寸的是（ A ）A.Width和HeightB.Top和LeftC. Width或HeightD.Top或Left二. 多项选择题（要求在五个备选答案中选出多个正确答案）1．下列论述中，正确的是（ ACDE ）。

1、B2、A3、B4、答：属性：红色、充满氢气；事件：松手、针刺；方法：飞走、爆破。

5、答：事件是指对象能够识别并作出反映的外部刺激。

事件驱动又称消息驱动，事件驱动程序设计是指每个事件对应有相应的程序代码，仅在该事件发生时，该段代码才会被执行。

事件发生的顺序决定了代码执行的顺序，因此每次执行应用程序时，程序代码并不是按照程序编写的顺序来执行的。

6、答：VB是一个包括界面设计、程序编码、调试、编译并创建可执行程序的集成开发环境。

VB的集成开发环境的主界面中包含：标题栏、菜单栏、工具栏、控件箱、工程资源管理器、属性窗口、“窗体布局”窗口、窗体设计器、代码编辑器等元素组成。

7、答： VB菜单条通常情况下有：文件、编辑、视图、工程、格式、调试、运行、查询、图表、工具、外接程序、窗口、帮助等13项菜单项组成。

8、答：工具栏可自行定义。

标准工具栏中通常情况下有：添加标准exe工程、添加窗体、菜单编辑器、打开工程、保存工程、剪切、复制、粘贴、查找、撤消、重复、启动、中断、结束、工程资源管理器、属性窗口、窗体布局窗口、对象浏览器、工具箱、数据视图窗口、可视化元件管理器等按钮组成。

9、答：创建VB应用程序的一般步骤为：创建界面；设置窗体和控件属性；编写代码；保存工程；运行并调试程序；检查并排除错误；创建可执行文件。

10、Private Sub Command1_Click()Label1.Caption = "I love vb,I hate vb"End Sub1、2、3、S1 输入待判断自然数： N（N>=2）；S2 i=2；S3 判断i是否小于N-1，若不是转S5S4 判断N除以i的余数是否为0,如果不是则i=i+1转S3；S5 判断i是否等于N，若是输出“是素数”，否则输出“不是素数”。

4、S1 输入待判断自然数： N；S2 将N转换成字符S，计算S的长度K；S3 i=1；S4 判断i是否小于K-1，若不是转S6；S5 判断S中的第i位和第K-i+1位是否相等,如果是则i=i+1转S4，如果不是则转S6；S6 判断i是否是中间位数，若是输出“是回文数”，否则输出“不是回文数”。

VB程序设计教程课后参考答案习题一一、填空题1．对象、事件驱动2．窗体、控件3．属性4．属性窗口、编程设置5．事件过程6．对象名、下划线、事件名7．Form_click8．Print form1.print “我的VB”9．主窗口、属性、工具箱、代码、窗体、工程资源管理10．菜单、快捷键二、选择题1．C 2. A 3. B 4. B 5. D 6. B C 7. A 三、简答题（略）习题二一、选择题1. D2. C3. C4. B5. C6. B7. C8. B 9. A 10. B 11. B 12. C 13. D 14. B15. A 16. A 17. A 18. A 19. B 20. C 21. A22. B 23. B 24. A 25. C 26. A 27. B 28. B29. C 30. B 31. D 32. D 33. C二、填空题1．Controlbox、Maxbutton、Minbutton2．Multiline TRUE3．******4．单文档界面（SDI）多文档界面（MDI）5．窗体显示6．Passwordchar7．_change()三、编程题（略）习题三一、基础知识题（略）二、填空题1．整型、长整型、单精度、双精度2．(x mod 10)*10+x\103．Sin(3.14*15/180)+sqr(x+exp(3))/abs(x-y)-log(3*x)4．(a+b)/(1/(c+5)-c*d/2)5．X mod 5=0 or x mod 9=06．False7．-4、3、－3、3、－4、48．CDEF10．TRUE11．变量、属性12．‘_ :13．(略)14．“”＃15．Public、通用/模块、Dim、static、private16．+ 、&、+17．Now() 、time()、日期18．Inputbox()、字符串、val()19．Msgbox()三、选择题1．B 2. C 3. A 4. B D此题有误 5. B 6. A7. D 8. B 9. B 10. C 11. D 12. B13. C 14. B 15. A 16. C 17.A 18. D19. A 20. D 21. A 22. C 23. C 24. D25. A 26. D 27. D 28. B 29. C 30. B31. C 32. B 33. C D此题有误34. C 35. A36. D 37. C 38. A 39. B 40. A 41. C42. C 43. D 44. C 45. D 46. A四、编程题1.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%, delta%Dim x1#, x2#, x#a = Val(InputBox("please input data to a:", "info", 1))b = Val(InputBox("please input data to b:", "info", 1))c = Val(InputBox("please input data to c:", "info", 1))If a = 0 And b <> 0 Thenx = -c / bPrint "所构成的方程是：" & b & "x" & "+" & c & "=0"Print "该一元一次方程的根是：", xEnd IfIf a = 0 And b = 0 ThenPrint "很抱歉，不能构成合法的方程！"End IfIf a <> 0 Thendelta = b * b - 4 * a * cIf delta >= 0 Thenx1 = (-b + Sqr(delta)) / (2 * a)x2 = (-b - Sqr(delta)) / (2 * a)Print "所构成的方程是：" & a & "x2" & "+" & b & "x" & "+" & c & "=0"Print "该方程的根是："Print "第一个根是：", x1Print "第二个根是：", x2Else2Print "该方程有两个虚根："Print "第一个虚根是：" & -b / (2 * a) & "+" & Sqr(Abs(delta)) / (2 * a) & "i"Print "第二个虚根是：" & -b / (2 * a) & "－" & Sqr(Abs(delta)) / (2 * a) & "i" End IfEnd IfEnd Sub2.Option ExplicitPrivate Sub Command1_Click()Dim i%, s%s = 0For i = 1 To 99 Step 2s = s + iNextPrint sEnd Sub3.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#s = 0For i = 1 To 100s = s + 1 / i * (-1) ^ (i + 1)NextPrint sEnd Sub4.Option ExplicitPrivate Sub Command1_Click()Dim i%, n%Dim t#, s#n = Val(InputBox("please input data:", "info", 5))s = 0t = 1For i = 1 To nt = t * is = s + tNextPrint sEnd Sub5.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%Dim p#, s#a = Val(InputBox("please input data to a:", "info", 3))b = Val(InputBox("please input data to b:", "info", 4))c = Val(InputBox("please input data to c:", "info", 5))If (a + b > c And Abs(a - b) < c) Or (a + c > b And Abs(a - c) < b) Or ((b + c) > a And Abs(b - c) < a) Thenp = (a + b + c) / 2s = Sqr(p * (p - a) * (p - b) * (p - c))Print "三角形的面积是：" & sElsePrint "很抱歉，不能构成合法的△三角形！"End IfEnd Sub6.Option ExplicitPrivate Sub Command1_Click()Dim ji%, tu%For ji = 1 To 27For tu = 1 To 27If ji * 2 + tu * 4 = 78 And ji + tu = 27 ThenPrint "鸡的个数是：" & jiPrint "兔的个数是：" & tuEnd IfNextNextEnd Sub7.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#, t#s = 10t = 10For i = 1 To 7t = t * 0.4s = s + t * 2NextEnd Sub8.Option ExplicitPrivate Sub Command1_Click()Dim i%, fs%, max%, min%, s%Dim ave#fs = Val(InputBox("please input score:", "info", 90))s = fsmax = fsmin = fsFor i = 2 To 7fs = Val(InputBox("please input score:", "info", 90))If max < fs Thenmax = fsEnd IfIf min > fs Thenmin = fsEnd Ifs = s + fsNextave = (s - max - min) / 5Print "该运动员的平均成绩是：" & aveEnd Sub9. ‘同学们，这道题方法很多，主要考察你对选择结构的理解，我给出其中一种方法。

※<习题一>1．计算机硬件系统和软件系统各由哪些部分组成？分别说明其功能与作用。

2．信息在计算机内如何表示，存储容量如何计算？3．Windows系统中有哪些常见的操作对象？4．操作系统的功能、作用与地位如何？5．Windows系统中文件是如何进行管理的？6．如何获取和运行应用程序？5※<习题二>1．叙述建立一个完整的VB应用程序的过程。

2．当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。

问该工程涉及到多少文件要保存？3．解释什么是类、对象、对象属性、事件与事件过程、方法。

4．VB开发环境中有哪些窗体，各有哪些用途？5．使用VB开发环境牵涉到哪几种模式，并描述各自的作用？6．VB中的错误种类有哪些？如何调试程序？如何使用帮助系统？5※<习题三>习题（一）判断题：1、VB的Byte类型数据的数值范围，在-255到255之间。

(F)2、VB的Double类型数据，可以精确表示其数值范围内的所有实数。

(F)3、Variant是一种特殊的数据类型，该类型变量可以存储除了定长字符串数据及自定义类型外的所有系统定义类型的数据。

Variant类型变量还具有Empty、Error和Null等特殊值。

（T）4、函数MsgBox的前三个参数，分别为图标样式、按钮样式以及默认按钮。

（F）5、在自定义函数过程中，函数名必须被赋值。

（F）6、在Open语句中用Append方式所打开的文件若不存在，则创建该文件。

（T）7、在Open语句中用Input方式所打开的文件必须已经存在，否则会运行错误。

（T）8、“A=B=C”是一个合法的Visual Basic语句。

（T）9、在窗体或模块文件中声明为Private的过程，只能被本窗体或模块中的过程所调用。

（T）10、静态变量是局部变量，当过程再次被执行时，静态变量的初值是上一次过程调用后的值。

（T）11、在VB中，用Dim定义数组时数组元素也自动赋初值0。

VB课后习题解答第一、二章：1、简述VB6.0的主要特点答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。

2、当正常安装VB6.0后，误把Windows子目录删除。

当重新安装Windows后，是否需要再次安装VB6.0？答：要重新安装的。

因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。

3、Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？答：在VB6.0的启动界面上，能显示对应的版本。

4、叙述建立一个完整应用程序的过程答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。

5、Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。

6、当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。

试问该工程涉及多少个要保存的文件？若要保存该工程的所有文件，应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？答：涉及两个文件要保存。

先保存窗体文件（.frm），再保存工程文件（.vbp）。

若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。

7、保存文件时，若不改变目录名，则系统默认的目录是什么？答：系统默认的目录是VB988、安装Visual Basic 6.0后，帮助系统是否也已安装？答：没有。

VB6.0的帮助系统在两张光盘上，即MSDN Library，其中还包含了VC、VFP等其他语言的帮助系统。

9、如何使用Visual Basic 6.0的帮助系统？答：最方便的方法是选定要帮助的内容，然后按F1功能键，这时系统打开MSDN Library查阅器，直接显示与选定内容有关的帮助信息。

<大学程序设计基础-Visual Basic>教材课后习题答案第1章一、选择题1 2 3 4 5 6 7B D BC B B D第2章一、选择题1 2 3 4 5 6 7 8 9 10B C B C B C A A A A11 12 13 14A B A A二、填空题1.rem或’ _ ：2.“” # #3.5x2-3x-2sinA/34.3214565.300三、操作题1、程序段：Private Sub Command1_Click()Dim x As Integer, y As IntegerDim s As Long, c As Longx = Text1.Texty = Text2.Texts = x * yc = (x + y) * 2Label3.Caption = "长方形的面积为" + Str(s)Label4.Caption = "长方形的周长为" + Str(c)End Sub3、程序段：Private Sub Command1_Click()Text1.Text = "第一"End SubPrivate Sub Command2_Click()Text1.Text = "第二"End Sub4、程序代码：Private Sub Text1_Change()Text1.MaxLength = 10End Sub5、程序代码：Private Sub Text1_Click()Text1.SelStart = 0Text1.SelLength = Len(Text1.Text)End Sub第3章一、选择题1 2 3 4 5 6 7D A D B A D B二、填空题1. False2.B^2-4*a*c else三、操作题1．从键盘输入三个值，判断它们能否构成三角形的三个边。

如果能构成一个三角形，则计算三角形的面积。

1. 选择题(1) 假定窗体的名称（Name属性）为Form1，则把窗体的标题设置为“VB Test”的语句为（B）。

A. Form1="VB Test"B. Caption="VB Test"C. Form1.Text="VB Test"D. ="VB Test"(2) 下列不能打开代码窗口的操作是（D）。

A．双击窗体上的某个控件B．双击窗体C．按F7键D．单击窗体或控件(3) 为了保存一个Visual Basic应用程序，应当（D）。

A．只保存窗体文件（.frm）B．分别保存工程文件和标准模块文件（.bas）C．只保存工程文件（.vbp）D．分别保存工程文件、窗体文件和标准模块文件(4) 为了装入一个Visual Basic应用程序，应当（C）。

A．只装入窗体文件（.frm）B．分别装入工程文件和标准模块文件（.bas）C．只装入工程文件（.vbp）．D分别装入工程文件、窗体文件和标准模块文件(5) 不为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为（A）。

A．1 B．2 C．3 D．42. 填空题(1) 在用Visual Basic开发应用程序时，通常首先需要新建工程、其次还要经过、、、和5步。

(2) 控件和窗体的Name属性只能通过属性窗口设置，不能在运行期间设置。

(3) 代码窗口分为左右两栏，左边一栏称为对象，右边一栏称为事件。

(4) 为了在输入程序时能自动进行语法检查，必须执行菜单中的命令，打开对话框，然后选择“编辑器”选项卡中的选项。

(5) 在保存VB应用程序中，窗体文件和工程文件的扩展名分别为 .frm 和.vbp 。

(6) 为了把一个Visual Basic应用程序装入内存，只要装入工程文件即可。

(7) Visual Basic应用程序通常由3类模块组成，即、和。

(8) 在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click( )Text1.Text=“VB Programming”Text2.Text=Text1.TextText1.Text=“ABCD”End Sub程序运行后，单击命令按钮，两个文本框中显示的内容分别为ABCD 和VB Programming 。

第一章一选择题1 Visual Basic采用了()的编程机制(A) 面向过程（B）面向对象（C）事件驱动（D）可视化2 以下不属于Visual Basic 版本的是（）（A）学习版（B）企业版（C）专业版（D）工程版3 Visual Basic从（）版本开始推出中文版（A）2.0 （B）3.0 （C）4.0 （D）5.04 Visual Basic6.0是一个（）位应用程序的开发工具（A）8 （B）16 （C）32 （D）645 退出Visual Basic集成开发环境的快捷键是（）（A）Ctrl+Q （B）Alt+Q （C）Alt+A （D）Ctrl+A6 Visual Basic集成开发环境由种工作状态，不属于3种工作状态之一的是（）（A）设计状态（B）运行状态（C）中断状态（D）编写代码状态7 在Visual Basic集成开发环境下不能激活属性窗口的操作是（）(A) 在执行“工程”菜单中的“属性窗口”菜单命令(B)执行“视图”菜单中的“属性窗体”菜单命令(C)在对象上右击，从弹出的快捷菜单中选择“属性窗口”菜单命令(D) 按下快捷键F48 在设计阶段，当双击窗体设计器中窗体上的某个控件时，所打开的窗口是（）（A）工具箱窗口（B）属性窗口（C）工程资源管理器窗口（D）代码编辑窗口9 当新建一个工程并启动Visual Basic后，工具箱中的控件是（）（A）内部控件（B）ActiveX控件（C）内部控件和ActiveX控件（D）内部控件或ActiveX控件10 下列可以打开立即窗口的操作的是（）（A）Ctrl+R （B）Ctrl+C （C）Ctrl+O （D）Ctrl+G11 在新建一个“标准EXE”工程后,不在工具箱中出现的控件是（）（A）通用对话框（B）列表框（C）文本框（D）命令按钮12 如果要向工具箱中加入ActiveX控件，可以执行“工程”菜单中的（）命令（A）引用（B）部件（C）工程属性（D）添加窗体13 Visual Basic规定窗体文件的扩展名是（）（A）.fom （B）.vbp （C）.bas （D）.frm14 Visual Basic规定标准模块文件的扩展名是（）（A）.frm （B）.vbp （C）.bas （D）.vbg15 下列不能打开工具箱窗口的操作是（）(A) 按下F8快捷键(B)按下Alt键不放开，先按下V键再按下X键(C)执行“视图”菜单中的“工具箱”菜单命令按钮(D)单击“工具箱”上的“工具箱”按钮16 以下可以产生工程组文件（.vbg）的情况是（）（A）当一个程序中包含了两个以上的窗体时（B）当一个程序中包含了两个以上的标准模块时(C) 当一个程序中包含了两个以上的工程时(D)当一个程序中包含了两个以上的类模块时。

第5章数组与记录5.1 填空题1.若要定义一个包含10个字符串元素,且下界为1的一维数组s,则数组说明语句为(。

答案:Dim s(1 To 10 As String2.若要定义一个元素为整型数据的二维数组a,且第一维的下标从0到5,第二维下标从-3到6,则数组说明语句为(。

答案:Dim a(0 To 5,-3 To 6 As Integer3.如果数组元素的下标值为实数,则VB系统会按(进行处理。

答案:四舍五入原则4.数组元素个数可以改变的数组称为(;数组元素可以存放不同类型数据的数组称为(。

答案:可调数组、可变类型数组5.数组刷新语句用于(。

若被刷新的数组是数值数组,则把所有元素置(;若被刷新的数组为字符串数组,则把所有元素置(。

答案:清除指定数组内容、0、空字符串10.控件数组是由一组类型和(相同的控件组成,共享(。

答案:名字、同一个事件过程11.控件数组中的每一个控件都有唯一的下标,下标值由(属性指定。

答案:Index12.建立控件数组有两种方法:(和(。

答案:在设计阶段通过相同Name属性值来建立、在程序代码中使用Load方法5.2 选择题1.下列一维数组说明语句错误的是(。

a Dim b(100 AS Doubleb Dim b(-5 To 0 AS Bytec Dim b(-10 To –20 AS Integerd Dim b(5 To 5 AS String答案:c2.若有数组说明语句为:Dim a(-3 To 8,则数组a包含元素的个数是(。

a 5b 8c 11d 12答案:d3.设有数组说明语句:Dim c(1 To 10,则下面表示数组c的元素选项中(是错误的。

a c(i-1b c(5+0.5c c(0d c(10答案:c4.下列数组说明语句中正确的是(。

a Dim a(-1 To 5,8AS Stringb Dim a(n,nAS Integerc Dim a(0 To 8,5 To –1AS Singled Dim a(10,-10AS Double答案:a5.设有数组说明语句:Dim b(-1To2,-2To2,则数组b中元素的个数是(。

VB习题答案（1-3章）习题一一、选择题1．C 2.C 3.A 4.C 5.C 6.C 7.B二、填空题1.学习版、专业版、企业版2.窗体界面3.Alt+F4三、简答题1．简述Visual Basic语言的特点。

Visual Basic是Windows操作平台下的可视化编程语言，它继承和发展了BASIC语言的基本功能，具有简单易学、功能强大等特点。

Visual Basic提供了可视化设计工具，以图形用户界面（GUI）为PC机用户提供了一个直观的工作环境。

支持面向对象的程序设计（OOP），采用事件驱动方式，提供对象的链接与嵌入（OLE）和访问数据库等功能。

2. Visual Basic 6.0的集成开发环境由哪些部分组成，各部分的主要功能是什么？1. 标题栏：用来显示打开的工程名称和系统的工作状态。

2. 菜单栏：菜单栏中包括“文件”、“编辑”、“视图”、“工程”、“格式”、“调试”、“运行”、“查询”、“图表”、“工具”、“外接程序”、“窗口”和“帮助”共有13个菜单项。

这是一组下拉式菜单，提供了设计、编辑、编译和调试应用程序所需要的绝大部分功能和命令。

3. 工具栏： Visual Basic 6.0提供了“编辑”、“标准”、“窗体编辑器”和“调试”4种工具栏。

工具栏上形象直观的排列着一些最常用的命令按钮，对应特定的常用操作命令。

4. 控件箱：控件箱提供了一组控件。

设计界面时，用户可以用鼠标双击控件箱中的控件，在窗体中画出该控件，或用鼠标单击控件箱中的控件，然后在窗体中拖动鼠标画出所需的控件。

5. 窗体设计器：窗体设计器是应用程序最终面向用户的窗口。

各种控件、图形、数据以及程序的运行结果都在窗体设计器窗体中显示出来。

6. 工程资源管理器：在工程资源管理器窗口中（图1-2），列出了应用程序的工程以及工程中的窗体和模块。

7. 属性窗口：属性窗口主要用来设置Visual Basic窗体及各控件的属性特征，属性窗口的主体部分分为左右两列，左边是控件的属性名列表，右边是控件的属性值列表。