二级VB考前密卷选择题(20)
Private Sub Command1_Click()
Dim a(5，5)As Integer
Dim i As Integer,j As Integer
For i=1 TO 3
For j=1 To 3
a(i，j)=(i-1)*3+j
Print a(i，j)
Next j
Next i
End Sub
程序运行后，单击命令按钮，在窗体上的输出结果是：_______。
A)l 4 7
2 5 8
3 6 9
B)l 2 3
4 5 6
7 8 9
C)1 2 3 4 5 6 7 8 9
D)没有输出
答 案：B
知识点：数组的基本操作，二维数组
评 析：程序共有两层循环，每执行完一次内循环，则打印换行，由此判断选项A，B可能正确，当外层循环执行第一次时，a(i,j)=(i-1)*3+j相当于a(1,j)=j，由此可判断选项B为正确答 案。
(272)在窗体上画两个标签和一个命令按钮，其名称分别为Labe11、Label2和Command1， 然后编写如下程序：
Private Sub func(L As Label，By Val a As Integer)
L．Caption=“1234”
a=a:*a
End Sub
Private Sub Form_Load()
Label1．Caption=“ABCD”
Label2．Caption=10
End Sub
Private Sub Command1_Click()
a。Val(Label2．Caption)
Call func(Labell，a)
Label2．Caption=a
End Sub
程序运行后，单击命令按钮，在两个标签Labe11和Label2中显示的内容分别是：______。
A)ABCD和10 B)1234和100
C)ABCD和100 D)1234和10
答 案：D
知识点:调用过程与事件过程
评 析：单击命令按钮后变量a赋初值a=lO，通过Call调用函数后，Labe11．Caption=“1234”，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Label2．Caption=a后，Label2中显示的值仍为lO。
(273)假定程序中有以下语句：
answer=MsgBox(“String1”,,“String2”,“String3”,2)
执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为：_______。
A)String1 B)String2
C)String3 D)l
答 案：D
知识点：MsgBox函数和MsgBox语句
评 析：MsgBox函数：在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。
返回值
本题单击的是“确定”按钮，即vbOK，所以MsgBox返回1。
(274)设窗体Form1中有一名为mnuFile的菜单，它只有一个标题为Open的子菜单。为使程序运行时，按Alt+F键窗体中能够显示如下图所示的菜单项，则mnuFile的标题应为：_______。
A)File(F) B)File(F) C)File(&F) D)File(-F)
答 案：C
知识点：菜单项的控制
评 析：编辑菜单时，为了能够通过键盘访问菜单项，可以在字母前插入一个&符号。在程序运行时，&后面的字母带有下划线，而&本身不可见。如编辑菜单时输入的标题为File(&F)，则运行时该菜单项显示为File(￡)，并且可以通过按键AIt+F来访问该菜单项。
(275)设a--5，b=6，c=7，d=8，则执行下列语句后，x的值为：_______。
x=IIF((a>b)And(c<d)，1 0,20)
A)10 B)20 C)30 D)300
答 案：B
知识点：常用内部函数，IIF函数
评 析：函数IIF(expr,vall,val2)与IF语句相似，当布尔表达式expr为True时，则选择va11的值，否则选择val2的值。
(276)在窗体上画一个命令按钮，然后编写如下程序：
Sub S1(By Val x As Integer，By Val y As Integer)
Dim t As Integer
t=x
x=y
y=t
End Sub
Private Sub Command1_Click()
Dim a As Integer．b As Integer
a=10
b=30
S1 a．b
Print“a=”；a；“b=”；b
End Sub
程序运行后，单击命令按钮，输出结果是：_______。
A)a=30 b=10 B)a=30b=30
C)a=10 b=30 D)a=10 b=10
答 案：C
知识点：调用Sub过程
评 析：过程S1似乎是要将两个变量的值进行交换，但由于参数是用传值的方式来传递变量值的，所以执行完该过程后，a和b的值并未被交换，保持原来的值不变。
(277)能够获得一个文本框中被选取文本的内容的属性是_______。
A)Text B)SelLength C)SelText D)SelStart
答 案：C
知识点：文本框属性
评 析：文本框有很多属性，其中Text属性用来设置文本框中显示的内容；
SelLength属性存放当前选中的字符数：
SelText属性含有当前所选择的文本字符串，如果没有选择文本，则该属性含有一个空字符串。
SeIStart属性定义当前选择的文本的起始位置。
(278)设置复选框中或单选按钮的标题对齐方式的属性是_______。
A)Align B)Style C)Sorted D)Alignment
答 案：D
知识点：复选框和单选按钮属性
评 析：复选框和单选按钮的相关属性
Style属性：指定复选框或单选按钮的显示方式
Alignment属性：设置复选框或单选按钮控件标题的对齐方式，可以取0和l两种值，取值为0则控件标题左对齐：取值为l则控件标题右对齐。
(279)下列程序段的执行结果为_______。
X=5
Y=-20
Lf Not X>0 Then X=Y．3 Else Y=X+3
Print X-Y；Y-X
A)-3 3 B) 5 -8 C) 3 -3 D) 25 –25
答 案：A
知识点：选择结构，IF…Else语句
评 析：IF…Else语句
跟踪程序：在IF语句中，因为x=5>0，所以Not X>0为假，执行Else分支，即Y=5+3=8。
所以打印的结果应当为：
X-Y=5-8=-3
y-X=8-5=3。
(280)改变驱动器列表框的Drive属性值将激活_______事件。
A)Change B)Scroll C)KeyDown D)KeyUp
答 案：A
知识点：驱动器列表框控件的相关属性和事件
评 析：驱动器列表框控件的相关属性和事件
驱动器列表框的Drive属性，用来设置或返回程序运行时所选择的驱动器名。
当驱动器列表框的Drive属性值发生变化时，会触发驱动器列表框的Change事件。
当驱动器列表框的滚动框被重新定位或沿水平或垂直方向滚动时，会触发驱动器列表框的Scroll事件。
在驱动器列表框获得焦点时，按下或松开键盘上的按键，会触发驱动器列表框的KeyDown或KeyUp事件。
酷影网(ky530.com)转载请注明出处,http://www.ky530.com/ncre/02/2005-10-31_4185265296.html
关键词:
