首页
微信群
QQ群

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

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

1: （10）假设有下列程序段：
         For i=1 To 3
           For j=5 To 1 Step -1
          Print i*j
           Next j
         Next i
则语句Print i*j的执行次数是，i的值为______，j的值为______。

2: （11）下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。
         Private Sub Command1_Click()
          Max=0
          Mix=10
          For i=1 To 20
         n=Val(InputBox("请输入分数"))
         If n>Max Then Max=n
         If n>Mix Then Mix=n
         s=s+n
s=s-Mix-Max
          P=s/18
          Print"最高分";Max;"最低分";Mix
          Print"最后得分：";p
         End Sub

3: （9）滚动条的最小值属性是，最大值属性是______。

4: （8）在程序的空白处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除
Do While List2.ListCount
           _____________________
           List2.RemoveItem 0
        Loop

5: 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。
        Private Sub Command1_Click()
       x=Val(Text1.Text)
       IfThen
          Print x
       Else
          ________
          Text1.Text=""
       End If
        End Sub

6: （4）在面向对象方法中，类之间共享属性和方法的机制称为。

7: （5）软件是程序、数据和的集合。

8: （6）表达式Len(Str(1.3))Mod2的值为。

9: （3）树中度为零的结点称为。

10: （2）按照逻辑结构分类，结构可以分为线性结构和非线性结构，栈属于。

11: （1）算法的复杂度主要包括时间复杂度和复杂度。

12: （34）下列程序的功能是：将数据1,2,…,8写入顺序文件Num.txt中，请选择正确的程序段。
                  Private Sub For_Click()
      Dim i As Integer
           Open "Num.txt"For Output As #1
           For i=1 To 8
Next i
           Close #1
      End Sub

A.Print #1,i      B.input #1,I     C.Print #1      D.input #1

13: （35）有下列程序段，单击命令按钮执行程序后，输出结果是。
Option Base 1
Private Sub Commandl_Click()
         Dim x
       x=Array(23,-5,17,38,-31.46,11,8,5,-4)
       s1=0
       s2=0
             For k=1 To 10
           If(x(k)>0)Then
          s1=sl+x(k)
           Else
          s2=s2+x(k)
           End If
       Next k
       Y=s1/Abs(s2)
       Print Y
         End Sub

A.148         B.40      C.-40      D.3.7

14: （32）下列程序的功能是调用字体对话框来设置文本框中的字体，单击Command1按钮弹出对话框，进行相应的字体，字号等的设置，然后单击“确定”按钮退出对话框，则将发生哪些变化。
Private Sub Commandl_Click()
         CommandDialog1.CancelError=True
         CommandDialog1.Flags=3
         On Error Resume Next
         CommandDialog1.ShowFout
         Txet1.Font.Name=CommandDialog1.FontName
         Txet1.Font.Size=CommandDialog1.FontSize
         Txet1.Font.Bold=CommandDialog1.FontBold
         Txet1.Font.Italic=CommandDialog1.FontItalic
         Txet1.Font.Underline=CommandDialog1.FontUnderline
         Txet1.FontStrikethru=CommandDialog1.FontStrikethru
         Txet1.FontColor=CommandDialog1.FontColor
End Sub

A.Text1的字体不发生变化      
B.Text1的字体发生变化
C.Text1的字体和颜色发生变化        
D.程序出错

15: （33）Visual Basic根据计算机访问文件的方式将文件分成3类，其中不包括

A.顺序文件     B.Unix文件     C.二进制文件      D.随机文件

16: （31）下列叙述正确的是

A.任何时候都可以使用标准工具栏中的“菜单编辑器”按钮打开菜单编辑器
B.只有当代码窗口为当前活动窗口时，擦能打开菜单编辑器
C.只有当窗体设计窗口为当前活动窗体时，才能打开菜单编辑器
D.任何时候都可以使用“工具”菜单中的“菜单编辑器”命令，打开菜单编辑器

17: （29）Sub过程与Function过程最根本的区别是。

A.Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以
B.Function过程可以有参数，Sub过程不能有参数
C.两种过程参数的参数传递方式不同
D.Sub过程的过程名不能有返回值，而Function过程能通过过程名返回值

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

A.2 4      B.2 4      C.4 4           D.10 10    2 4         4 8 &nbsp

19: （28）在窗体上画4个文本框，并用这4个文本框建立一个控件组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：
Private Sub Command1_Click()
        For Each TextBox In Text1
       Text1(i)=Text1(i).Index
       i=i+1
        Next
         End Sub
程序运行后，单击命令按钮，4个文本框中显示的内容分别为

A.0 1 2 3           B.1 2 3 4           C.0 1 3 2          D.出错信息

20: （27）下列程序段的输出结果是。
         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

21: （26）在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：
         Private Option Base 1
         Sub Command1_Click()
         Dim c As Integer,d As Integer
       d=0
       c=6
       X=Array(2,4,6,8,10,12)
       For i=1 To 6
           IfX(i)>c Then
          d=d+X(i)
          c=X(i)
                 Else
          d=d-c
           End If
       Next i
       Print d
         End Sub
         程序运行后，单击命令按钮，则在窗体上输出的结果是。

A.10          B.12         C.16       D.20

22: （25）下列程序的运行结果是。
         Private Function myfun(m,n)
         Do While m>n
       Do While m>n:m=m-n:Loop
       Do While n>m:n=n-m:Loop
         Loop
         myfun=m
         End Function
         Private Sub Command1_Click()
         Print myfun(9,8)
         End Sub

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

23: （22）某程序列表框中有许多项，现在用Timer控件控制时间，0.1秒删除一项，直接删完为止，用一滚动条来显示删除的项目，请选择合适的语句，完成此程序。
         Private Sub Command2_Click()
        HScro11l.Min=0
        HScro11l.Max=List1.ListCount
        HScro11l.Value=0
        Timer1.Interval= ________
        Timer1.Enabled=True
         End Sub
         Private Sub Timer1_Timer()
        If List1.ListCount>0 Then
        List1.RemoveItem 0
        HScro11l.Value=HScro11l.Max-Listl.ListCount
        Else
        Timer1.Enabled=_________
              MsgBox"全部删除！"
        End If
         End Sub

A.100 False       B.0.1  True     C.100  True      D.0.1   False

24: （24）在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程：
         Private Sub Command1_Click()
         Dim i As Integer
       For j=0 To 50
           i=i+3
           n=n+1
           If i>10 Then Exit For
       Next
       Text1.Text=Str(n)
   End Sub
   单击命令按钮，程序运行后，在文本框中显示的值是

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

25: （23）下列程序执行后，变量x的值为。
Dim a,b,c,d As Single
Dim x As Single

a=10  
b=30
c=400
If b>a Then
d=a:a=b:b=d
End If    
If b>c Then    x=b
Elself a>c Then    x=c
Else    x=c
End If

26: （20）下列控件属性中，属性值的类型不相同的一项是

A.Label控件的Enabled属性与TexBox控件的Enabled属性
B.OptionButton控件的Value属性与CheckBox控件的Value属性
C.Command控件的Default属性与Command控件的Cancel属性
D.Command控件的Visible属性与Form控件的Visible属性

27: （21）属性用于设置组合框的风格。

A.Backstyle         B.Borderstyle       C.Style        D.Sorted

28: （19）要清楚已经在图片框Picture1中打印的文字符串而不清除图片框中的图像，应使用语句

A.Picture1.C1s          
B.Picture1.Picture=LoadPicture("")
C.Picture1.pint""       
D.Picture1.Picture""

29: （17）在文本框控件中，将Text的内容全部显示为用户所定义的字符的属性是

A.PasswoedChar     B.需要编程来实现    C.Password    D.以上都不是

30: （18）在窗体上有一个文本框Text1、Text属性值为空，然后编写下列事件过程：
         Privte Sub Text1_KeyPress(KeyAscii As Integer)
         Dim str As String,n As Integer
             Str=UCase(Chr(KeyAscii)
       n=Len(str)
       Text1.Text=String(n,str)
         End Sub
         程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为。

A.pp        B.pP       C.PP            D.Pp

31: （16）下列程序的输出图形是。
For k=0 To 360
Cr=Int(160*Rnd)

Ang=-3.1415926/180*k
Circle(2000,2000),500,cr,0,ang    Next
A.一段彩色圆弧           B.一个彩色扇形
C.一个彩色空心圆                     D.一个辐射状彩色圆形

32: （15）已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的Visual Basin表达式为

A.Eˆ*Sin(30*3.14/180)*2*X/X+Y*Log(X)
B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X)     
C.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Log(X)
D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X)

33: （13）语句Y=Y+1的正确含义是

A.变量Y的值与Y+1的值相等       
B.将变量Y的值存到Y+1中去          
C.讲变量Y的值加1后赋值给变量Y        
D.变量Y的值为1

34: （14）设A="87654321",则表达式Val(Left(A,4)+Mid(A,4,2))的值为

A.876543      B.876554            C.8      D.6

35: （11）在窗体中放置控件，对该控件的操作错误的是

A.单击窗体上没有控件处，可把活动控件变为不活动控件          
B.双击任一个控件内部，可激活控件的代码窗口
C.双击一个控件内部，可把活动控件变为不活动控件        
D.拖动一个活动控件四周的控制小方块可缩放控件

36: （12）在随机文件中使用用户自定义数据类型时，要注意它的成员的要求，它的成员不能是

A.定义字符和数组          
B.变长字符串和动态数组           
C.货币型和日期型          
D.变长字符串和货币型

37: （10）下列工具中为需求常用工具的是。

A.PAD      B.PED           C.N-S           D.DFD

38: （9）设计软件结构是在软件生命周期的

A.软件定义期     B.软件开发期    C.软件维护期     D.以上3个都不是

39: （8）下列不属于软件工程的3个要素的是。

A.工具      B.过程           C.方法          D.环境

40: （6）下列特征中不是面向对象方法的主要特征的是

A.多态性          B.继承      C.封装性         D.模块化

41: （7）有下列二叉树，对此二叉树中序遍及结果是

A.BDYEACFXZ       B.DYBEAFCZX      C.ABCDEFXYZ      D.ABDYECFXZ

42: （5）下列叙述中正确的是

A.在模块化程序设计中，一个模块应该尽量多的包括与他模块联系的信息
B.在自顶向下、逐步细化的设计过程中，首先应设计解决问题的第一个细节
C.在模块化程序设计中，一个模块内部的控制结构也要符合结构化原则         
D.在程序设计过程中，不能同时采用结构化程序设计方法与模块化程序设计方法

43: （4）对长度为n的线性表进行顺序查找，在最坏情况下需要比较的次数为

A. 125      B. N/2      C.n       D.n+1

44: （3）下列关于栈的描述中错误的是

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

45: （2）下列叙述中错误的是

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

46: （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