VisualBasic程序设计教程第三版课后习题答案 - 图文

《VB程序设计》综合复习资料

第一章 Visual Basic程序设计概述

一、填空题

1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。

2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。

3、执行“工程”菜单下的__________命令，可选择并添加ActiveX控件。 4、Visual Basic 6.0用于开发__________环境下的应用程序。

二、选择题

1、下面不是VB工作模式的是（ ）

A．设计模式

B．运行模式

C．汇编模式

D．中断模式

2、可视化编程的最大优点是（ ）

A．具有标准工具箱

B．一个工程文件由若干个窗体文件组成 C．不需要编写大量代码来描述图形对象 D．所见即所得

3、下列不能打开属性窗口的操作是（ ）

A．执行“视图”菜单中的“属性窗口”命令 B．按F4键 C．按Ctrl+T D．单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是（ ）

A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G 5、Visual Basic的编程机制是（ ）

A．可视化 B．面向对象 C．面向图形 D．事件驱动

三、简答题

1、代码窗口主要包括哪几部分？

2、在工程资源管理器窗口中，主要列出了哪三类文件？ 3、窗体布局窗口的主要用途是什么？ 4、VB的基本特点是什么？ 5、怎样理解可视化设计？ 6、怎要理解事件驱动编程？

第二章 简单的VB程序设计

一、填空题

1、设置是否可以用Tab键来选取命令按钮，应该用______________属性。

2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。

3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点。

4、设置控件背景颜色的属性名称是______________________。 5、所有控件都具有的共同属性是__________________属性。

6、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_______________。 7、VB中的每个对象（控件）都有一组特征，这组特征称为__________，我们通过修改它可以控制对象的外观和操作。

8、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_____________文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。

9、VB有三种工作模式，分别是设计（Design）模式、_____________和中断（Break）模式。

二、选择题

1、以下能够触发文本框Change事件的操作是（ ）

A．文本框失去焦点

B．文本框获得焦点 D．改变文本框的内容

C．设置文本框的焦点

2、应用程序设计完成后，应将程序保存，保存的过程是（ ）

A．只保存窗体文件即可 B．只保存工程文件即可

C．先保存工程文件，之后保存窗体文件

D．先保存窗体文件（或标准模块文件），之后还要保存工程文件 3、VB应用程序的运行模式是（ ）

A．解释运行模式

B．编译运行模式

C．两者都有

D．汇编模式

4、任何控件都具有的属性是（ ）

A．TEXT

B．CAPTION

C．NAME

D．FORECOLOR

5、决定控件上文字的字体、字形、大小及效果的属性是（ ）

A．TEXT

B．CAPTION

C．NAME

D．FONT

6、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的（ ）设置为0

A．INDEX

B．TABINDEX

C．TABSTOP

D．ENABLED

7、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的（ ）事件

A．CLICK

B．DBLCLICK

C．GOTFOCUS

D．CHANGE

8、在运行时，按TAB键跳过了一个可以获得焦点的控件（如文本框），则可能是因为（ ）

A．该控件的TABSTOP属性值为TRUE B．该控件的TABINDEX属性值为FALSE C．该控件的ENABLED属性值为TRUE D．该控件的ENABLED属性值为FALSE 9、为了防止用户随意将光标置于控件上，应（ ）

A．将控件的TABINDEX属性设置为0 B．将控件的TABSTOP属性设置为TRUE C．将控件的TABSTOP属性设置为FALSE D．将控件的ENABLED属性设置为FALSE

10、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（ ）属性

A．BACKCOLOR C．FORECOLOR

B．BORDERSTYLE D．BACKSTYLE

11、如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（ ）

A．文本框的MULTILINE属性值为TRUE B．文本框的LOCKED属性值为TRUE C．文本框的MULTILINE属性值为FALSE

D．文本框的LOCKED属性为FALSE

12、在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是（ ）

A．Private Sub Text1_GotFocus( )

Text1.SelStart=0

Text1.Sellength=Len(Text1.Text) End Sub

B．Private Sub Text1_LostFocus( ) Text1.SelStart=0

Text1.Sellength=Len(Text1.Text) End Sub

C．Private Sub Text1_Change( ) Text1.SelStart=0

Text1.Sellength=Len(Text1.Text) End Sub

D．Private Sub Text1_SetFocus( )

Text1.SelStart=0

Text1.Sellength=Len(Text1.Text) End Sub

13、Visual Basic继承了Basic语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（ ）

A．属性、事件、事件过程 C．属性、过程、方法

B．控件、窗体、事件 D．属性、事件、方法

14、决定标签（Label）显示的属性是（ ）

A．Text B．Name C．Caption D．Alignment 15、命令按钮的标题文字由（ ）属性来设置。

A．Text B．Caption C．Name D．(名称) 16、若要设置文本的显示颜色，则可用（ ）属性来实现。

A．BackColor

B．Forecolor C．FillColor D．Backstyle

17、在运行时，若要调用某命令钮的Click事件过程，则可设置该命令钮对象的（ ）属性为Ture来实现。

A．Enabled B．Value C．Default D．Cancel

18、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（ ）属性来实现。

A．SelStart

B．SelLenght

C．Text

D．SelText

三、简答题

1、事件驱动的含意是什么？举例说明。

2、交互式开发方法和传统的应用程序开发过程有什么不同？ 3、文本框在什么情况下使用？ 4、什么是工程？

5、结构化程序设计的三种基本结构是什么？ 6、对象的三要素是什么？并分别进行简单的解释。 7、为什么要生成可执行文件和制作安装盘？ 8、使用变量前先声明有什么好处？ 9、如何使用帮助功能？

10、结构化程序设计的特点是什么？

11、为了把焦点移到某个指定的控件，在代码中应使用的方法是什么？

12、启动Visua Basic后，只创建了一个窗体，若此时保存，需要保存几个文件？各是什么文件？先保存的是哪一个？

13、为了防止文本框中的信息运行后被用户修改，应设置什么属性？

第三章 VB基本语言

一、填空题

1、一般可以使用__________关键字声明常量。

2、______类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。

3、变量的声明分为两种方法：__________和____________。

4、在VB中，用___________________语句设定数组的下界，用_____________和__________________语句分别返回数组的上、下界。

5、在代码模块中加入Option Explicit的目的是_____________________。

6、function aa (a1 as date,optional a2 as boolean) as single，写出optional命令的作用__________________。

7、在VB中，我们用一个简单的______语句就能实现退出程序。

8、生成消息框的命令是____________，生成输入框的命令是____________。

9、通用对话框（commondialog）属activex控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性filter=____________，

Loop Until i >20

判断循环结构的类型和循环体的执行次数，正确的选项是（ ） A．当型循环，20次 C．当型循环，10次

B．直到型循环，10次 D．直到型循环，20次

26、在程序中，使用InputBox函数可以接受用户的输入，如果要把它的返回值转换为数值型的数据，应该使用的函数是（ ）

A．Val

B．Len

C．Str D．Log

27、动态数组因为在程序运行前无法确定数组的大小，所以经常根据程序的运行情况，对数组进行重新定义，以下关于VB中动态数组的叙述中不正确的是（ ）

A．可以用ReDim语句重新定义动态数组，并且可以进行多次重定义 B．首次用Dim进行动态数组声明的时候，必须指明它的类型和上下界 C．Preserve为ReDim语句的可选参数，用于保留动态数组原来的内容 D．当对动态数组使用Erase语句进行释放操作时，将释放其内存

28、VB中的控件也叫做部件或组件，主要包括三类，以下哪一项不属于VB控件的分类（ ）

A．控件

B．可插入对象

D．ActiveX控件

C．ADO控件

29、表达式4+5 \\ 6 * 7 / 8 Mod 9 的值是（ ）

A．4

B．5

C．6

D．7

30、可以同时删除字符串前导和尾部空白的函数是（ ）

A．Ltrim

B．Rtrim

C．Trim

D．Mid

三、简答题

1、全局变量声明有哪些限制？

2、字符串是否可以自动转换为数字类型？

3、用Format函数格式化后的字符格式在不同区域环境下的输出是否相同？为什么？ 4、在InputBox函数中，哪一个参数是必需的？ 5、在MsgBox函数中哪一个参数是必须的？ 6、在什么情况下使用过程？ 7、为什么要进行程序调试？ 8、调试程序有哪些手段？

9、用语句Dim A(-3 To 5) As Integer定义的数组的元素个数是多少？

10、设有如下的Visual Basic表达式：5*x^2-3*x-2*Sin(a)/3，与它对应的数学式是什么？ 11、数学式(2x?a)(3y?b)对应的VB表达式是什么？ 12、表达式2>3 And 4<=5 Or 4>4的值是什么？ 13、怎样在程序中设置断点？ 14、在什么情况下可以设置断点？ 15、程序出错的类型有哪几种？

16、在同一模块、不同过程中声明的相同变量名，两者是否表示同一个变量？为什么？ 17、什么情况下会出现“数组下标越界错误”？ 18、逐语句和逐过程有什么区别？ 19、表达式2.75 * 2 \\ 3.45的值是什么？ 20、在程序设计中为什么尽量不用GoTo语句？

四、读程序题

1、分析以下程序，写出运行结果。

Private Sub Form_Click() score = Int(Rnd * 10) + 80 Select Case score Case Is < 60 A$ = \ Case 60 To 69 A$ = \ Case 70 To 79 A$ = \ Case 80 To 89 A$ = \ Case Else A$ = \ End Select Print A$

End Sub

2、读下面的程序，分析其功能，写出运行结果。

在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：

Private Sub Command1_Click() For I = 1 To 4 For J = 0 To I Print Chr$(65 + I); Next J Print Next I End Sub

程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？ 3、阅读下面的程序，分析并写出其功能。

Sub insert(a() As Single,ByVal x As Single) Dim m as integer,n as integer n=1

Do While n<20 And x>a(n) n=n+1

Loop

For m=20-1 To n Step –1

a(m+1)=a(m)

Next m a(n)=x End Sub

4、分析以下程序，写出运行结果。

Sub subP(b() As Integer) For i =1 To 4 b(i)=2*i Next i End Sub

Private Sub Commandl_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a() For i =1 To 4 Print a(i) Next i End Sub

运行上面的程序，单击命令按钮，输出结果是什么？

5、分析以下程序，写出运行结果。

Sub sele()

Dim n as Integer i=21:n=3 Do While i>n i=i－n Loop Print i End Sub

6、分析以下程序，写出运行结果。

Sub selectPrint() Dim a as Integer Dim b as Integer Dim c as Integer a=2:b=5:c=2

If(a>=b)and(a>=c) or (b>c) Then

Print a

a=a+2 Else

Print b EndIf Print a;b;c End Sub

7、分析以下程序，写出运行结果。

Sub swap() Dim x as Integer Dim y as Integer Dim z as Integer x=1:y=2:z=0 Print x;y;z x=x+y x=x*z Print x,y,z End Sub

8、分析以下程序，写出运行结果。

Sub selectPrint() Dim a as Integer Dim b as Integer Dim c as Integer a=3:b=3:c=2

If(a>=b)and(a>c)Then Print a Print a,b,c End Sub

五、编程题

1、输入一年号，判断它是否是闰年。界面如下图所示，包括两个标签、一个文本框和一个命令按钮。提示：如果此年号能被400整除或者不能被400除尽，也不能被100除尽，但能被4整除，则它是闰年；否则，不是闰年。

本文来源：https://www.bwwdw.com/article/np9t.html