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

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

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

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

2019-5-23 18:05| 发布者: 本站编辑| 查看数: 87| 评论数: 0

摘要:
■ 填空题

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

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

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

■ 填空题

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

2.决定一个窗体有无控制菜单的属性是#_10。

3.设C="A",写出下列布尔表达式的值。
  (1)C>"0"And C<"9"Or C>="A"And C<="Z"#_2 
  (2)C<="0"And C>="9"Or C>="A"And C<="Z" #_2 
  (3)C>="0"And C<="9"And C>="A"And C<="Z" #_3 
  (4)C>="0"Or C<="9"And C>="A"Or C<="Z" #_2

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.语句Print Format(#17:23#,“H:M:S")的输出结果是#_7。

6.在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:Private Sub Form_Click()
    Textl.Text="VB程序设计"
    End Sub
    Private Sub Textl_Change()
    Picturel.Print"VB Programmin9" 
    End Sub程序运行后,单击窗体,则在文本框中显示的内容是#_5,而在图片框中显示的内容是#_8。

7.在窗体上画一个文本框(其名称为Textl),然后编写如下事件过程:Private Sub Textl_KeyDown(KeyCode As Integer,Shift As Integer)
    Print Chr(KeyCode-3)
    End Sub程序运行后,如果Textl文本框中输入EFG,则在窗体上输出的内容为#_2;如果在Textl文本框中输入efg,则在窗体上输出结果为#_2。

8.下列程序用Ⅱf函数可改写为#_30。
    X=b If a>b Then x=a

9.在程序的横线处填写适当的语句(一条横线处只能填写一条语句),使程序完成相应的计算。
程序的功能是:计算1+2+3+…+10。
    Sub Form_Click()
    s=0 1k=1#_9
    s=s+k
    #_6
    Next i
    Print s
    End Sub

10.下面的程序是用冒泡法将数组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)

11.在窗体上画一个命令按钮(其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

12.下列程序的运行结果是#_8。
    Sub test(i As Integer) 
    i=i+1
    End Sub
    Private Sub Form?Click()
    Dim x As Integer
    x=4
    Print"x=";x
    Call test(x) 
    Print"x=";x
    End Sub

13.在窗体上编写如下两个事件过程:
    Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) 
    Print Chr(KeyCode) 
    End Sub
    Private Sub Form_KeyPress(KeyAscii As Integer) 
    Print Chr(KeyAseii) 
    End Sub
  程序运行后,按"a"键(不按住Shift键),则

14.在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式菜单弹出,请填空。Forml.#_5pmenu

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, 2019-9-21 23:01 , Processed in 0.078125 second(s), 14 queries.

Powered by Discuz! X1

© 2001-2010 Comsenz Inc.