计算机二级考试VB巩固题
计算机二级考试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
Call 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
初中毕业感言300字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

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。