考研 | 自学考试 | 成人高考 | 公务员 | 会计从业 | 会计职称 | 注册会计 | 税务师 | 经济师 | 司法考试 | 证券从业 | 期货从业 | 银行从业 | 教师资格 保险类 | 理财规划师 | 心理咨询师 | 导游员 | 大学英语 | 新概念 | 执业医师 | 执业药师 | 执业护士 | 一级建造师 | 二级建造师 | 消防工程师 | 监理工程师 | 造价工程师 | 咨询工程师 | 资产评估师 | 安全工程师 | 报检员 | 报关员 | 土地估价师 | 房地产估价师 | 房地产经纪人 | 企业法律顾问 | 招标师 | 基金从业 |

[老用户使用原帐号直接 登录 ,无需注册] 注册 | 登录

我要做题网门户计算机等级 › 模拟试题 › 查看内容

2019年03月29日全国计算机等级考试二级Visual Basic试题(第 1 套 - 填空)

2019-3-29 18:09| 发布者: 本站编辑| 查看数: 112| 评论数: 0

摘要:
■ 填空题

1.传统的程序设计语言主要是面向#_2的,而现在涌现出的许多可视化程序设计语言,如Visual Basic主要是面向#_2进行程序设计的。

▇ 功能最强大的在线复习软件 ▇

全国计算机等级考试二级Visual Basic在线模考>>开始

■ 填空题

1.传统的程序设计语言主要是面向#_2的,而现在涌现出的许多可视化程序设计语言,如Visual Basic主要是面向#_2进行程序设计的。

2.属性窗口主要是针对窗体的控件设置的。在Visual Basic中,窗体和控件被称为#_2。每个#_2都可以用一组属性来刻画其特征,而属性窗口就是用来设置窗体或窗体中控件属性的。

3.表达式(-1)*Sgn(-100+Int(Rnd*100))的值是#_1

4.表达式Format(#2002-11-20#,"d-mm-yy")的返回值为#_8。

5.运行下列程序,弹出对话框的按钮分别为#_3,其中默认的是#_9
    Private Sub Commandl-Click()
    MsgBox"你好!",vbDefaultButton4+vbYesN0,"提示:" 
    End Sub

6.在窗体上画一个列表,然后编写如下两个事件过程:Private Sub Form_Click()
    Listl.Removeltem 1 
    List1.Removeltem 2
    End Sub
    Private Sub Form_Load()
    List1.Addhem"ItemA" 
    List1.AddItem"ItemB" 
    List1.Addhem"ItemC" 
    List1.AddItem"It

7.Visual Basic中有一种控件组合了文本框和列表框的特性,这种控件是#_3。

8.在程序的横线处填写适当的语句(一条横线处只能填写一条语句),使程序完成相应的操作。
    窗体上有文本框Text1和若干复选框,其中复选框Check1设置文本框Text1上显示的文本是否加下划线。
    Check1的单击事件过程如下:
    Private Sub Check1_Click()
 #_9
   Text1.FontUnderLine=True
    ElseIf#_9
    Text1.FontUnderLine=False
  

9.2.在程序的横线处填写适当的语句(一条横线处只能填写一条语句),使程序完成相应的数据处理。
程序段的功能是:以12个月份作为列表框I_istl的列表项。
    Private Sub Form_Load()
    Dim Intk As Integer
    #_9
    If Intk<=9 Then
    Listl.Addhem""&Intk&"月" 
    Else #_9
    End If
    Next Intk
 

10.以下程序的目的是将多维数组a(1 To m,1 To n)中的元素转移到_个名为b(1 To n*m)的一维数组中,请在横线处填入适当的内容,完成程序。
  Option Base l
  Private Sub Commandl_Click(Index As Integer) 
    Dim a(1 T0 20,1 T0 10) 
    Dim b()
    ReDim#_9
    For i=1 T0 20
    For j=l To l0
 

11.下面的程序是用冒泡法将数组a中的10个整数按升序排列,请在横线处填入适当的内容,将程序补充完整。
    Private Sub Commandl_Click()
    Dim a
    Dim Tmp As Integer
    a=Array(678,45,324,528,439,387,87,875,273,823) 
    For i=#_6
    For j=#_6
    If a(i)#_1 a(j)Then
    Tmp=a(i)

12.下列程序的运行结果是#_4。
    Function abcd(ByVal n As Integer)As Integer
    abcd=n*5+10
    End Function
    Private Sub Form_Click()
    Dim x As Integer
    x=abcd(234)+109,Ic abcd(12) 
  Print x
    End Sub

13.把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:
    Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) 
    Print Chr(KeyCode) 
    End Sub
    Private Sub Form_KeyPress(KeyAscii As Integer) 
    Print Chr(KeyAscii) 
    End Sub
    

14.菜单项(Find),要将其快捷方式访问设为Alt+F,则在设计时应将#_9。

15.以下程序的功能是将顺序文件A:\MYFILE.TxT的内容一个字符一个字符地读入文本框txtTest中。请在横线处填入恰当的内容,使程序补充完整。
    Private Sub Form Click.()
    Dim InputData.As String
  txtTest.Text=""#_9
    Do While#_8   #_9
    txtTest.Text=txtTest.Text+InputData
    Loop #_6
    En

全国计算机等级考试二级Visual Basic在线模考>>查看答案

路过

雷人

握手

鲜花

鸡蛋

最新评论

计算机等级考试二级公共基础知识
 
全国计算机等级考试二级C
 
全国计算机等级考试二级Visual Basic
 

我要做题网 ( 辽ICP备11009338号-1) |网站介绍 |联系我们 大连博易网络科技有限公司 版权所有

GMT+8, 2019-6-16 08:41 , Processed in 0.031250 second(s), 14 queries.

Powered by Discuz! X1

© 2001-2010 Comsenz Inc.