计算机二级(VB)56
(总分4230,考试时间90分钟)
选择题(每小题2分，共70分)  下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 下列语句中，获得列表框List1中项目个数的语句是（  ）。
A. x8        B. x[8]
C. s(0)        D. v[8]
2. 在窗体上有1个名称为CommonDialog1的通用对话框和1个名称为Command1的命令按钮,以及其他一些控件。要求在程序运行时,单击Command1按钮,则显示打开文件对话框,并在选择或输入个文件名后,就可以打开该文件。以下是Command1_Click事件过程的两种算法算法1：    Private Sub Command1_Click()    CommonDialog1.Show Open    Open CommonDialog1.File Name For Input As#1    End Sub算法2：    Private Sub Command1_Click()    CommonDialog1.Show Open    If CommonDialog1.File Name<>" "Th
en    Open CommonDialog1.File Name For Input As#1    EndIf    End Sub下面关于这两种算法的叙述中正确的是【  】
A. 显示打开文件对话框后若未选择或输入任何文件名,则算法2会出错,算法1不会
B. 显示打开文件对话框后若未选择或输入任何文件名,则算法1会出错,算法2不会
C. 两种算法的执行结果完全一样
D. 算法1允许输入的文件名中含有空格,而算法2不允许
3. 对长度为n的线性表进行顺序查，在最坏情况下所需要的比较次数为______。
A. log2n          B. n/2
C. n          D. n+1
4. 下列程序段的执行结果为（  ）。  a=1  b=1  For I=1 To 3    f=a+b    a=b    b=f    Print f;  Next I
A.  4  6        B.  6  6
C. 8  8        D. 10  12
5. 下列关于栈的描述中错误的是______。 
A. 栈是先进后出的线性表          B. 栈只能顺序存储
C. 栈具有记忆作用          D. 对栈的插入与删除操作中，不需要改变栈底指针
6. 以下叙述中错误的是【  】
A. 一个工程中可以包含多个窗体文件
B. 在一个窗体文件中用Public定义的通用过程不能被其他窗体调用
C. 窗体和标准模块需要分别保存为不同类型的磁盘文件
D. 用Dim定义的窗体层变量只能在该窗本中使用
7. 单击命令按钮，下列程序的执行结果是(    )。  Private Sub Blck (x As Integer)    x = x * 2 + l    If x ＜6 Then      Call Blck(x)    End If    x = x * 2 + 1    Print x；  End Sub  Private Sub Commandl_Click()    Blck 2  End Sub
A.  aa=false        B.  aa=False
C.  aa="true"        D.  aa=0
8. 以下各项，可以作为Visual Basic变量名的是（  ）。
没有caption属性的控件是A.  内存跟踪        B.  内存编译
C.  语法检查        D.  上述都不正确
9. 以下叙述中，错误的是______。
A. 一个 Visual Basic 应用程序可以含有多个标准模块文件 
B. 一个 Visual Basic 工程可以含有多个窗体文件 
C. 标准模块文件可以属于某个指定的窗体文件 
D. 标准模块文件的扩展名是.bas
10. 窗体上有 1 个过程为 CD1 的通用对话框，1 个名称为 Command1 的命令按钮。命令 按钮的单击事件过程 如下 ：Private Sub Command1_Click() CD1.FileName = "" CD1.Filter = "All Files|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CD1.FilterIndex = 2CD1.Action = 1 End Sub关于以上代码，错误的叙述是______。
A. 执行以上事件过程，通用对话框被设置为"打开"文件对话框 
B. 通用对话框的初始路径为当前路径 
C. 通用对话框的默认文件类型为*.Txt 
D. 以上代码不对文件执行操作
11. 确定窗体控件启动位置的属性是（  ）。
A.  Width和Height        B.  Width或Height
C.  StartUpPositon        D.  Top和Left　
12. 下列四组控件属性中，属性值的类型不相同的一组是（  ）。
A.  Private Sub Command2_Click( )    CommonDialog1．DialogTitle=“宇宙大爆炸”    CommonDialog1．ShowOpen  End Sub
B.  Private Sub Command2_Click( )    CommonDialog1．DialoTitle=“宇宙大爆炸”    CommonDialog1．ShowFont  End Sub
C.  Private Sub Command2_Click( )    CommonDialog1．DilogTitle=“宇宙大爆炸”    CommonDialog1．Show  End Sub
D.  Private Sub Command2_Click( )    CommonDialog1．DialogTitle=“宇宙大爆炸”    CommonDialog1．ShowColor  End Sub
13. 在窗体上画一个名称为Command1的命令按钮，并编写如下程序：    Private Sub Command1_Click( )        Dim x As Integer        Static y As Integer        x=10        y=5       
Call f1(x，y)        Print x，y    End Sub    Private Sub f1(ByRef x1 As Integer，y1 As Integer)        x1=x1+2        y1=y1+2    End Sub    程序运行后，单击命令按钮，在窗体上显示的内容是（  ）。
A. 10 5        B. 12 5
C. 10 7        D. 12 7
14. 计算z的值，当x大于y时，z=x；否则z=y。下列语句错误的是（  ）。
A. If x>=y Then z=x：z=y
B. If x>=y Then z=x Else z=y
C. z=y：If x>=y Then z=x
D. If x<=y Then z=y Else z=x
15. 下列程序段，在运行时最早输出的内容是（  ）。  a=2  C=1  AAA：  　C=C + a  　If c＜10 Then    　Print c    　GoTo AAA  　Else    　Print"10以内的奇数显示完毕。"  End If
A. 3        B. 7
C. 9        D. 6
16. 下列说法正确的是（  ）。
A. 1234        B. 1324
C. 1342        D. 3142
17. 单击一次命令按钮后，下列程序的执行结果是（  ）。  Private Sub Command1_Click()  　s=P(1) +P(2) +P(3) +P(4)  　Print s  End Sub  Public Function P(N As Integer)  　Static Sum  　For i=1 To N  　Sum=Sum+i  　Next i  　P=Sum  End Function
A. 15        B. 25
C. 35        D. 45
18. 单击命令按钮时，下列程序的运行结果为（  ）。  Private Sub Command1_Click( )  　Print MyBM(23，18)  End Sub  Public Function MyBM(m As Integer，n As Integer)As Integer  　Do While m< >n    Do While m ＞ n：m=m - n：Loop    Do While m ＜ n：n=n - m：Loop  　Loop  　MyBM=m  End Function
A. 方法是对象的一部分        B. 在调用方法时，对象名是不可缺少的
C. 方法是一种特殊的过程和函数        D. 方法的调用格式和对象属性的使用格式相同
19. 在窗体上有一个命令按钮，然后编写如下事件过程  Private Sub Command1 _ cickc ( )    a=InputBox("enter the first integer")    b=InputBox("enter the second integer")    Print b + a  End Sub  程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为(    )。
A. 2        B. 62
C. 8        D. 26
20. 下列程序段的执行结果为(    )。  m=1  n=1  Select Case m    Case 1      Select Case n        Case 0          　Print "* * 0 * *"        Case 1          　Print " * * 1 * * "    　End Select  　Case 2    　print " * * 2 * * "  End Select
A. 159        B. 753
C. 357        D. 591
21. 在计时器控件中，Interval属性的作用是（  ）。
A.  决定是否响应用户的操作        B.  设置计时器事件之间的间隔
C.  存储程序所需要的附加数据        D.  设置计时器顶端和其容器之间的距离
22. 要设置窗体为固定对话框，并包含控制莱单栏和标题栏，但没有最大化和最小化控钮，设置的操作是（  ）。
A.  MyForm．Show        B.  Show．MyForm
C.  MyForm Load        D.  MyForm Show
23. 下列程序段的执行结果为(    )。  a=5  For k=1 To 0    a=a * k  Next k  Print k；a

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