VB选择题

1.设组合框Combo1中有3个项目，则以下能删除最后一项的语句是
___Combo1.Removeitem 2____。

2.运行以下程序，单击命令按钮后，如果用户从键盘上输入6、5、4、3、2、1，则窗体
上输出内容为___9 ______。
Private Sub Command1_Click()
Dim a() As Integer
Dim i As Integer, j As Integer
ReDim a(6)
For i = 5 To 10
a(10 - i + 1) = InputBox("input number")
Next i
ReDim Preserve a(10)
a(10) = a(5) + a(4)
Print a(10)
End Sub

3.一只白色的足球被踢进球门，则白色、足球、踢、进球门是
_属性、对象、事件、
方法_______。

4.如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是_
如果工程中含
有Sub Main过程，则程序一定首先执行该过程___
____。

5.假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该
应用程序，以下正确的操作是__
分别保存窗体模块、标准模块和工程文件

__
____。

6.若磁盘文件C:\Data1.dat不存在，下列打开文件语句中，会产生错误的是_
Open
"C:\Data1.dat" For Input As #2___
_______。

7.在下面的程序段中，循环体将执行 _6 _____次。
For v=20 To 10 Step -2
print v
Next v
8.下面程序段的运行结果为_1 2 6 24 _______。
For i=1 To 4
n=1
For j=1 To I
n=n*j
Next j
Print n；
Next i

9.设有语句X=InputBox("输入数值"，"0"，"示例")，程序运行后，如果从键盘上输入
数值10并按回车键，则下列叙述中正确的是_ 变量X的值是字符串"10"_____。

10.在用通用对话框控件建立"打开"或"保存"文件对话框时，如果需要指定文件列表框
所列出的文件类型是文本文件（即.txt文件），则正确的描述格式是___
"文本文件

(.txt)|*.txt" _。

11.Option Explicit语句不可以放在_任何事件过程中_____。
12.表达式25.28 mod 6.99的值是___4___。
13.以下能够触发文本框Change事件的操作是__改变文本框的内容______。
14.执行以下语句后，k的值为__2.45 4 ___。
Dim i As Single
For i = 0.45 To 2 Step 0.5
k = k + 1
Next i
Print i;k

在程序中可以通过复选框和单选按钮的__Value _____属性值来判断它们的当前
状态它。

当某一按钮的__Enabled ___属性设置为False时，该按钮为灰白显示。
下列程序段的执行结果为 __0 2 2 3 ______。
Dim M(2)
For i=1 To 2
M(i)=0
Next i
K=2
For i=1 To k
For j=1 TO k
M(j)=M(i)+1
Print M(k);
Next j
Next i

若在应用程序的标准模块.窗体模块和过程Sub1的说明部分，分别用"Public G As
Integer"、"Private G As Integer"和"Dim G As Integer"语句说明了三个同名变量G。

如果在过程Sub1中使用赋值语句"G=3596"，则该语句是给在_
过程Sub1

_
_________说明部分定义的变量G赋值。

若磁盘文件C:\Data1.dat不存在，下列打开文件语句中，会产生错误的是__
_Open
"C:\Data1.dat" For Input As #2___
_____。

执行以下语句后，k的值为__2.45 4 ___。
Dim i As Single
For i = 0.45 To 2 Step 0.5
k = k + 1
Next i
Print i;k

有程序段如下：
For i = 1 To 3
For j = 5 To i Step -1
Print i * j
Next j
Next i

其中"Print i*j"语句执行的次数为___12 ______。
在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的
Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
Dim A As Integer
 A = Inputbox("Enter An Integer")
 B = Inputbox("Enter An Integer")
 Text1.Text = B + A
End Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入4和56，则文本框中显示的

内容是___60 ____。

以下不能实现在窗体上选择多个控件的方法是___单击每个控件____。
在用通用对话框控件建立"打开"或"保存"文件对话框时，如果需要指定文件列表框所列
出的文件类型是文本文件（即.txt文件），则正确的描述格式是_
_"文本文件

(.txt)|*.txt" __。

下列表达式不正确的是__#12/10/2006#*#10/10/2006#____。
表示滚动条控件取值范围最大值的属性是___Max ____。
设组合框Combo1中有3个项目，则以下能删除最后一项的语句是
_Combo1.Removeitem 2______。