vb基础练习题---答案.docVIP

vb基础练习题---答案

Vb考试题

一、选择题（5分一题）

1、使用VisualBasic编程,我们把工具箱在的工具称为()。

?A.事件?????B.工具?????C.控件?????D.窗体

2、我们保存一个编写好的程序，“过程名”是以（）作为扩展名的。

?A、.frm????B、.vbp????C、.bat????D、.bas

3、下列变量名写法正确的是（）。

?A、abc?????B、abc123??C、abc_123?D、123abc

4、结束当前程序的语句是（）。

?A、quit????B、exit????C、end?????D、sub

5、要改变窗体的标题时，应当在属性窗口中改变的属性是（）。

?A、Caption?B、Name????C、Text????D、Label

6、VB是一种面向对象的程序设计语言，构成对

??s=0

??fori=1to5?

???s=s+i

??nexti

?执行后，s和i的值为（）

??A、1?????B、5???????C、6???????D、15

二、填空判断题（4分一题）

（）1、Endif语句对单行if语句不需要。

（）2、表达式(2*3)=5and12/3=4的值为false。

（）3、VB程序一行写不下，可以直接换行继续写。

4、若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为______。

Ifa5then

ifb4then

c=a-b

else

c=b-a

Endif

elseifb3thenc=a*b

else

c=amodb

Endif

5、以下程序用来输出1到100所有奇数的和，请补充完该程序。

PrivateSubCommand3_Click()

DimsAsLong

DimxAsInteger

s=0

Forx=1to100step____

s=s+x

Nextx

Prints

EndSub

三、编程题（30分）

1、有如下一个窗体（20分）

要求：变成实现

控件加载时，text1、text2、label1清空，label1文字居中，command1文字变成“执行”

实现输入2个不相等的数，求这两个数之间不能被3整除的数，依次显示在label1中

做判断，text1与text2如果相等，或者没有输入数据，给出msgbox的提醒

2、改错题（本题10分）

求100——999之间的水仙花数

1 PrivateSubCommand1_Click()

2 Dima,b,cAsIntger

3 Fori=100To999step2

4 a=i\100

5 b=(i-100*a)\10

6 c=i-100*a-10*b

7 Ifi=a*a*a+b*b*b+c*c*cThenText1.Text=Text1.Texti

8 Nexti

9 EndSub

10

11 PrivateSubForm_Load()

12 Text1.Text=

13 Text1.Lock=True

14 Command1.Caption=显示100--1000之内的水仙花数

15 EndSub

参考答案：

一、选择题：

1、C?

2、B，在保存VB文件时，会弹出两个保存窗口，一个是用于保存窗体文件，它的扩展名为.frm；另一个用于保存工程，它的扩展名为.vbp。

3、ABC

4、C

5、A

6、B，属性:对象的特征，如尺寸、位置、颜色或文本。属性决定对象的外观，有时也决定对象的行为。事件：由用户或操作系统引发的动作，如击键、单击鼠标、一段时间的限制等。方法：嵌入在对象定义中的程序代码，它定义对象怎样处理信息并响应某事件。

7、C，“\”整除，值为商的整数部分；“mod”求余，值为整除后的余数。

8、D，最后三条语句是交换两个变量的值，交换两个变量的值也可以用下列语句：

?????a=a+b:b=a-b:a=a-b

9、D，if条件语句当条件成立(为真)执行then后语句，否则执行else后语句。