VB第三章课后习题答案

习题

一、单项选择题

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

()

A.PrintA=x+yB.Print"A=,';x+y

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

2、假定有如下的叮嘱按钮(名称为Command1)事务过程：

PrivateSubCommandl_Click()

x=InputBox("«jA："，“输入整数

MsgBox"输入的数据是：输入数据:"+x

EndSub

程序运行后，单击叮崛按钮，假如从键盘上输入整数10,则以下叙

述中错误的是()

A.x的值是数值10B.输入对话框的标

题是“输入整数”

C.信息框的标题是“输入数据：10"D.信息框中显示的

是“输入的数据是：”

3、有如下程序

a=3;b=4

PRINTb<a

END

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

A.4>3B.-1C.0

D.显示出错信息

4、在窗体(名称为Fomil)上画一个名称为Textl的文本框和一个

名称为Command1的叮嘱按钮，然后编写一个事务过程。程序运

行以后，假如在文本框中输入一个字符，则把叮嘱按钮的标题设置

为“计算机等级考试”。以下能实现上述操作的事务过程是

()

A.PrivateSubTextl_Change()B.Private

SubCommandl_Click()

Commandl.Caption=,,计算机等级考试"Caption」'

计算机等级考试”

EndSubEndSub

C.PrivateSubForml_Click()D.Private

SubCommandl_Click()

Text1.Caption=w计算机等级考试"Textl.Text="

计算机等级考试”

EndSubEndSub

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

PrivateSubForm_Click()

a$="MicrosoftVisualBasic"

b$=Right(a$,5)

c=Mid(a$,1,9)

MsgBoxa$,34,b$,c$,5

EndSub

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

是()

A.MicrosoftVisualB.MicrosoftC.BasicD.5

6、窗体上放置了三个文本框，若在Textl中输入456,在Text2中

输入78,在程序中执行了语句Text3=Textl+Text2后，则在

Text3中显示()

A.434B.45678C.溢出D.语法错误

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

OptionExplicit

PrivateSubForm_Click()

DimaAsInteger,bAsInteger,cAsInteger

b=6:c=6.5

a=b=c

Printa

EndSub

A.1B.-1C.0D.语法错误

说明：False-0True-1

8、语句PRINT“INT(-13.2)="；INT(-13.2)的输出结果

为：

A.INT(-13.2)=-13.2B.INT(-13.2)=13.2

C.INT(-13.2)=-13D.INT(-13.2)=-14

二、填空题

1、在窗体上画一个叮咽按钮，然后编写如下事务过程：

PrivateSubCommandl_Click()

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

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

Printa+b

EndSub

程序运行后，单击叮崛按钮，在输入对话框中分别输入321和456,

输出结果为321456。

2、执行F面的程序段后，b的值为3。0°

a=300

b=20

a=a+b

b=a-b

a=a-b

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

PrivateSubForm_Click()

Text1.Text="VB程序设计”

EndSub

PrivateSubTextl_Change()

Picturel.Print"VBProgramming"

EndSub

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

在图片框中显示的内容是VBProgramming。

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

PrivateSubForm_Click（）

x=InputBox（"请输入一个整数”）

Printx+Text1.Text

EndSub

程序运行时，在文本框中输入456,然后单击窗体，在输入对话框

中输入123,单击“确定”按钮后，则在窗体上显示的内容是

123456。

5、假如在立刻窗口中执行以下操作：

a=8<CR>（vCR>是同车键，下同）

b=9<CR>

Printa>b<CR>

则输出结果是—False一

6、在窗体上画一个名称为Command1的叮嘱按钮和三个名称分别

为Labell、Lab82、Label3的标签，然后编写如下代码：

PrivatexAsIntegerN=10

PrivateSubCommand1Z=10+0=

StaticyAsInteger10

DimzAsIntegerY=0+10=

10

X=0+10

n=10

z=n+z

y=y+z

X=X+z

Label1.Caption=x

Label2.Caption=y

Label3.Caption=z

EndSub

运行程序，连续三次单击叮咽按钮后，则三个标签中显示的内容分

别是303010。

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

TextBox>Label等控件，则运行该程序显示窗体时，

CommandButton会首先获得焦点。

8、在窗体上画一个名称为Command1的叮嘱按钮，然后编写如下

事务过程：

PrivateSubCommandl_Click()

a$=nVisualBasic"

PrintString(3,a$)

EndSub

程序运行后，单击叮嘱按钮，在窗体上显示的内容是一WV。

9、输入下列程序

PrivateSubCommandl_Click()

Text1.Text=w努力”

EndSub

PrivateSubCommand2_Click()

Textl.Text=>,学习”

EndSub

单击Command2按钮，又单击Command1按钮，在文本框中

显示—努力0

10、要使Print方法在Form_Load()事务过程中有效，必需将_