一起答

2017年计算机二级考试题库三(VB)

如果您发现本试卷没有包含本套题的全部小题,请尝试在页面顶部本站内搜索框搜索相关题目,一般都能找到。
  1. 程序运行后,若为“甲队”且成绩大于80分,则在窗体上显示“表现优良”,否则显示“表现普通”。

     Private Sub Form_Activate()

     Dim team1 As String

     Dim fen As Integer

     team 1="乙队"

     fen=86

     Print

     Print"球队=;"team1

     Print"成绩=;"fen

     If team1="甲队"Then

     If fen>=80 Then

     Print"表现优良!"

     Else

     ______

     End If

     Else

     Print"表现普通"!

     End If

     End Sub

  2. 在面向对象方法中,(  )描述的是具有相似属性与操作的一组对象。

    • A.属性
    • B.事件
    • C.方法
    • D.类
  3. 在窗体上画一个命令按钮Command1,然后编写如下程序:

     Private Sub Command1_click()

     Dim arr() As Integer

     ReDim arr(3)

     For i=0 To 3

      arr(i)=i

     Next i

     x=InputBox("请输入一个数字:")

     If Val(x)>4 Then

       ReDim arr(4)

       an(4)=x

     End If

        Me.Print(an(4)-arr(3))

     End Sub

     程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为【 】。

  4. 改变驱动器列表框的Drive属性值将激活 ______ 事件。

    • A.Change
    • B.Scroll
    • C.KeyDown
    • D.KeyUp
  5. 关于MDI体下列说法正确的是(  )。

    • A.一个应用程序可以有多个MDI窗体
    • B.子窗体可以移到MDI窗体以外
    • C.不可以在MDI窗体上放置按钮控件
    • D.MDI窗体的子窗体不可拥有菜单
  6. 在Visual Basic 6中下列 ______是不对的。

    • A.可以编写ActiveX控件
    • B.可以编写网络程序
    • C.可以通过直接访问或建立连接的方式访问大型网络数据库
    • D.可以写出16位应用程序
  7. 要使文本框获得输入焦点,则应采用文本框控件的方法是

    • A.GotFocus
    • B.LostFocous
    • C.KeyPress
    • D.SetFocus
  8. 窗体上有List1、List2两个列表框,List1中有若干列表项(见图),并有下面的程序:

    Private Sub Command1_Click(  )

    For k=List1.ListCout-1 To 0 Step-1

    If List1.Selected(k)Then

    List2.Addltem List1.List(k)

    List1.Removeltem k

    End If

    Next k

    End Sub

    程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是(  )。

    • A.在List2中插入了“外语”、“物理”两项
    • B.在List1中删除了“外语”、“物理”两项
    • C.同时产生A和B的结果
    • D.把List1巾最后1个列表项删除并插入到List2中
  9. 下列关于文件的叙述中,错误的一条是______。

    • A.在随机访问模式下,文件中的每条记录的长度可以不同
    • B.在对文仆进行任何操作之前,必须事先打开文件
    • C.LOF()函数返回文件的字节数,如果返回0,表示该文件是一个空文件
    • D.在二进制访问模式中,可以把文件指针移到文件的任何地方
  10. 用Print方法在Form1窗体中显示出4个#号的正确代码为(  )。

    • A.Debug.Print"####"
    • B.Print ####
    • C.Form1 Print ####
    • D.Form1.Print"####"
  11. 在下列选项中,哪个不是一个算法一般应该具有的基本特征 ______。

    • A.确定性
    • B.可行性
    • C.无穷性
    • D.拥有足够的情报
  12. 假定在窗体上建立了一个通用对话框,其名称为Cd1,用下面的语句可以建立一个对话框:  Cdl. ShowPrinter  与该语句等价的语句是  (  )

    • A.Cd1. Action=2
    • B.Cd1. Action=3
    • C.Cd1 Action=4
    • D.Cd1. Action=5
  13. Visual Basic根据计算机访问文件的方式将文件分成三类,其中不包括 ______。

    • A.顺序文件
    • B.Unix文件
    • C.二进制文件
    • D.随机文件
  14. 下列字符串常量中,最大的是(  )。

    • A.北京
    • B.上海
    • C.天津
    • D.广州
  15. 表示滚动条控件取值范围最大值的属性是(  )。

    • A.Max
    • B.LargeChange
    • C.Value
    • D.Min
  16. 软件(程序)调试的任务是

    • A.诊断和改正程序中的错误
    • B.尽可能多地发现程序中的错误
    • C.发现并改正程序中的所有错误
    • D.确定程序中错误的性质
  17. 下列 ______语向可以为动态数组分配实际元素个数。

    • A.Dim语句
    • B.static语句
    • C.public语句
    • D.ReDim语句
  18. 下列可作为Visual Basic变量名的是______。

    • A.A#A
    • B.4A
    • C.xy
    • D.constA
  19. 下列叙述中正确的是

    • A.用E-R图能够表示实体集间一对一的联系、一对多的联系和多对多的联系
    • B.用E-R图只能表示实体集之间一对一的联系
    • C.用E-R图只能表示实体集之间一对多的联系
    • D.用E-R图表示的概念数据模型只能转换为关系数据模型
  20. 执行以下程序段

     Dim x As Integer,i As Integer

     x=0

     For i=20 To 1 Step-2  x=x+i\5

      Next i

       后,x的值为

    • A.16
    • B.17
    • C.18
    • D.19
  21. 在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写下列代码:

    Dim SaveAll As String

    Private Sub Form. Load( )

    Show

    Text1.Text=""

    Text1.SetFocus

    End Sub

    Private Sub Command1 Click( )

    Text1.Text=LCase(SaveAll)+SaveAll

    End Sub

    Private Sub Form. KeyPress(KeyAscii As Integer)

    SaveAll=SaveAll+Chr(KeyAscii)

    End Sub

    程序运行后,直接用键盘输入VB,再单击命令按钮,则文本框中显示的内容为( )。

    • A.vbVB
    • B.不显示任何信息
    • C.VB
    • D.出错
  22. 算法的时间复杂度是指

    • A.执行算法程序所需要的时间
    • B.算法程序的长度
    • C.算法执行过程中所需要的基本运算次数
    • D.算法程序中的指令条数
  23. 设有语句:  Temp=MsgBox("程序执行了非法操作",vbAbortRetryIgnore,"提示信息”)  程序运行时,在对话框中将显示(  )个按钮。

    • A.1
    • B.2
    • C.3
    • D.4
  24. 表达式Str(Len(“123”))+Str(77.7)的值是(  )。

    • A.377.7
    • B.377.7
    • C.80.7
    • D.12377.7
  25. 在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:  Private Sub Command1_Click()  x=Int(Val(Text1.Text)+0.5)  Label1.Calffion=Str(x)  End Sub  程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。

    • A.27
    • B.28
    • C.29
    • D.30
  26. 关闭当前的工程并退出Visual Basic的快捷键是

    • A.Alt+B
    • B.Alt+Q
    • C.Alt+Shift
    • D.Alt+a
  27. 已知数据表A中每个元素距其最终位置不远,为节省时间,应采用的算法是

    • A.堆排序
    • B.直接插入排序
    • C.快速排序
    • D.B)和C)
  28. 下列关于通用对话框CommonDialogl的叙述中,错误的是

    • A.只要在“打开”对话框中选择了文件,并单击“打开”按钮,就可以将选中的文件打开
    • B.使用CommonDiatogl.ShowColor方法,可以显示“颜色”对话框
    • C.CancelError属性用于控制用户单击“取消”按钮关闭对话框时,是否显示出错警告
    • D.在显示“字体”对话框前,必须先设置CommonDialogl的Flags属性,否则会出错
  29. 系统符号常量的定义可以通过 ______ 获得。

    • A.对象浏览器
    • B.代码窗口
    • C.属性窗口
    • D.工具箱
  30. 数据库具有最小冗余度、较高的程序与数据独立性,易于扩充和______的特点。

    • A.程序结构化
    • B.程序标准化
    • C.数据模块化
    • D.共享
  31. 为了使用窗体输出,使Print方法在Form_Load事件中起作用,必须设置窗体的(  )属性。

    • A.AutoReDraw
    • B.BackColor
    • C.Moveable
    • D.Caption
  32. 在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为Text1),然后编写如下事件过程:

    Private Sub Command1_Click() 

    x=Val(Text1.Text)  

    Select Case x 

    Case 1,3 

    y=x*x 

    Case Is>=10,Is<=-10 

    y=x 

    Case -10 To 10 

    y=-x 

    End Select 

    End Sub 

    程序运行后,在文本框中输入3,然后单击命令按钮,则以下叙述中正确的是(  )。

    • A.执行y=x*x
    • B.执行y=-x
    • C.先执行y=x*x,再执行y=-x
    • D.程序出错
  33. 设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为

    • A.123456
    • B.123445
    • C.5
    • D.6
  34. 在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:

    记录类型定义如下:

    下列叙述中正确的是(  )。

    • A.记录类型animal不能在Form1中定义,必须在标准模块中定义
    • B.如果文件c:\vbTest.dat不存在,则Open命令执行失败
    • C.由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
    • D.语句“Put#1,,rec”将animal类型的两个数据元素写到文件中
  35. 按照“后进先出”原则组织数据的数据结构是(  )。

    • A.队列
    • B.栈
    • C.双向链表
    • D.二叉树
  36. 栈底至栈顶依次存放元素A、B、C、D,在第五个元素E入栈前,栈中元素可以出栈,则出栈序列可能是

    • A.ABCED
    • B.DCBEA
    • C.DBCEA
    • D.CDABE
  37. 下列描述中,不是线性表顺序存储结构特征的是(  )。

    • A.不便于插入和删除
    • B.需要连续的存储空间
    • C.可随机访问
    • D.需另外开辟空间来保存元素之间的关系
  38. 大部分控件都没有的属性是 ______ 。

    • A.Top
    • B.Name
    • C.Visible
    • D.Interval
  39. 语句Print Sgn(-5.1^2)+Abs(Int(-5.1^2))的输出结果是(  )。

    • A.52.2
    • B.25.01
    • C.26
    • D.28
  40. 算法分析的目的是 ______。

    • A.找出数据结构的合理性
    • B.找出算法中输入和输出之间的关系
    • C.分析算法的易懂性和可靠性
    • D.分析算法的效率以求改进