16.执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是(A)

　　A.Visual

　　B.Basic

　　C.6

　　D.11

　　17.以下叙述中错误的是(D)

　　A.下拉式菜单能用菜单编辑器建立

　　B.在多窗体程序中，每个窗体都可以建立自己的菜单系统

　　C.能够对菜单项的Click事件编程

　　D.如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见

　　18.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

　　Private Sub Command1_Click( )

　　a = "12345"

　　Print Format$(a, "000.00")

　　End Sub

　　程序运行后，单击命令按钮，窗体上显示的是(B)

　　A.123.45

　　B.12345.00

　　C.12345

　　D.00123.45

　　19.以下关于函数过程的叙述中，正确的是(A)

　　A.函数过程形参的类型与函数返回值的类型没有关系

　　B.在函数过程中，过程的返回值可以有多个

　　C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递

　　D.如果不指明函数过程参数的类型，则该参数不能有数据类型的参数

　　20.以下关于变量作用域的叙述中，正确的是(C)

　　A.用dim定义变量是静态变量

　　B.静态变量必须在标准模块中声明

　　C.用public定义变量是全局变量

　　D.Static类型变量的作用域范围是它所在的窗体或模块文件

　　21.确定一个控件在窗体上的位置的属性是(C)

　　A.Width和Height

　　B.Width或Height

　　C.Top和Left

　　D.Top或Left

　　22.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

　　Private Sub Command1_Click( )

　　Text1.Text = "Visual"

　　Me.Text1 = "Basic"

　　Text1 = "Program"

　　End Sub

　　程序运行后，如果单击命令按钮，则在文本框中显示的是(C)

　　A.Visual

　　B.Basic

　　C.Program

　　D.出错

　　23.以下关系表达式中，其值为False的是(A)

　　A."ABC">"AbC"

　　B."the"<>"they"

　　C."VISUAL"=UCase("Visual")

　　D."Integer">"Int"

　　24.语句Print int(5/4*6\5) Mod 2的输出结果是(B)

　　A.0

　　B.1

　　C.2

　　D.3

　　25.在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：

　　Private Sub Command1_Click( )

　　strText = InputBox("请输入")

　　Text1.Text = strText

　　End Sub

　　Private Sub Text1_Change( )

　　Label1.Caption = Right(Trim(Text1.Text), 3)

　　End Sub

　　程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是(D)

　　A.空

　　B.abcdef

　　C.abc

　　D.def

　　26.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

　　Private Sub Command1_Click( )

　　x = -5

　　If x >0 Then

　　y = x ^ 2

　　Else

　　y = x

　　End If

　　Print y

　　End Sub

　　程序运行后，单击命令按钮，窗体上显示的是(A)

　　A.-5

　　B.25

　　C.1

　　D.-1

　　27.一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As

　　Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是(A)

　　A.变量X、Y的作用域相同

　　B.Y的作用域是Model1

　　C.在Form1的任何地方中可以直接使用Y

　　D.在Form2中可以直接使用X和Y

　　28.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是(A)

　　A.Drive1_Change

　　B.Drive1_Click

　　C.Dir1_Click

　　D.Dir1_KeyPress

　　29.在窗体上画一个命令按钮(其NAME属性为Command1)，然后编写如下代码：

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a

　　s = 0

　　a = Array(1, 2, 3, 4)

　　For I = 4 To 1 Step -1

　　s = s + a(I)

　　Next I

　　Print s

　　End Sub

　　运行上面的程序，单击命令按钮，其输出结果是(D)

　　A.4321

　　B.1234

　　C.34

　　D.10

　　30.在窗体上画一个名称为Text1的文本框，编写以下代码：

　　Private Sub Text1_KeyPress(KeyAscii As Integer)

　　If KeyAscii < 65 Or　KeyAscii> 90 Then

　　msgBox "请输入大写字母"

　　KeyAscii = 0

　　End If

　　End Sub

　　以下能说明该事件过程正确是(A)

　　A.要求文本框只能接收大写字母的输入

　　B.要求文本框只能接收小写字母的输入

　　C.要求文本框只能接收数字的输入

　　D.要求文本框只能接收65到90之间的数值的输入

扫描/长按二维码帮助考试通关

2018年等考报考资讯

2018等考各科通关技巧

2018各科最新预测试卷

2018等考各科备考资料

微信搜索"考试吧"了解更多考试资讯、下载备考资料

　　相关推荐：

　　2018年全国计算机等级考试必做试题汇总(各科目)

　　2018年全国计算机等级考试复习知识点汇总(各科目)

　　2018计算机等级考试报名时间|各地报名入口|报名条件

　　2018年全国计算机等级考试时间|教材目录（2018年版）

　　2018全国计算机等级考试备考经验及应试技巧汇总

　　报名方法|考试内容|考试大纲|2018计算机等级考试科目

　　历年真题汇总|考试吧策划：2018年计算机等级考试报考指南