VB章节练习题(3)

1．以下选项中，不是 VB 6．0控件的是＿D 。 A）单选按钮 B）命令按钮 C）滚动条 D）窗体

2．以下 VB 6．0控件中，有 Caption属性的是＿D 。 A）组合框 B）列表框 C）计时器 D）单选按钮 3不能作为容器使用的对象是＿C 。 A）Picture B）Form C）Image D） Frame 4能作为容器使用的对象是＿A 。 A）图片框 B）图像框 C）标签框 D）文本框

5．在程序运行中，要想使可操作的按钮变成看得见但不可操作，则应设置为False的属性是＿B 。

A）Visable B） Enabled C） Default D）Cancled

6．在程序运行中，要想使可操作的按钮变成看不见，则应设置为False的属性是＿A 。

A） Visable B） Enabled C）Default D）Cancled

7．若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是＿C 。 A）Enabled B）Cancel C）Defaul D）Value

8能触发滚动条Scroll事件的操作是 A 。 A）拖动滚动条中滑块 B）单击滚动条中滑块

C）单击滚动条两端箭头 D）单击箭头与滑块之间的滚动条 9．命令按钮不能响应的事件是 A 。 A）DblClick B）Click C）MouseDown D）Mouseup

10．若要设置标签框的背景颜色，使用的属性是 B 。 A） ForeColor B） BackColor

C） FontBold D） Color 11．使控件能自动按图形大小而改变的控件是 a 。 A）图像框 B）图片框 C）文本框 D）框架

12．下面选项中，不能将图像装入图片框和图像框的方法是 A 。

11

A）在界面设计时，手工在图片框和图像框中绘制图形 B）在界面设计时，通过Picture属性装入 C）在界面设计时，利用剪贴板把图像粘贴上

D）在程序运行期间，用LoadPicture函数把图形文件装入 13．下面选项中，不能用于列表框控件的方法是 D 。 A） AddItem B） RemoveItem C）Clear D）Cls

14．下面选项中，不能使控件得到焦点的操作是 D 。 A）在程序运行期间，用鼠标单击对象

B）在程序运行期间，用快捷键选择对象 C）在程序运行期间，按Tab键

D）在程序运行期间，按回车键

15．计时器控件，如果希望每秒产生10个事件，则要将Interval属性的值设置为 A 。 A） 100 B） 200 C）300 D）400 二、填空题

1．列表框的FOntBold属性的类型是 逻辑类型或布尔类型 。 2．图像框控件使用系统资源比图片框 少 。

3．删除列表框中的所有项目使用的方法是＿Clear方法 。 4．从列表框中删除项目使用的方法是 RrmovItem方法 。 5．向列表框添加项目使用的方法是 AddItem方法 。

6．在命令按钮释放鼠标按钮时，所触发的事件称为 MouseUp事件 。 7．工具箱中的图标是——控件。

8文本框能返回按键的ASCII码值的事件是 KeyPress事件 。

第六章练习题

一、选择题 1．下列程序

Private Sub Form_Click（） For i＝ 1 To 3

For j＝ 5 To 1 Step －l Print i*j Next j Next i End Sub

运行时，执行 Print i*j的次数是＿C 。

A） 13 B） 14

12

C） 15 D） 16 2下面程序运行的输出结果是 D 。 Private Sub Form_Click（） X＝ 3： y＝ 0： Z＝ 0 If X＝y＋Z Then Print ”＊＊＊＊” Else

Print ” ＃＃＃＃” End If End Sub

A）有语法错误，若设置了编辑时自动检查语法，编辑时表现出错误 B）输出＊＊＊＊

C）编辑时语法检查查不出错误，但不能运行 D）输出＃＃＃＃

3下面的程序运行时，若从键盘输入3和4, 则输出为＿B 。 Private Sub Form_Click（）

a=Val（InputBoX（”请输入a”）） b=Val（InputBoX（”请输入b”）） c＝a

If b＞c Then c=b c＝c＊c Print c End Sub

A）14 B） 16 C）18 D）20

4下面的程序执行时，若从键盘输入5，则输出为＿A 。 Private Sub Form_Click（）

X=Val（InputBoX（”请输入X”）） For i=1 To 20 Step 2 X＝X＋i＼5 Next i Print X End Sub

A）21 B）22 C）23 D）24 5．下列程序

13

Private Sub Form_Click（） For i=1 To 10 Step 2 For j=1 TO 5 Prrnt i*j； Next j Prrnt Next i End Sub

该程序运行时输出的行数是＿A 。 A）5 B）25 C）30 D）50 6下面程序运行的输出结果是、 A 。 Private Sub Form_Click（）

X=100： a＝10： b＝20： ok1=True： ok2=False If a＜b Then If b＜＞15Then If Not ok1 Then x＝1 Else

If ok2 Then x=10 x＝-1 End If End If End If Print x End Sub

A）－1 B） 0

C） 1 D）不确定的值

7．下面程序执行时，输入4和2, 输出是___C _。 Option Explicit

Private Sub Command1_Click（）

Dim m As Integer， n As Integer Dim a， b， r

m＝InputBox（”请输入第一个正整数：”） n＝InputBox（”请输入第二个正整数：”） a = m: b = n: r = a Mod b

14

Do While r＜＞ 0 a＝b b＝r r＝ a Mod b Loop Print b End Sub

A） 0 B） l C） 2 D） 3 8．下列程序

Private Sub Fom_Click（） b =1 a =1

DO While b<100 a=2*a

If a＞ 6 Then Exit Do b＝a^2＋b^2 Loop Print b End Sub

运行后输出的结果是 D 。 A） 5 B） 17 C）21 D）41 9．下列程序

Private sub form_ick（） S= 0 N=5 For i=1 to n s＝s＋i Next i Print s End Sub

运行后输出的结果是 A 。

A）15 B）17 C） 19 D）21 10．有如下程序

15

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VB章节练习题(3)在线全文阅读。