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

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

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

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

2018-5-4 18:08| 发布者: 本站编辑| 查看数: 104| 评论数: 0

摘要:
■ 填空题

1.在Visual Basic中,类模块文件的扩展名是#_5。

2.属性窗口主要是针对窗体的控件设置的。在Visual Basic中,窗体和控件被称

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

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

■ 填空题

1.在Visual Basic中,类模块文件的扩展名是#_5。

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

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

4.下列程序段在窗体上输出#_2,在图片框中输出#_2,在立即窗口中输出#_1。
  A="your" 
  B="aname"
  C="iscr"
  Print Right(A,3)
  Picturel.Print Mid(B,2,4)
  Debu9.Print Left(C,2)

5.运行下列程序,输入框中显示的默认字符串为#_2。
    Private Sub Commandl_Click()
    InputBox"ok","输人参数",Format("&H12")
    End Sub

6.计时器控件能有规律地以一定时间间隔触发#_3事件,并执行该事件过程中的程序代码。

7.窗体上有一个按钮和一个列表框,执行下列程序后,输出结果为#_2。Private Sub Commandl_Click()
    Listl.Addhem"China" 
    Listl.AddItem"USA" 
    Listl.Addltem"Japan",l
    Print Listl.List(2) 
    End Sub

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

9.在窗体上画一个命令按钮,然后编写如下程序:
    Function.M(x As Integer,y As Integer)As Integer
    M=Ⅱf(x>y,x,y) 
    End Function
    Private Sub Commandl_Click()
     Dim a As integer,b As integer
    a=1
    b=2
    Print M(a,b) 
    End Sub   
10.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
    Private Sub Commandl_Click()
    Dim a(5) 
    For i=0 To 4
    a(i)=i+1
  t=i+1
    If t=3 Then
    Print a(i) 
    a(t-1)=a(i-2) 
    Else
    a(t)=a(i) 
    End if
    If i

11.下列程序的输出结果为#_9。
   Private Sub Commandl_Click()
    Dim a(1 To 20) 
   Dim i
    For i=1 To 20
    a(i)=i
        Next I
For Each j In a()
    a(j)=20
    Next i
    Print a(2) 
    End Sub

12.在程序的横线处写上适当的语句,使程序完成相应的计算。程序的功能是:用随机函数给数组元素赋任意三位整数。然后计算数组arr的元素之和。
    Private Sub Form_Click()
    Dim arrl(10)As Integer,k As Integer,S As Integer
    For k=0 To 10  
    #_9
    Next k
    Call Sum(arrl(),s) 
    Print"数组元素之和是:"+fo

13.在窗体上画一个标签Labell,然后编写如下代码:
    Private Sub Form_KeyPress(KeyAscii As Integer) 
    Dim str As String
    str=Chr(KeyAscii) 
    Label1.Caption=str
    End Sub
  程序运行后,在键盘上输入"China",则标签中显示的内容是#_1。

14.在菜单编辑器中建立一个菜单,其主菜单项的名称为mnuEdit,Visible属性为False。程序运行后。如果用鼠标右键单击窗体,则弹出与mnuEdit对应的菜单。以下是实现上述功能的程序。请在横线处填入适当的内容,使程序完整。
    Private Sub Form#_5(Button As Integer,Shift As Integer,X As Single,Y As Single) 
    If Button=2 Then
    #_mnuEdit
    End 

15.下列程序的功能是:从已存在于磁盘上的顺序文件Data2中读取数据,计算读出数据的平方值。将该数据及其平方值存入新的顺序文件Data3中,请在横线处填入适当的内容,使程序完整。
    Private Sub Form_Click ()
    Dim x As Single,y As Single
    Open"Data2.dat"For Input As #2
    Open"Data3.dat"For output As #3
    Do While Not EO

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

路过

雷人

握手

鲜花

鸡蛋

最新评论

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

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

GMT+8, 2018-8-14 16:34 , Processed in 0.062500 second(s), 16 queries.

Powered by Discuz! X1

© 2001-2010 Comsenz Inc.