计算机二级考试VB巩固题
2017计算机二级考试VB巩固题
2017年计算机二级考试即将在九月份进行,VB是计算机二级考试的科玛之一,你知道计算机二级考试VB科目都考哪些知识吗?为了方便考生备考计算机二级考试VB 科目。下面是店铺为大家带来的计算机二级考试VB巩固题,欢迎阅读。
巩固题一:
1. 要使窗体Form1显示出来,应使用( 【55】 )
(A)Load Form1 (B)Form1 Load (C)Show.Form1 (D)Form1.Show
2. 在使用通用对话框之前要先将( 【56】 )添加到工具箱中。
(A)Active X  (B)ComboBox  (C)CommonDialog  (D)Color
3. 用Open语句打开文件时,若省略For子句,则隐含打开文件的存取方式为( 【57】 )
(A)Binary   (B)Random   (C)Input   (D)OutPut
4. 设有以下循环结构
Do
循环体
Loop While <条件>
则以下叙述中错误的是
(A)“条件”可以是关系表达式、逻辑表达式或常数
(B)循环体中可以使用Exit Do语句
(C)若“条件”是一个为0的常数,则一次也不执行循环体
(D)如果“条件”总是为True,则不停地执行循环体
5. 要获得打开文件的长度(字节数)应用使用( 【58】 )函数。
(A)FileLen   (B)Len    (C)Loc    (D)Lof
6. 给文件改名的VB语句正确的是( 【59】 )
(A)Name 原文件名 To 新文件名 (B)Rename 原文件名 To 新文件名
(C)Name 原文件名 As 新文件名 (D)Rename 原文件名 As 新文件名
7. 在窗体上画一个名称为Command1的命令按钮,然后编写如下的事件过程
安志杰 谢婷婷Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
For i = 1 To 10
a(i) = i
Next
二级VBCall Swap 【5】
For i = 1 To 10
Print a(i);
Next
End Sub
尹正 一剪梅Sub Swap(b() As Integer)
n=【5】
For i = 1 To n / 2
t = b(i)
b(i) = b(n)
郑水晶b(n) = t
【5】
Next
End Sub
上述程序的功能是,通过调用过程Swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……,a(5)与a(6)的值互换。请填空。
8. 在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),然后编写如下几个事件过程:
Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 【5】
End Sub
Private Sub Form_Click()
Timer1.Enabled = 【6】
End Sub
Private Sub Timer1_Timer()
Label1.Caption = 【7】
End Sub
程序运行后,单击窗体,将在标签中显示当前时间,每隔1秒钟变换一次(见图)。请填空。
9. 下面程序用选择法将数组a中的.10个整数按升序排列。算法是:从数组中出最小的值,将该数与第1个数交换,这样第1个数组元素是最小的数。再从第2个数开始,出其后各数组元素中最小的数,将该数与第2个数交换位置,这样第2个数是次小的数。如此重复上述过程,即可将数组排序。请完善以下的程序:
Option Base 1
Private Sub Command1_Click( )
Dim a (1 To 10 ) As Integer , i As Integer , j As Integer , k As Integer
For i=1 To 10
a ( i ) = Val ( InputBox ( “请输入第a( ” & i & “ ) 个数:”))
Next i
For i = 1 To 9
【60】
For j = i + 1 To 10
If a ( k ) 【61】 a ( j ) Then k = j
Next j
Temp = a (i ) : 【62】 : a ( k ) = Temp
Next i
For i = 1 To 10
Print a ( i ) ,
Next i
End Sub
【60】(A)k = 0    (B)k = 1    (C)k = i    (D)k = j
【61】(A)=    (B)< >    (C)<    (D)>
【62】(A)a (i) = a (j)  (B)a (j) = a (i)  (C)a (k) = a (i)  (D)a (i) = a (k)
10. 设有程序:
Option Base 1
Private Sub Command1_Click()
Dim arr1, Max as Integer
arr1 = Array(12, 435, 76, 24, 78, 54, 866, 43)
【12】 = arr1(1)
For i = 1 To 8
If arr1(i) > Max Then 【13】
Next i
Print "最大值是: "; Max
End Sub
以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查并输出该数组中元素的最大值。请填空。
巩固题二:
1. 执行以下程序段后,变量c$的值为( 【45】 )
a$ = “ Visual Basic 6.0 Programing ”
b$ = “ Design ”
c$ = Lcase ( Mid$ ( a$ , 7 , 6)) & Right$ ( a$ , 11 ) & b$
(A)Visual basic 6.0 design        (B)basic ProgramingDesign
(C)BASIC ProgramingDesign       (D)Visual BASIC 6.0 design
2. 假定有一个菜单项,名为MenuDiv,为了在运行时使该菜单项失效(变灰),应使用的语句是( 【46】 )
(A)MenuDiv . Visible = False        (B)MenuDiv . Visible =True
(C)MenuDiv . Enabled = False       (D)MenuDiv . Enabled = True
3. 为了暂时关闭计时器,应把该计时器的某个属性设置为False,这个属性是( 【47】 )
(A)Enabled  (B)Interval    (C)Timer     (D)Visible
4. 为了把一个记录型变量Stu的内容写入随机文件Ks48.dat中的指定位置,所使用的语句格式为( 【48】 )
(A)Put #文件号 , 记录号 , Stu    (B)Put #文件号 , Stu , 记录号
(C)Get #文件号 , 记录号 , Stu    (D)Get #文件号 , Stu , 记录号
5. Sub过程的定义( 【49】 )
(A)一定要有形参           (B)一定要有过程的名称
(C)一定要指明是公有的还是私有的   (D)一定要指定其类型
6. Function过程有别于Sub过程的最主要的特点是( 【50】 )
(A)Function过程一定要有形参,而Sub过程可以没有形参
(B)Function过程的终端语句是End Function,而Sub过程的终端语句是End Sub
河传(C)Function过程用于计算函数值,而Sub过程用于改变属性值
苏芒(D)Function过程要返回函数值,而Sub过程没有值的返回
7. 要定义一个过程为局部过程,应用使用( 【51】 )关键字。
(A)Public   (B)Static   (C)Sub   (D)Private