30101 标准控件不包括(D )控件。
A 驱动器列表框
B 目录列表框
C 文件列表框
D 通用对话框
30102 当一个工程含有多个窗体时,它的启动窗体是(D )。
A 正在编辑的窗体
B 最后一个添加的窗体
C 第一个添加的窗体
D 在"工程属性"对话框中指定的窗体
30103 VB应用程序在(A )模式下不能编辑代码和设计界面。
A 运行
B 中断
C 设计
D 以上均不能
30104 下列叙述错误的是(B )。
A VB应用程序没有明显的开始和结束语句
B VB控件的所有属性值均可在属性窗口中设置
C VB是事件驱动型可视化编程工具
D VB通过"工具"菜单的"选项"设置代码编辑窗口的字体大小30105 标准模块文件的扩展名是(C )。
A .cls
B .frm
C .bas
D .rec
30106 下列叙述中,错误的是(D )。
A 打开一个工程文件,系统自动装入与该工程有关的文件
B 保存VB程序时,应分别保存窗体和工程文件
C 事件可以由用户触发,也可以由系统触发
D VB应用程序只能以解释方式执行
30107 在设计阶段,双击窗体上的某个控件,可以打开(A )。
A 代码窗口
B 属性窗口
C 工具箱窗口
D 工程资源管理器窗口
30108 下列叙述中,错误的是(C )。
A VB是可视化程序设计语言
B VB采用事件驱动编程机制
C VB是面向过程的程序设计语言
D VB应用程序可以以编译方式执行
30109 下列叙述中,正确的是(D )。
A VB的事件由用户定义
B VB程序以顺序方式执行
C VB程序从Main()函数开始执行
D VB运行时,总是等待事件的发生
30110 在VB中可以通过(C)方法向工具箱加入其它控件。
A 右击工具箱,执行弹出式菜单中的“添加选项卡”命令
B 执行“文件”菜单中的“添加工程”命令
C 执行“工程”菜单中的“部件”命令
D 执行“工程”菜单中的“添加窗体”命令
30111 在VB的工程资源管理器窗口中不可能存在的文件类型是(C )。
A *.cls
B *.vbg
C *.gif
D *.bas
30112 以下那一种方法不能打开“代码窗口”(A)。
A 按快捷键Alt+C
B 双击窗体或窗体上的控件
C 执行“视图”菜单中的“代码窗口”命令
D 单击“资源管理器”窗口的“查看代码”按钮
30113 下列叙述中,错误的是()。B
A VB程序代码不区分字母大小写
B VB程序代码中使用“//”表示注释一行
C VB程序代码中不能使用数字作为标识符的首字符
D VB程序代码以“回车换行”作为语句结束标志
30114 VB窗体文件的扩展名是()。B
A cls
B frm
C bas
D res
30115 下列关于VB代码编辑时常用组合键的叙述错误的是()。C
A Ctrl+C表示复制选定代码
B Ctrl+X表示剪切选定代码
C Ctrl+P表示粘贴代码
D Ctrl+Y表示删除整行代码
30116 VB是一种面向对象的程序设计语言,构成对象的三要素是(A)。
A 属性、事件、方法
B 控件、属性、事件
C 窗体、控件、过程
D 窗体、控件、模块
30117 以下叙述中错误的是(D )。
A 一个工程可以含有多个标准模块文件
B 窗体文件包含该窗体及其控件的属性
C 以BAS为扩展名的文件是标准模块文件
D 在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件30118 当程序在运行过程中因某种原因中断时,VB进入(C)模式。
A) 设计B) 运行C) 中断D) 编程
30119 以下叙述错误的是(B)。
A) 窗体对象的ControlBox属性可用于设置窗体上的控制菜单
B) Visual Basic要设置某个对象的属性时,只能通过属性窗口设置
C) 当一个工程含有多个窗体时,其中的启动窗体是在“工程属性”对话框中指定的
D) 通用对话框是一种ActiveX控件
30201 下列为整型变量的是(C)。
A x!
B x#
C x%
D x$
30202 设有语句组:
Dim S1 As String*5
S1 = "VB Test"
则S1的值为(B )。
A V
B TestB VB Te
C VBTes
D BTest
30203 下列(A)是合法的变量名。
A x_y
B x-y
C 2x
D and
30204 下列(A )为单精度变量。
A x!
B x#
C x%
D x$
30205 由(C )关键字声明的局部变量在整个程序运行时一直存在。
A Dim
B Public
C Static
D Private
30206 定义变量时如不指定类型,该变量为(C )变量。
A Integer
B String
C V ariant
D Single
30207 用户自定义数据类型的成员不能是(A)。
A 数组
B 日期型
C 货币型
D 定长字符串
30208 下列(B )是合法的变量名。
A x%y
B xy%
C 2x
D Or
30209 日期常量用(C)作为界定符。
A "
B %
C #
D &
30210 下列哪一个是日期型常量(B )。
A "06/08/04"
B #06/08/04#
C 06/08/04
D {06/08/04}
30211 下列为字符串变量的是(D)。
A x!
B x#
C x%
D x$
30212 可以在窗体模块的声明段中进行(C )的声明。
A 全局数组
B 全局常量
C 全局变量
D 全局自定义数据类型
30213 下列关于常量的叙述,正确的是()。C
A 常量必须在第一次使用时被赋值
B 常量可以在任何时候被赋值
C 常量必须在定义时被赋值
D 常量与变量不同,没有数据类型之分
30214 如要表示一个在100~300000之间变化的整数,应使用()型变量。C A Integer B String C Long D Byte
30215 在窗体中,用()语句声明的变量A可以被其它窗体引用。B
A Dim A As Integer
B Public A As Integer
C Private A As Integer
D Static A As Integer
30216 下列关于符号常量的叙述,正确的是(C )。
A 符号常量必须在第一次使用时被赋值
B 符号常量可以在任何时候被赋值
C 符号常量必须在定义时被赋值
D 符号常量与变量不同,没有数据类型之分
30217 用Dim x,y as boolean语句声明变量,下列正确的是(C )。
A x和y都是布尔型变量
B x是整形变量,y是布尔型变量
C x是变体型变量,y是布尔型变量
D x和y都是变体型变量
30218 以下能正确定义数据类型TelBook的代码是(C )。
A Type TelBook
Name As String*12
TeL As Integer
End Type TelBook
B Type TelBook
Name As String*12
TeL As Integer
Type End
C Type TelBook
Name String*12
TeL As Integer
End Type
D Type TelBook
Name String*8
TeL As Integer
End TelBook
30219 下列(A )是合法的变量名。
A a_1
B 4A
C a-b
D string
30220 不能被本模块的其它过程引用的是(A)。
A) 局部变量B) 模块级变量
C) 全局变量D) 以上都是
30221 如果要表示一个在100~300000之间变化的整数,应使用(C )型变量。
A) Integer B) String C) Long D) Byte
30301 表达式4 + 6 \ 5 * 7 / 9 Mod 3的值是(B )。
A 4
B 5
C 6
D 7
30302 下列逻辑表达式为True的是(C )。
A "A"<"9"
B "A">"a"
C "a">"A T"
D "A T"<"AND"
30303 下列运算符中,优先级最高的是(B )。
A Like
B Mod
C Not
D Eqv
30304 设a=6,b=5,c=-2;执行语句Print a > b > c后,窗体上显示的是(B )。
A 1
B True
C False
D 出错信息
30305 下列表达式中,值最大的是(C )。
A 2 \ 3
B 2 / 3
C 2 mod 3
D 3 mod 2
30306 下列运算符中,优先级最低的是(D )。
A *
B ^
C /
D \
30307 表达式2 = 3 < 1 的是(C )。
A 0
B 1
C True
D False
30308 表示x大于0且小于10的VB表达式是(B)。
A 0 < x < 10
B x > 0 And x < 10
C x > 0 Or x < 10
D x > 0 : x < 10
30309 判断整型变量x是奇数的表达式是(A)。
A x Mod 2 <> 0
B x Mod 2 != 0
C x Mod 2 ≠0
D x Mod 2 =0
30310 设a=6,b=-3,则以下表达式值为True的是(D )。
A a<0 Or b>0
B a<0 And b>0
C a>0 And b>0
D a<0 Eqv b>0
30311 下列正确的赋值语句是(B )。
A i = j = 0
B i = 0 : j = 0
C i = 0 , j = 0
D i = 0 ; j = 0
30312 下列赋值语句中,正确的是(C )。
A i + j = 10
B 2i = j
C j = i + j
D i = j = 0
30313 能正确表达2的3次幂的表达式是(B )。
A 2 * 3
B 2 ^ 3
C 2 ** 3
D 2 & 3
30314 表达式123 + 23 Mod 100 \ 7的值是(D )。
A 6
B 126
C 20
D 132
30315 表达式12000 + "123" & 100的值是()。A
A "12123100"
B 12223
C 24300
D "12223"
30316 下列逻辑表达式的值为False的是(C )。
A "A">"9"
B "A"<"a"
C "A T">"A T "
D "an ">"an"
30317 下列运算符中,优先级最低的是(C )。
A \
B /
C MO
D D *
30318 判断整型变量x是5的倍数的表达式是(B )。
A x Mod 5 <> 0
B int(x/5)=x/5
C x/5≠int(x /5)
D 5 Mod x = 0
30319 设a=8,b=6,c= -1;执行语句Print a>b>c后,窗体上显示的是(C )。
A 1
B True
C False
D 出错信息
30320 下列表达式中,非法的是(C )。
A a
B a>b+c
C a≠b>c
D a=b+c
30321 下列正确的赋值语句是(B )。
A i + j = 10
B i = 0 : j = 0
C i = 0 , j = 0
D i = 0 ; j = 0
30322 下列运算符中,优先级最高的是(B)。
A) * B) ^ C) / D) \
30323 表达式23 + 23 Mod 50 \ 7的值是(C)。
A) 23 B) 46 C) 25 D) 123
30401 返回值为数值的函数是(B )。
A Mid
B Instr
C Left
D Rtrim
30402 表达式Len("幸运52")的值是(B)。
A 0
B 4
C 6
D 8
30403 以下(B)语句可表示[50,100]之间的随机数。
A Int(Rnd * 51) + 49
B Int(Rnd * 51 +50)
C Int(Rnd * 50) + 50
D Int(Rnd * 50 + 50)
30404 返回值为字符串的函数是(A)。
A Str
B V al
C Len
D Asc
30405 当x=0时,函数IIf(x > 0, 1, IIf(x < 0, -1, 0))的返回值是(A)。
A 0
B 1
C -1
D 出错
30406 表达式Fix(5.6) + Int(-5.6)的值是(B )。
A 0
B -1
C 1
D 以上都不对
30407 如果Sgn(x)的值为-1,整型变量x的值是(D)。
A 0
B 整数
C 正整数
D 负整数
30408 表达式InStr(2, "文本文件", "文")的值是(C)。
A 0
B 1
C 3
D 5
30409 除去字符串左侧空格的函数是(C)
A Left()
B Trim()
C Ltrim()
D LeftTrim()
30410 设a="39级台阶",使b="台阶"的语句是(D)。
A Right(a,4)
B Instr(a,5,4)
C Left(a,5,4)
D mid(a,4,2)
30411 表达式InStr(3, "文件系统控件", "件")的值是(C )。
A 2
B 3
C 6
D 11
30412 能判断一个表达式的值是否为数值类型的函数是(B )。
A IsDate()
B IsNumeric()
C IsData()
D IsNumber()
30413 表达式Chr(Asc("B") + 1)的值是()。A
A "C"
B
C C 67
D "67"
30414 下列表达式的值为15的是()。C
A Int(14.6)
B Fix(14.6)
C Round(15.3)
D Trunc(15.3)
30415 表达式UCase(Mid("basic!", 1, 1)) + Right("basic!", 5)的值是()。D A "asic" B "Asic!" C "basic!" D "Basic!"
30416 以下能判断是否到达文件尾的函数是(D )。
A LOF()
B BOF()
C LOC()
D EOF()
30417 表达式Len("神州6号")的值是(B )。
A 10
B 4
C 5
D 8
30418 除去字符串左右侧空格的函数是(B )。
A Rtrim()
B Trim()
C Ltrim()
D Mid()
30419 函数Choose(2,"+","-","×","÷")返回值是(B )。
A +
B -
C ×
D ÷
30420 表达式String(3,"ABC") 的结果为(A)。
A) AAA B) ABC C)BBB D)CCC
30421 执行以下程序段后,变量C$的值为(D)。
a$="Basic 程序设计教程"
b$="Visual "
c$=b$ & Ucase(Mid(a$,1,6)) & Right(a$,2)
A)Visual Basic
B) VISUAL BASIC 教程
C)Visual Basic 程序
D) Visual BASIC 教程
30501 VB表达式Format(V al("111a"), "##.##")的值是(C )。
A 11.1a
B 11.10
C 111.
D 111.00
30502 下列语句不合法的是(D )。
A x = 1 : y=2
B ? x ; y ;
C ? x , y ,
D x = 1; y = 2
30503 如果VB语句超过一行,可以使用空格加(D )续行。
A -
B +
C ;
D _
30504 正确使用Cls方法的是(B )。
A Text1.Cls
B Picture1.Cls
C List1.Cls
D Image1.Cls
30505 下列语句合法的是(C )。
A x + y = 2
B x > 2 = y
C x = y > 2
D x = y++
30506 错误使用Print方法的是(D)。
A Picture1.Print
B Form1.Print
C Debug.Print
D Text1.Print
30507 Print方法分区输出时,用(B )分隔多个表达式。
A 空格
B 逗号
C 冒号
D 分号
30508 Print "10+6="; 10+6的输出结果是(C )。
A 16=10+6
B 10+6=10+6
C 10+6=16
D "10+6="10+6
30509 下列叙述错误的是(A )。
A 不允许使用行号与标号
B 单条语句可分行书写
C 同一行上可以书写多条语句
D VB代码不区分字母的大小写
30510 VB表达式Format(CInt("3.14"), "00.00")的值是(A )。
A 03.00
B 03.14
C 3.14
D 3
30511 下列语句合法的是(B)。
A 1 + 2 = 3
B x = y <> 0
C y > 0 = x
D x = 2y
30512 下列语句错误的是(B )。
A Cls
B Image1.Cls
C Form1.Cls
D Picture1.Cls
30513 Print方法紧密输出时,用()分隔多个表达式。 D
A 空格
B 逗号
C 冒号
D 分号
30514 下列关于VB编码规则的叙述,错误的是(D)。
A 一条语句可以分多行书写
B 可以用“Rem”注释单行语句
C 注释可以放在语句之前
D 可以用“:”作为语句的结束符
30515 以下程序段中有()处错误。 C
ReDim a As Integer
n + 3 = n
a = 0 ;
b = 1
Print n + 3 = n
A 1
B 2
C 3
D 4
30516 要强制显式声明变量,可在窗体模块或标准模块的声明段中加入(C )语句。
A Option Base 0
B Option Base 1
C Option Explicit
D Option Compare
30517 下列语句错误的是(B )。
A Cls
B Image1.Cls
C Form1.Cls
D Picture1.Cls
30518 不能把2^5*3.14*8的结果输出到“立即”窗口的是(B)。
A) 在代码窗口中使用Debug.Print 2^5*3.14*8语句
B) 在“立即”窗口中直接使用2^5*3.14*8语句
C) 在“立即”窗口中使用? 2^5*3.14*8语句
D) 在“立即”窗口中使用Print 2^5*3.14*8语句
30519 要强制显式声明变量,可在窗体模块或标准模块的声明段中加入(D)语句。
A) Option Base 0 B) Option Base 1
C) Option Compare D) Option Explicit
30601 执行x = InputBox("请输入半径",0,"求面积") ,在输入框中输入3后回车,则下列叙述正确的是(B)。
A x的值是数值3
B x的值是字符"3"
C 0是默认值
D 对话框标题是"求面积"
30602 执行x = MsgBox("数据类型不匹配",VbOKCancel,"出错提示!") ,然后单击消息框的“取消”按钮,x的值是(D )。
A True
B False
C 1
D 2
30603 下列语句正确的是(B)。
A MsgBox VbOkOnly, "Error"
B MsgBox "Error", VbOkOnly
C MsgBox ( VbOkOnly, "Error" )
D MsgBox ( "Error", VbOkOnly )
30604 执行Len(InputBox("请输入编号:")),在输入框中输入"神州1号"后回车,结果为(A)。
A 4
B 7
C 0
D 出错
30605 执行MsgBox "除数不能为0!", 48, "数据出错",在弹出的消息框中显示的图标是(C )。
A 停止图标
B 问号图标
C 感叹号图标
D 消息图标
30606 下列语句组:
a$="Today And Tomorrow"
b$=Right(a$,8):c$=Left(a$,5)
MsgBox a$, ,b$,c$
执行后消息框的标题是(B )。
A Today
B Tomorrow
C Today And Tomorrow
D 1
30607 下列语句组:
a$="Today And Tomorrow"
b$=Right(a$,8):c$=Left(a$,5)
MsgBox a$, ,b$,c$
执行后消息框中显示的内容是(C )。
A Today
B Tomorrow
C Today And Tomorrow
D 1
30608 下列程序运行时,消息框显示的内容是(A )。
Private Sub Command1_Click()
MsgBox CStr(123 + 321)
End Sub
A 444
B 123321
C 123+321
D 显示出错信息
30609 窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()
x = InputBox("x=")
y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是(B )。
A 444
B 123321
C 123+321
D 出错信息
30610 执行n = InputBox("n=", 0, "n!") ,在输入框中输入5后回车,则下列叙述中,正确的是(D )。
A 0是默认值
B 输入框标题是"n="
C n等于数值5
D n的值为字符"5"
30611 执行x = MsgBox("数据类型不匹配", , "出错提示!") ,然后按回车,x的值是(B )。
A 0
B 1
C True
D False
30612 下列语句正确的是(A)。
A MsgBox ""
B MsgBox VbOkOnly,"Error"
C MsgBox ( VbOkOnly, "Error" )
D MsgBox ( "Error", VbOkOnly, ,100 )
30613 下列关于InputBox函数的叙述,错误的是()。A
A 可以省略任何参数
B 可以在屏幕指定位置显示输入框
C 可以指定默认值
D 返回值为String类型
30614 下列程序运行时,消息框显示的内容是()。C
Private Sub Command1_Click()
MsgBox CStr("123 + 321")
End Sub
A 444
B 123321
C 123 + 321
D 显示出错信息
30615 执行语句a = MsgBox("你好", vbAbortRetryIgnore + vbDefaultButton2),当出现消息框时,按回车,a的值为()。B
A vbAbort
B vbRetry
C vbIgnore
D vbDefault
30616 对于InputBox函数,下列说法不正确的是(A )。
A InputBox函数输入的是数值型
B InputBox函数值必须赋予一个变量
C InputBox函数prompt参数不能缺省
D 每执行一次InputBox函数,只能输入一个值
30617 执行语句a="software and hardware":b=Right(a,8):c=Mid(a,1,8):MsgBox
a, ,b,c,1 后消息框的标题是(C )。
A 1
B software
C hardware
D software and hardware
30618 对于InputBox函数,下列不正确的说法是(B )。
A 每执行一次InputBox函数,只能输入一个值
B InputBox函数只能输入数值
C InputBox函数的prompt参数不能缺省
D InputBox函数的参数有三个以上
30619 窗体上有一命令按钮Command1,编写下列事件过程:
Private Sub Command1_Click()
MsgBox CStr("123" + 123)
End Sub
程序运行时,单击按钮,消息对话框显示的内容是(A )。
A 246
B 123123
C 123 + 123
D 显示出错信息
30620 在立即窗口中执行语句:a=InputBox("请输入姓名:","姓名","张三"),出现输入对话框后直接选择"确定"按纽后,a的值为(B)。
A) 姓名B) 张三
C) 请输入姓名:D) 以上都不对
30621 下列语句中正确的是(A)。
A) MsgBox "Error", vbOKCancel
B) MsgBox vbOKCancel, "Error"
C) MsgBox ("Error", vbOKCancel)
D) MsgBox (vbOKCancel, "Error")
30701 将窗体的(C )属性设置为True,可使Form_Load事件中的Print方法显示结果。
A DrawStyle
B DrawMode
C AutoRedraw
D Enabled
30702 将窗体的BoderStyle属性设置为(A )可使窗口不显示标题栏。
A 0
B 1
C 2
D 5
30703 下列叙述中,正确的是(B )。
A 窗体的Name属性可以为空
B 窗体的Name属性定义窗体的名称
C 可以在运行期间改变窗体的Name属性
D 窗体的Name属性的值显示在窗体标题栏中
30704 设置窗体的(A )属性可改变窗体标题。
A Caption
B Name
C BackColor
D BorderStyle
30705 通过(A )属性设置窗体图标。
A Icon
B Picture
C MouseIcon
D DownPicture
30706 一个工程含有多个窗体及标准模块,下列叙述错误的是(A)。
A 如果工程含Sub Main过程,程序首先执行该过程
B 任何时刻最多只有一个窗体是活动窗体
C 标准模块不能设置为启动模块
D Hide方法只是隐藏而不从内存中清除窗体
30707 使用(C )方法可隐藏窗体,但不从内存中释放。
A Show
B Load
C Hide
D UnLoad
30708 下列叙述中,错误的是(C)。
A 窗体的Load事件在加载窗体时发生
B 窗体的Height、Width属性用于设置窗体的高和宽
C 执行Unload Form1语句后,窗体仍在内存中但不可见
D 当窗体的Enabled属性为False时,对窗体的操作都被禁止
30709 运行后,在窗口上单击鼠标时,窗体不会接收到的事件是(D)。
A MouseDown
B MouseUp
C Click
D Load
30710 要使窗体显示在屏幕的中央,应设置属性StartUpPosition为(C)。
A 0
B 1
C 2
D 3
30711 运行时,单击窗体不能将窗体的背景色设置为红色的事件过程是(C )。
A Private Sub Form_Click( )
Me.BackColor = vbRed
End Sub
B Private Sub Form_Click( )
Form1.BackColor = vbRed
End Sub
C Private Sub Form_Click( )
this.BackColor = vbRed