国家二级VB机试（Visual Basic程序设计基础）模拟试卷2
(总分56,考试时间90分钟)
1. 选择题
1. 下面能够将某个变量声明为局部变量的是(    )。
A. 在窗体模块的声明部分，用关键字Static声明这个变量
B. 在窗体模块的声明部分，用关键字Dim声明这个变量
C. 在需要使用这个变量的过程中，用关键字Private声明这个变量
D. 在需要使用这个变量的过程中，用关键字Public声明这个变量
2. 在窗体上画一个文本框，其名称为Text1，然后编写以下程序：    Prirate Sub Form—Load()    Show    Textl．Text=“”    Textl．SetFocus    End Sub    Private Sub Textl—KeyPress(KeyAscii As Integer)    Char=Chr(KeyAscii)    KeyAscii=Ase(UCase(Char))    End Sub    以上程序的功能是(    )。
A. 把输入到文本框中的字母转换为小写显示
B. 把从键盘上输入的字符在文本框中原样显示
C. 把输入到文本框中的字母转换为大写显示
D. 把输入到文本框中的字符转换为其ASCII码显示
3. 窗体上有1个名称为Commandl的命令按钮，事件过程如下：    Private Sub Commandl—Click()    m=一3．6    If Sgn(m)Then    n=Int(m)    Else    n=Abs(m)    End If    Print n    End Sub运行程序，并单击命令按钮，窗体上显示的内容为(    )。
A. 一4        B. 一3
C. 3        D. 3．6
4. 以下表达式与Int(3．5)的值相同的是
A. CInt(3．5)        B. VaLl(3．5)
C. Fix(3．5)        D. Abs(3．5)
5. 以下能对正实数d的第3位小数四舍五入的表达式是(    )。
A. 0．01*Int(d+0．005)
B. 0．01*Int(100*(d+0．005))
C. 0．01*Int(100*(d+0．05))
D. 0．01*Int(d+0．05)
6. 语句：Print Int(Rnd*5+20)  的输出不可能是(    )。张力尹
A. 20        B. 22
C. 24        D. 25
7. 产生100以内(不含100)2位随机整数的Visual Basic表达式是(    )。
A. Int(Rnd(1)*91)+10
B. Int(Rnd(1)*90)+10
C. Int(Rnd(1)*91)+11
D. Int(tlnd(1)*90)+11
8. 窗体上有一个名称为Commandl的命令按钮，单击该按钮时所实现的功能是产生10个随机整数，然后从键盘输入一个整数，查该数在数组中的位置。若到，输出该数的位置；若没有到，给出相应的提示。该命令按钮的单击事件过程如下：    Private Sub Commandl—Click()    Dim a(10)As Integer    Dim X As Integer    For i=1 To 10    a(i)=Int(Rnd*100)    Next    x=InputBox(“输入100以内的整数：”)P=0For i=1 To 10    If a(i)=x Then    P=i    Exit For    End IfNextIf P=0 Then    Print”没有到与输入数据相同的数!”Else  Print Str(x)+”在数组中的位置是”+Str(p)End If    End Sub对于上述事件过程，以下叙述中正确的是(    )。
A. 本程序实际产生的随机数是0—99
B. 若产生的随机数中有相同数，则P是其中最后一个数的位置
C. 程序有错，P的初值设置不对
D. 程序有错，InputBox函数产生的数据与x的类型不匹配
9. 有下面程序代码：    Option Base 1    Private Sub Commandl—Click()    Dim a(10)As Integer，x，b    x=InputBox(“请输入一个多位整数”)    For k=1 To Len(x)    b=Mid(x，k，1)    a(Val(b)+1)=a(Val(b)+1)+1    Next k    For k=1 To 10    Print a(k)；    Next k    End Sub程序运行时，单击命令按钮Commandl，输入2355270224，则输出是(    )。
A. 1 0 4 1 1 2 0 1 0 0
B. 0 4 1 1 2 0 1 0 0 0
C. 2 3 5 5 2 7 0 2 2 4
二级VBD. 4 2 2 0 7 2 5 5 3 2
10. 数学式Y2=x>10在VB中应表示为(    )。
A. Y*Y>x And 10<=x
B. Sqr(y) >x And x>=10
C. Sqr(y)>x Or x<=10
D. Y*Y>x Or x>=10
11. 设a=10，b=4，c=5，d=7，表达式a>b And Not c<d+6的值为(  )。
A. True        B. False
于小彤个人资料名胜古迹的对联C. 1        D. 0
12. 设变量x中的值是395，则下面语句的输出是(    )。    Print x＼100+((x Mod 100)＼10)*10+(x Mod 10)*100
A. 935        B. 395
C. 539        D. 593
13. 下列运算符中，优先级别最低的是(    )。
A. Not        B. Like
C. Mod        D. And
14. 与数学式子对应的Visual Basic表达式是(    )。
A. Sqr((a+b)／a* b)
B. Sqr((a+ b)／a* b)
C. ((a+ b)／(a* b))^1／2
D. ((a+ b)／a* b)^(1／2)
15. 表达式12／2＼4的值是(    )。
A. 1．5        B. 2
C. 4        D. 1
16. 设变量x的值是845，则下面语句的输出是(    )。Print x＼100+(x Mod 100)＼10+x Mod 10
A. 17        B. 548
C. 845        D. 485
17. 设：a=2，b=8，c=6，d=3，表达式a>b And Not(c>d)Or d>c的值是(    )。
A. 1        B. 0
节约粮食手抄报内容C. True        D. False
18. 设A、B、C是三角形的3条边，则以下表示“任意两边之和大于第三边”的布尔表达式是(    )。
A. A+B>C Or A+C>B Or B+C>A
B. A+B<C Or A+C<B Or B+C<A
C. Not(A +B <=C Or A +C <=B Or B +C <=a)
D. A +B >=C And A +C >=B And B +C >=A
19. 假定有如下情况语句：Select Case X能表示｜X｜＞5的Case子句是(    )。
韩国自杀明星A. Case Not(一5 To 5)        B. Case 5 To一5
C. Case Is＜一5，Is＞5        D. Case Abs(X)＞5
20. 假定有如下的程序段：Dim intVar As Integerintvar=TruePrint intVar则输出结果是(  )。
A. 0        B. 一1
C. True        D. False
21. 有如下语句序列：Dim a，b As Integer Print aPrint b执行以上语句序列，下列叙述中错误的是(    )。
A. 输出的a值是0        B. 输出的b值是0
C. a是变体类型变量        D. b是整型变量