首页
微信群
QQ群

2012年9月计算机等级考试二级VB程序设计考前全真模拟试卷（十）

如果您发现本试卷没有包含本套题的全部小题，请尝试在页面顶部本站内搜索框搜索相关题目，一般都能找到。

1: 10．阅读程序：
Sub p( b () As Integer)
For i =1To 4
b(i) = 2(i
Next i
End Sub
Private Sub Command1_Click()
Dim a (1 To 4) As Integer
     a(1)=5
     a(2)=6
     a(3)=7
       a(4)=8
call p (a)
For i=1 To 4
       Print a(i)
Next i
End Sub
运行上面的程序，单击命令按钮，输出结果为。

2: 9．设在工程中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As String ( 10
Te1Num As String * 20
End Type
在窗体上添加一个名为Command1的命名按钮。要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。请在横线中填入适当的内容，将程序补充完整。
Private Sub Command1_Click()
  Dim B As____
  Open "c：\person.txt"For Output As #1
  B.Name=InputBox("输入姓名")
  B.Te1Num=InputBox("输入学号")
  Write#1,B.Name,B.Te1Num
  Close #1
End Sub

3: 7．在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机整数，分别显示在标签控件数组的各个标签中，如图所示。单击“计算”按钮，则将标签数组各元素的值累加，然后将计算结果显示在Label2中。请填空。
Private Sub Command1_Click()
Sum = 0
For i = 0 To 4
Sum = Sum + ____
Next
____ = Sum
End Sub

4: 8．为了改变计时器控件的时间间隔，应该修改该控件的属性。

5: 5．本程序的功能是利用随机函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。

Private Sub Command1_Click()
  Randomize
  n = CInt(Text1.Text)
  n1 = 0
  n2 = 0
  For i = 1To
     r = Int(Rnd*2)
     If r = ____Then
        n1 = n1+1
     Else
        n2 = n2+1
     End If
  Next
  Text2.text = n2
  Text2.text = n2
End Sub

6: 6．阅读程序：
Option Base 1
Private Sub Form_Click()
Dim a(3) As Integer
Print "输入的数据是：";
For i =1 To 3
   a(i) = InputBox("输入数据")
   Print a(i);
Next
Print
If a(1)    t = a(1)
    a(1) = a(2)
    a(2) = ____
End If
If a(2)>a(3) Then
     m = a(2)
ElseIf a(1)>a(3) Then
     m = ____
Else
     m = ____
End If
Print "中间数是：";m
End Sub
程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数种的中间数，如图所示。请填空。

7: 4．为了使设计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的属性设置为____。

8: 3．按数据流的类型，结构化设计方法有两种设计策略，它们是变换分析设计和。

9: 2．以下程序段的输出结果是。
num=0
while num<=2
num = num+1
wend
Print

10: 31．设在工程中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As String *10
Te1Num As String *20
End Type
在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是。

A．Private Sub Command1_Click()
Dim B As Books    Open"c":\Person.txt"For Output As #1
B.Name=InputBox（"输入姓名"）
B.Te1Num=InputBox（"输入电话号码"）    Write #1,B.Name,B.Te1Num
Close #1
End Sub
B．Private Sub Command1_Click()
Dim B As Books    Open"c":\Person.txt"For Input As #1
B.Name=InputBox（"输入姓名"）
B.Te1Num=InputBox（"输入电话号码"）    Prite #1,B.Name,B.Te1Num

11: 1．数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段，其中数据独立性最高的阶段是。

12: 30．以下叙述中错误的是。

A．一个工程中只能有一个Sub Main过程
B．窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C．窗体的Hide方法和UnLoad方法的作用完全相同
D．若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体

13: 29．设窗体上有一个名为Text1的文本框，并编写如下程序：
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Form_MouseUp(Button As Integer，_
Shift As Integer,X As Single,Y As Single）
Print"程序设计"
End Sub
Prinvate Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)
Print "Visual Basic";
End Sub
程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是。

A．Visual Basic
B．程序设计
C．Visual Basic 程序设计
D．a程序设计

14: 26．以下叙述中错误的是。

A．在KeyUp和KeyDowm事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）
B．在KeyUp和KeyDowm事件过程中，将键盘上的“1”和右侧小键盘上的“1”视作不同的数字（具有不同的KeyCode）
C．KeyPress事件中不能识别键盘上某个键的按下与释放
D．KeyPress事件中可以识别键盘上某个键的按下与释放

15: 28．在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：
Private Sub Command1_Click()
  n = Val (Text1.Text)
  For i = 2 To n
     For j = 2 To Sqr(i)
        If i Mod j = 0 Then Exit For
     Next j
     If j >Sqr (i) Then Print i
  Next i
End Sub
  该事件过程的功能是。

A．输出n以内的奇数
B．输出n以内的偶数
C．输出n以内的素数
D．输出n以内能被j整除的数

16: 27．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
’ c=1234
c1=Trim(Str(c))
For i=1 To 4
Print__
Next
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容：
1
12
123
1234
则在下划线处应填入的内容为。

A．Right(c1,i)
B．Left(c1,i)
C．Mid(c1,i,1)
D．Mid(c1,i,i)

17: 24．在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a1(4,4),a2(4,4)
For i=1 To 4
For j=1 To 4

al(i,j)=i+j
a2(i,j)=a1(i,j)+i+j    Next j    Next i    Print al(3,3);a2(3,3)
End Sub    程序运行后，单击命令按钮，在窗体上输出的是（ ）。
A．6 6           B．10 5        C．7 21          D．6 12

18: 25．假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是。

A．数组中每个命令按钮的名称（Name属性）均为Command1
B．数组中每个命令按钮的标题（Caption属性）都一样
C．数组中所有命令按钮可以使用同一个事件过程
D．用名称Command1（下标）可以访问数组中的每个命令按钮

19: 23．在窗体上画一个命令按钮，命名为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1，在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则F1返回1，否则返回0。能够正确实现上述功能的代码是。

A．Private Sub Command1_Click()    x=InputBox("请输入整数")
a=F1（Val（x））    Print a
End Sub
Function F1(ByRef b As Integer)
If b Mod 2=0 Then    Return 0
Else    Return 1
End If
End Function
B．Private Sub Command1_Click()    x=InputBox("请输入整数")
a=F1（Val（x））    Print a

20: 22．在窗体上绘制一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
c="ABCD"
For n=1 To 4
Print__
Next
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容：
D
CD
BCD
ABCD
则在横线处应填入的内容为

A．Left(c.n)      B．Right(c,n)          C．Mid(c,n,1)        D．Mid(c,n,n)

21: 21．在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer,x As Integer
For i=1 To6
If i=1 Then x=i
If i<= 4 Then
x=x+1
Else
x=x+2
End If
Next i
Print x
End Sub
程序运行后，单击命令按钮，其输出结果为。

A．9          B．6          C．12           D．15

22: 20．在窗体上绘制一个名称为List1的列表框，一个名称为Label1的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中的项目的名称。下列能正确实现上述操作的程序是。

A．Private Sub List1_Click()    Labell.Caption=List.ListIndex
End Sub
B．Private Sub List1_Click()    Labell.Name=List1.ListIndex
End Sub
C．Private Sub List1_Click()    Labell.Name=List1.Text
End Sub
D．Private Sub List1_Click()    Labell.Caption=List.Text
End Sub

23: 19．执行如下两条语句后，窗体上显示的是。

a=9.8596    print Format(a,"$00,00.00")
A．0,009.86      B．$9.86       C．9.86      D．$0,009.86

24: 18．执行语句Open"Tel.dat"For Random As#1 Len=50后，对文件Tel.dat中的数据能够执行的操作是。

A．只能写，不能读
B．只能读，不能写
C．既可以读，也可以写
D．不能读，不能写

25: 16．下列程序段的执行结果为
Dim M(10)
For k=1 To 10
M (k)=11-k
Next k
x=6
Print M (2+M(x))

A．2      B．3          C．4           D．5

26: 17．在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1，然后编写如下代码：
Private sub Command1_Click()
Text1.text="AB"
End Sub
Private Sub Command2_Click()
Text1.Text="CD"
End Sub
首先单击Command1按钮，然后再单击Command2按钮，在文本框中显示。

A．AB      B．CD      C．ABCD      D．CDAB

27: 14．执行下面的程序段，x的值为。
private Sub Command1_Click()
For i=1 To 5

a=a+i    Next i    X=Val(i)    msgBox x
End Sub
A．5          B．6         C．7         D．8

28: 15．设a=5，b=10，则执行
c=Int((b-a)*Rnd+a)+1后，c值的范围为

A．5~10       B．6~9      C．6~10        D．5~9

29: 11．在窗体（名称为Form1）上绘制一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是。

A．Private Sub Tex1_Change()
Command1.Caption="计算机等级考试"
End Sub
B．Private Sub Command1_Click()
Caption="计算机等级考试"
C．Private Sub Command1_Click()    Text.Caption="计算机等级考试"
End Sub
D．Private Sub Command1_Click()    Text1.Text="计算机等级考试"
End Sub

30: 12．以下关于变量作用域的叙述中，正确的是。

A．窗体中凡被声明为Private的变量只能在某个指定的过程中使用
B．全局变量必须在标准模块中声明
C．模块级变量只能用Private关键字声明
D．Static类型变量的作用域是它所在的窗体或模块文件

31: 13．如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是。

A．如果工程中含有Sub Main过程，则程序一定首先执行该过程
B．不能把标准模块设置为启动模块
C．用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体
D．任何时刻最多只有一个窗体是活动窗体

32: 10．以下叙述中错误的是。

A．一个工程可以包括多种类型的文件
B．Visual Basic应用程序既能以编译方式执行，也能以解释方式执行
C．程序运行后，在内存中只能驻留一个窗体
D．对于事件驱动型应用程序，每次运行时的执行顺序可以不一样

33: 9．表示滚动条控件取值范围最大值的属性是。

A．Max
B．LargeChange
C．Value
D．Max-Min

34: 8．在数据库管理系统提供的数据语言中，负责数据的查询及增、删、改等操作的是。

A．数据定义语言
B．数据转换语言
C．数据操纵语言
D．数据控制语言

35: 7．在软件开发中，下面任务不属于设计阶段的是。

A．数据结构设计
B．给出系统模块结构
C．定义模块算法
D．定义需求并建立系统模型

36: 4．在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为

A．For i=0 To List1.ListCount?1    ．．．    Next
B．For i=0 To List1.Count?1    ．．．    Next
C．For i=1 To List1.ListCount    ．．．    Next
D．For i=1 To List1.Count    ．．．    Next

37: 5．下列对于线性链表的描述中正确的是

A．存储空间不一定是连续，且各元素的存储顺序是任意的
B．存储空间不一定是连续，且前件与元素一定存储在后件元素的前面
C．存储空间必须连续，且前件元素一定存储在后件元素的前面
D．存储空间不想连续，且各元素的存储顺序是任意的

38: 6．下列对于软件测试的描述中正确的是。

A．软件测试的目的是证明程序是否正确
B．软件测试的目的是使程序运行结果正确
C．软件测试的目的是尽可能多地发现程序中的错误
D．软件测试的目的是使程序符合结构化原则

39: 下列关于栈的描述中错误的是。

A.栈是先进后出的线性表
B.栈只能顺序存储
C.栈具有记忆作用
D.对栈的插入与删除操作中，不需要改变栈底指针

40: 3．在一棵二叉树上第5层的结点数最多是。

A．8       B．16           C．32      D．15

41: 1．下面叙述正确的是。

A．算法的执行效率与数据的存储结构无关
B．算法的空间复杂度是指算法程序中指令（或语句）的条数
C．算法的有穷性是指算法必须能在执行有限个步骤之后终止
D．以上三种描述都不对

相关试卷

2017年全国计算机等级《二级VF》

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年计算机二级考试VF模拟试题

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库1(

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库2(

所属类型：模拟考试2021-03-23

2017年全国计算机二级考试题库3(

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23

2016年全国计算机等级考试《二级V

所属类型：模拟考试2021-03-23