VB第三章课后习题答案

习题

一、单项选择题

1、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（）

A.PrintA=x+y

B. Print"A="；x+y

C. Print"A="+Str(x+y)

D. Print"A="&x+y

2、假定有如下的命令按钮(名称为Command1)事件过程：

PrivateSubCommand1_Click()

x=InputBox("输入："，"输入整数")

MsgBox"输入的数据是：”，，”输入数据："+x

EndSub

程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（）

A. x的值是数值10

B. 输入对话框的标题是“输入整数”

C. 信息框的标题是“输入数据：10”

D. 信息框中显示的是“输入的数据是：”

3、有如下程序

a=3;b=4

PRINT b＜a

END

运行后，输出的结果是( )

A. 4＞3

B. -1

C. 0

D. 显示出错信息

4、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1

的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字

符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件

过程是（）

A. Private Sub Text1_Change()

B. Private Sub Command1_Click()

Command1.Caption=”计算机等级考试”Caption=”计算机等级考试”

End Sub End Sub

C. Private Sub Form1_Click()

D. Private Sub Command1_Click()

Text1.Caption=”计算机等级考试”Text1.Text=”计算机等级考试”

End Sub End Sub

5、假定有如下的窗体事件过程：

Private Sub Form_Click()

a$ = "Microsoft Visual Basic"

b$ = Right(a$, 5)

c = Mid(a$, 1, 9)

MsgBox a$, 34, b$, c$, 5

End Sub

程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是（）

A. Microsoft Visual

B. Microsoft

C. Basic

D. 5

6、窗体上放置了三个文本框，若在Text1中输入456，在Text2中输入78，在程序中

执行了语句Text3=Text1+Text2后，则在Text3中显示（）

A. 434

B. 45678

C. 溢出

D. 语法错误

7、执行下面的程序，单击窗体，则在窗体上显示的是（）。

Option Explicit

Private Sub Form_Click()

Dim a As Integer, b As Integer, c As Integer

b = 6:

c = 6.5

a =

b = c

Print a

End Sub

A. 1

B. -1

C. 0

D. 语法错误

说明: False-→0 True→-1

8、语句PRINT “INT（-13.2）=”；INT（-13.2）的输出结果为：

A. INT（-13.2）= -13.2

B. INT（-13.2）= 13.2

C. INT（-13.2）= -13

D. INT（-13.2）= -14

二、填空题

1、在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a = InputBox("请输入一个整数")

b = InputBox("请输入一个整数")

Print a + b

End Sub

程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出结果为321456 。

2、执行下面的程序段后，b的值为300 。

a=300

b=20

a=a+b

b=a-b

a=a-b

3、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:

Private Sub Form_Click()

Text1.Text = "VB程序设计"

End Sub

Private Sub Text1_Change()

Picture1.Print "VB Programming"

End Sub

程序运行后,单击窗体,在文本框中显示的内容是VB程序设计,而在图片框中显示的内容是VB Programming。

4、在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click()

x = InputBox("请输入一个整数")

Print x + Text1.Text

End Sub

程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，则在窗体上显示的内容是123456 。

5、如果在立即窗口中执行以下操作：

a = 8 (是回车键，下同)

b = 9

Print a > b

则输出结果是___False__。

6、在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、

Label3的标签，然后编写如下代码：

Private Sub Command1_Click()

Static y As Integer

Dim z As Integer

n = 10

z = n + z

y = y + z

x = x + z

Label1.Caption = x

Label2.Caption = y

Label3.Caption = z

End Sub

运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是_30 30 10。

7、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、Label等控件，

则运行该程序显示窗体时，CommandButton会首先获得焦点。

8、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a$="VisualBasic"

Print String(3,a$)

End Sub

程序运行后，单击命令按钮，在窗体上显示的内容是____VVV___。

9、输入下列程序

Private Sub Command1_Click( )

Text1.Text=”努力”

End Sub

Private Sub Command2_Click( )

Text1.Text=”学习”

End Sub

单击Command2按钮，又单击Command1按钮，在文本框中显示___努力____。

10、要使Print方法在Form_Load( )事件过程中有效，必须将_窗体的Visible

_属性设置为True，或者使用_窗体的Show__方法。

三、问答题

1、简要回答vb中赋值语句的使用要点。

2、简要分析MsgBox函数与InputBox函数有何区别,?

3、InputBox函数和Text文本框有何异同？

4、Print方法中可以使用“，”和“；”，简述它们的作用和差别。

5、简述标签的作用。