首页
微信群
QQ群

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

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

1: （14）下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。
           Option Base1
           Private Sub Form_Click()
           Dim x
         x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90)
         Max=1
         For k=2 To 10 Step 1
       If x(k)>x(Max)Then
End If
         Next k
         y=_______
         Print Max,y
           End Sub

2: （13）窗体中有图片（Picturel）和计时器（Timerl）两个控件。程序运行时，将图片加载到图片框中，然后图片框以每秒一次的速度向窗体的右下角移动，每次向左、向右移动300twip.请填空。
      Private Sub Form_Load()
          Picture1.Picture=LoadPicture("c:My Documents\图片\Qian1_Icon02.ico")
End Sub
      Private Sub Timer1_Timer()
      Staic x,y As Integer
           x=x+300
                 y=y+300
           Picture1.Move x,y
       End Sub

3: （12）如果要通过程序代码来一次性删除列表框中所有项目，则应使用的方法是。

4: （11）下列程序功能是：弹出一个对话框询问用户是否输出，如果是，则输出：是否结束。请填空。
           Sub PrintOut()
           Dim a As Integer
         a=MsgBox("输出结果？"vblnformation+vbYesNo,"提示：")
         If a=Then
        Print "Myresult"
          End If
      End Sub

5: （9）表达式"12345"<>"12345"&"ABC"的值是。

6: （10）若要添加CommonDialog控件，则应从“工程”菜单中选定“部分”，在“部件”对话框“控件”选项卡中选择，将控件添加到工具箱中。

7: （7）Text文本框接受的最长字符数由文本框的属性确定。

8: （8）设当前日期为2007年12月27日，星期四，则执行下列语句后的输出结果是。
        Print Day(Now)
        Print Month(Now)
        Print Year(Now)
        Print Weekday(Now)

9: （6）属性窗口分为4个部分，这4个部分分别是。

10: （5）诊断和改正程序中错误的工作通常称为。

11: （4）在进行模块测试时，要为每个被测试的模块另外设计两类模块；驱动模块和承接模块，其中的作用是将测试数据传递送给被测试的模块，并显示被测试模块所产生的结果。

12: （2）结构化分析方法是面向进行分析的方法。

13: （3）常用的软件结构设计工具是结构图（SC）也称程序结构图。其中，用矩形表示，用带空心圆的箭头表示传递的是数据。

14: （35）在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名（StuName）、年级（StuGrade）和年龄（StuAge）.在程序中有下列记录类型和窗体的事件过程，请选择正确的语句完成程序
Private Type student
        StuName As String*10
        StuGrade As String*10
        StuAge As String
         End Type
         Private Sub For_Click()
         Dim s As student
              Open"c:student.txt"For Random As#1 Len=Len(s)
        For i=1 To 1
      s.StuName=InputBox("请输入姓名")
      s.StuGrade=InputBox("请输入年纪号")
      s.StuAge=InputBox("请输入年龄")
         Next i
         End Sub

A.Print#1,s        B.Print#1,I       C.Put#1,,s         D.Put#1,,i

15: （1）软件生命周期分为软件定义期、软件开发期和软件维护期，详细设计属于中的一个阶段。

16: （34）执行语句Open"TC.dat"For Random As#1 Len=50后，对文件TC.dat中的数据能执行的操作是

A.只读操作       B.只写操作      C.既可以读，也可以写      D.追加操作

17: （32）按文件的内容划分有

A.顺序文件和随机文件           
B.ASCII文件和二进制文件
C.程序文件和数据文件           
D.磁盘文件和打印文件

18: （33）在用Open语句打开文件时，如果省略“For”方式，则打开的文件的存取方式是

A.顺序输入方式          
B.顺序输出方式
C.随机存取方式           
D.二进制方式

19: （31）当一个工程含有多个窗体时，其中的启动窗体是

A.启动Visual Basic时建立的窗体      
B.第一个添加的窗体
C.最后一个添加的窗体           
D.在“工程属性”对话框中指定的窗体

20: （30）要使某菜单能够通过按住键盘上的键及键打开，应

A.在“名称”栏中“K”字符前加上&符号
B.在“标题”栏中“K”字符后加上&符号     
C.在“标题”栏中“K”字符前加上&符号
D.在“名称”栏中“K”字符后加上&符号

21: （27）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序：
         Dim y As Integer
         Private Sub Command1_Click()
         Dim x As Integer
       x=2
       Text1Text=p2(p1(x),y)
       Text2Text=p1(x)
         End Sub
         Private Function pl(x As Integer) As Integer
        x=x+y:y=x+y
        pl=x+y
         End Function
         Private Function p2(x As Integer,By Val y As Integer)
        p2=2*x+y
         End Function
         当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为

A.2 4     2 4      
B.2  4    4  8
C.4 4         8 8   
D.10 10    58 58

22: （28）要使菜单的说法错误的是

A.MenuOne.Visible=True        
B.MenuOne.Visible=False
B.MenuOne.Enabled=True        
D.MenuOne.Enabled=False

23: （29）使用“打开”对话框的方法是

A.每个菜单项都是一个控件，与其他控件一样也有属性和事件
B.除了Click事件之外，菜单项不可以响应其他事件         
C.菜单项的索引号可以不连续
D.菜单项的索引号必须从1开始

24: （25）下列程序段的输出结果是
Dim M(5,5),S(5)
         For i=1 To 5
         S(i)=0
         For j=1 To 5
        M(i,j)=i+j
        S(i)=S(i)+M(i,j)
         Next j
         Next i
         For Each x In S
          Print x；
         Next x

A.20 23 24 35 40     B.20 25 30 35 40   C.20 23 25 35 40   D.20 25 35 40 45

25: （26）下列描述不正确的是

A.某个子过程中声明的局部变量，其使用范围仅限定于该子过程内
B.某个子过程中声明的局部变量，其生命周期仅限于该子过程被执行过程中
C.不同子过程中的局部变量可以具有相同的名称
D.不同子过程中具有相同的名称的局部变量是同一变量

26: （24）在窗体上画一个名为Command1德命令按钮，然后编写下列程序：
         Option Base 1
         Private Sub Command1_Click()
         Dim Arr

Arr=Array(1,2,3,4,5)
j=1
For i=5 To 1 Step -1    S=S+Arr(i)*j
j=j*10    Next    Print S
End Sub    程序运行后，单击命令按钮，输出结果是    
A.54321        B.123        C.12345      D.345

27: （23）语句Dim Arr(3 To 5,-2 To 2)定义的数组的元素个数是

A.20          B.12        C.15        D.24

28: （22）在窗体上添加一个命令按钮，名为Command1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出
For i=1 To 4
       For j=1 To 3
           x= 3
           For k=1 To 2
         x=x+3
           Next k
       Next j
         Next i
         Text1.Text=Str(x)

A.3         B.6          C.9         D.12

29: （20）用户在组合框中输入或选择的数据可以通过属性来获得。

A.List         B.ListIndex          C.Text         D.ListCount

30: （21）某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabed=True,Intervai=0,并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间
Private Sub Timer()
             Label1.Caption=Time$
         End Sub
在程序执行时发现未能实现上述目的，那么，应做的修改是（  ）。

A.通过属性窗口把计时器的Interval属性设置为2000
B.通过属性窗口把计时器Enabled属性设置为False
C.把事件过程中的Labell.Caption=Time$语句改为Timer1.Interval=Time$
D.把事件过程中的Labell.Caption=Time$语句改为Labell.Caption=Timer1.Time

31: （19）下列关于复选框的说法，正确的是

A.复选框的Enabled属性用于决定该复选框是否可见         
B.复选框的Value属性用于决定该复选框是否被选中      
C.复选框的TabIndex属性用于决定该复选框在控件数组中的序号        
D.复选框的Visible属性用于决定该复选框是否可用

32: （18）如果要在程序代码中为图片框动态加载或清除图形，可以通过函数来实现。

A.InputBox         B.Input          C.LoadPicture       D. PaintPicture

33: （16）下列每组控件中，都包含有滚动条的一组控件是

A.ListBox和Label         
B.TextBox和DriveListBox
C.ComboBox和CheckBox           
D.FileListBox和DirListBox

34: （17）在窗体上有一个文本框，其名称为Text1，编写下列事件过程：
         Private Sub Text1_KeyPress(KeyAscii As Integer )
         Dim str As String
       Str=Chr(KeyAscii)
       KeyAscii=Asc(UCase(str))
       Text1.Test=String(2,KeyAscii)
         End Sub
         程序运行后，如果在键盘上输入字母“a”则在文本框Text3中显示的内容为

A.aaa       B.AAA       C.AA        D.aa

35: （15）将文本框的PasswordChar属性设置为一个星号*，运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是

A.文本框的MultiLine属性值为True     B.文本框的Looked属性值为True       
C.文本框的MultiLine属性值为False    D.文本框的Looked属性值为False

36: （13）单击命令按钮时，下列程度的执行结果是
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer

a=2:b=4:c=6
Call S2(a,b)    Print"a=";a;"b=";b;"c=";c;
End Sub    Private Sub S1(x As Integer,y As Integer)
Dim c As Integer    x=2*x:y=y+2:e=x+y
End Sub    Sub S2(x As Integer,By Val y As Integer)
Dim e As Integer    x=2*x:y=y+2:e=x+y
End Sub
A.a=4 b=6 c=6        B.a=8 b=6 c=6        
a=4 b=6 c=6          a=8 b=6 c=6
C.a=4 b=6 c=6        D.a=8 b=6 c=6

37: （14）有下列程序，程序运行后单击命令按钮，则输出的结果是
Private Sub Command1_Click()
     Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2#
        For i=1 To 4

a(i)=i    Next i
For i=3 To 6
b(i)=i    Next i    s1=Factorial(a)    S2=Factorial(b)    Print"s1="；s1；"s2"；s2；
End Sub
Function Factorial(a()As Integer)
Dim t#,i%    t=1
For i=LBound(a) To UBound(a)    t=t*a(i)    Next i
Factorial=t
End Factorial
A.s1=360 s2=24       B.s1=24 s2=360

38: （11）下列说法错误的是

A.在同一模块不同过程的变量可以同名       
B.不同模块中定义的全局变量可以同名
C.引起另一模块中的全局变量时，必须在变量名前加模块名
D.同意模块中不同级的变量可以同名

39: （12）下列程序段的运行结果是
Sub sele()
         Dim n As Integer
       I=21:n=3
       Do While i>n
          I=i-n
       Loop
       Print i
         End Sub

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

40: （8）最简单的交换排序方法是

A.快速排序        B.选择排序       C.堆排序        D.冒泡排序

41: （9）对于长度为n的线性表，在最坏情况下，下列各种排序法对应的比较次数中正确的是

A. 冒泡排序为n/2         
B.冒泡排序为n       
C. 快速排序为n           
D. 快速排序为n(n-1)/2

42: （10）结构化程序设计的3中基本结构式

A.过程、子程序和分程序           
B.顺序、选择和重复     
C.递归、堆栈和队列         
D.调用、返回和转移

43: （6）某二叉树共有60个叶子结点与50个度为1的结点，则该二叉树中的总结点数为

A. 148      B.169           C.182         D. 198

44: （7）下列数据结构中，能用二分法进行查找的是

A.顺序存储的有序线性表          
B.结性链表      
C.二叉链表          
D.有序线性链表

45: （5）下列关于线性链表的描述中正确的是

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

46: （4）按照“先进先出”组织数据的数据结构式

A. 队列          B. 栈          C.双向链表       D.二叉

47: （3）下列叙述中错误的是

A. 线性表是由n个元素组成的一个有限序列
B.线性表是一个线性结构
C.线性表的所有结点有且仅有一个前件和后件
D.线性表可以是空表

48: （1）下列选项中，不是一个算法的基本特征的是。

A. 完整性       B.可行性       C. 有穷性     D.拥有足够的情报

49: （2）下列数据结构中，属于非线性的是

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