福建省2级计算机VB考试千道选择题及答案

1、 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通过"工具"菜单的"选

2、项"设置代码编辑窗口的字体大小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是面向过程的

3、程序设计语言D VB应用程序可以以编译方式执行30109 下列叙述中，正确的是（D ）。A VB的事件由用户定义B VB程序以顺序方式执行C VB程序从Main()函数开始执行D VB运行时，总是等待事件的发生30110 在VB中可以通过（ C）方法向工具箱加入其它控件。A 右击工具箱，执行弹出式菜单中的“添加选项卡”命令B 执行“文件”菜单中的“添加工程”命令C 执行“工程”菜单中的“部件”命令D 执行“工程”菜单中的“添加窗体”命令30111 在VB的工程资源管理器窗口中不可能存在的文件类型是（C ）。A *.clsB *.vbgC *.gifD *.bas30112 以下那一种方法不能打

4、开“代码窗口”（ A）。A 按快捷键Alt+CB 双击窗体或窗体上的控件C 执行“视图”菜单中的“代码窗口”命令D 单击“资源管理器”窗口的“查看代码”按钮30113 下列叙述中，错误的是（ ）。 BA VB程序代码不区分字母大小写B VB程序代码中使用“/”表示注释一行C VB程序代码中不能使用数字作为标识符的首字符D VB程序代码以“回车换行”作为语句结束标志30114 VB窗体文件的扩展名是（ ）。 BA cls B frm C bas D res30115 下列关于VB代码编辑时常用组合键的叙述错误的是（ ）。 CA CtrlC表示复制选定代码 B CtrlX表示剪切选定代码C Ctr

5、lP表示粘贴代码 D CtrlY表示删除整行代码30116 VB是一种面向对象的程序设计语言，构成对象的三要素是（ A ）。A 属性、事件、方法 B 控件、属性、事件C 窗体、控件、过程 D 窗体、控件、模块30117 以下叙述中错误的是（ D ）。A 一个工程可以含有多个标准模块文件B 窗体文件包含该窗体及其控件的属性C 以BAS为扩展名的文件是标准模块文件D 在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件30118 当程序在运行过程中因某种原因中断时，VB进入（C）模式。A) 设计B) 运行C) 中断D) 编程30119 以下叙述错误的是（B）。A) 窗体对象的Contr

6、olBox属性可用于设置窗体上的控制菜单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 VB TestB VB TeC VBTesD BTest30203 下列（ A）是合法的变量名。A x_y B x-y C 2x D and30204 下列（

7、A ）为单精度变量。A x! B x# C x% D x$30205 由（C ）关键字声明的局部变量在整个程序运行时一直存在。A Dim B Public C Static D Private30206 定义变量时如不指定类型，该变量为（C ）变量。A Integer B String C Variant D Single30207 用户自定义数据类型的成员不能是（ A）。A 数组 B 日期型 C 货币型 D 定长字符串30208 下列（B ）是合法的变量名。A x%y B xy% C 2x D Or 30209 日期常量用（ C）作为界定符。A " B % C # D &3

8、0210 下列哪一个是日期型常量（B ）。A "06/08/04" B #06/08/04# C 06/08/04D 06/08/0430211 下列为字符串变量的是（ D）。A x! B x# C x% D x$30212 可以在窗体模块的声明段中进行（C ）的声明。A 全局数组 B 全局常量 C 全局变量D 全局自定义数据类型30213 下列关于常量的叙述，正确的是（ ）。CA 常量必须在第一次使用时被赋值B 常量可以在任何时候被赋值C 常量必须在定义时被赋值D 常量与变量不同，没有数据类型之分30214 如要表示一个在100300000之间变化的整数，应使用（ ）型变

9、量。 CA Integer B String C Long D Byte30215 在窗体中，用（ ）语句声明的变量A可以被其它窗体引用。 BA Dim A As Integer B Public A As IntegerC Private A As Integer D Static A As Integer30216 下列关于符号常量的叙述，正确的是（ C ）。A 符号常量必须在第一次使用时被赋值B 符号常量可以在任何时候被赋值C 符号常量必须在定义时被赋值D 符号常量与变量不同，没有数据类型之分30217 用Dim x,y as boolean语句声明变量，下列正确的是（ C ）。A x和

10、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 TelBookB Type TelBook Name As String*12 TeL As IntegerType EndC Type TelBook Name String*12 TeL As IntegerEnd TypeD Type TelBook Name String*8 TeL As Inte

11、gerEnd TelBook30219 下列（ A ）是合法的变量名。A a_1 B 4A C a-b D string30220 不能被本模块的其它过程引用的是（A）。A) 局部变量 B) 模块级变量C) 全局变量 D) 以上都是30221 如果要表示一个在100300000之间变化的整数，应使用（C ）型变量。A) Integer B) String C) Long D) Byte30301 表达式4 + 6 5 * 7 / 9 Mod 3的值是（B ）。A 4 B 5 C 6 D 730302 下列逻辑表达式为True的是（C ）。A "A"<"9&q

12、uot; B "A">"a" C "a">"AT"D "AT"<"AND"30303 下列运算符中，优先级最高的是（B ）。A Like B Mod C Not D Eqv30304 设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 230306

13、 下列运算符中，优先级最低的是（D ）。A * B C / D 30307 表达式 2 = 3 < 1 的是（C ）。A 0 B 1 C True D False30308 表示x大于0且小于10的VB表达式是（ B）。A 0 < x < 10 B x > 0 And x < 10C x > 0 Or x < 10 D x > 0 : x < 1030309 判断整型变量x是奇数的表达式是（A）。A x Mod 2 <> 0 B x Mod 2 != 0C x Mod 2 0 D x Mod 2 030310 设a=6，b=-3

14、,则以下表达式值为True的是（D ）。A a<0 Or b>0 B a<0 And b>0C a>0 And b>0 D a<0 Eqv b>030311 下列正确的赋值语句是（B ）。A i = j = 0 B i = 0 : j = 0C i = 0 , j = 0 D i = 0 ; j = 030312 下列赋值语句中，正确的是（C ）。A i + j = 10 B 2i = jC j = i + j D i = j = 030313 能正确表达2的3次幂的表达式是（B ）。 A 2 * 3 B 2 3 C 2 * 3 D 2 &

15、; 330314 表达式123 + 23 Mod 100 7的值是（D ）。 A 6 B 126 C 20 D 13230315 表达式12000 + "123" & 100的值是（ ）。 AA "12123100" B 12223 C 24300 D "12223"30316 下列逻辑表达式的值为False的是（ C ）。A "A">"9" B "A"<"a"C "AT">"AT " D

16、"an ">"an"30317 下列运算符中，优先级最低的是（ C ）。A B / C MOD D *30318 判断整型变量x是5的倍数的表达式是（ B ）。A x Mod 5 <> 0 B int(x/5)=x/5C x/5int(x /5) D 5 Mod x = 030319 设a=8，b=6，c= -1；执行语句Print a>b>c后，窗体上显示的是（ C ）。A 1 B True C False D 出错信息30320 下列表达式中，非法的是（ C ）。A a<b+c B a>b+cC ab>

17、c D a=b+c30321 下列正确的赋值语句是（ B ）。 A i + j = 10 B i = 0 : j = 0C i = 0 , j = 0 D i = 0 ; j = 030322 下列运算符中，优先级最高的是（B）。A) * B) C) / D) 30323 表达式23 + 23 Mod 50 7的值是（C）。A) 23 B) 46 C) 25 D) 12330401 返回值为数值的函数是（B ）。A Mid B Instr C Left D Rtrim30402 表达式Len("幸运52")的值是（ B）。A 0 B 4 C 6 D 830403 以下（ B

18、）语句可表示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 Val C Len D Asc30405 当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，

19、整型变量x的值是（ D）。A 0 B 整数C 正整数 D 负整数30408 表达式InStr(2, "文本文件", "文")的值是（ C）。A 0 B 1 C 3 D 530409 除去字符串左侧空格的函数是（ 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, "文件系

20、统控件", "件")的值是（C ）。A 2 B 3 C 6 D 1130412 能判断一个表达式的值是否为数值类型的函数是（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 表达式

21、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 830418 除去字符串左右侧空格的函数是（ B ）。A Rtr

22、im() 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)CCC30421 执行以下程序段后，变量C$的值为（D）。a$="Basic 程序设计教程"b$="Visual "c$=b$ & Uc

23、ase(Mid(a$,1,6) & Right(a$,2)A)Visual Basic B) VISUAL BASIC 教程C)Visual Basic 程序 D) Visual BASIC 教程30501 VB表达式Format(Val("111a"), "#.#")的值是（C ）。A 11.1a B 11.10C 111.D 111.0030502 下列语句不合法的是（D ）。A x = 1 : y=2B ? x ; y ;C ? x , y ,D x = 1; y = 230503 如果VB语句超过一行，可以使用空格加（D ）续行。A -B

24、 +C ；D _30504 正确使用Cls方法的是（B ）。A Text1.ClsB Picture1.ClsC List1.ClsD Image1.Cls30505 下列语句合法的是（C ）。A x + y = 2B x > 2 = yC x = y > 2D x = y+30506 错误使用Print方法的是（D）。A Picture1.Print B Form1.PrintC Debug.Print D Text1.Print30507 Print方法分区输出时，用（B ）分隔多个表达式。A 空格 B 逗号 C 冒号 D 分号30508 Print "10+6=&q

25、uot; 10+6的输出结果是（C ）。A 16=10+6 B 10+6=10+6C 10+6=16D "10+6="10+630509 下列叙述错误的是（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 <> 0C y > 0 =

26、 x D x = 2y30512 下列语句错误的是（B ）。A ClsB Image1.ClsC Form1.ClsD Picture1.Cls30513 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 = nA 1 B

27、2 C 3 D 430516 要强制显式声明变量,可在窗体模块或标准模块的声明段中加入（ C ）语句。A Option Base 0 B Option Base 1C Option Explicit D Option Compare30517 下列语句错误的是（ B ）。A Cls B Image1.ClsC Form1.Cls D Picture1.Cls30518 不能把25*3.14*8的结果输出到“立即”窗口的是（B）。A) 在代码窗口中使用Debug.Print 25*3.14*8语句B) 在“立即”窗口中直接使用 25*3.14*8语句C) 在“立即”窗口中使用 ? 25*3.14

28、*8语句D) 在“立即”窗口中使用Print 25*3.14*8语句30519 要强制显式声明变量，可在窗体模块或标准模块的声明段中加入（D）语句。A) Option Base 0 B) Option Base 1C) Option Compare D) Option Explicit30601 执行x = InputBox("请输入半径",0,"求面积") ，在输入框中输入3后回车,则下列叙述正确的是（ B）。A x的值是数值3B x的值是字符"3"C 0是默认值D 对话框标题是"求面积"30602 执行x =

29、MsgBox("数据类型不匹配",VbOKCancel,"出错提示!") ，然后单击消息框的“取消”按钮，x的值是（D ）。A True B False C 1 D 230603 下列语句正确的是（ B）。A MsgBox VbOkOnly, "Error"B MsgBox "Error", VbOkOnlyC MsgBox ( VbOkOnly, "Error" )D MsgBox ( "Error", VbOkOnly )30604 执行Len(InputBox(&quo

30、t;请输入编号:")，在输入框中输入"神州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 Tod

31、ay And TomorrowD 130607 下列语句组：a$="Today And Tomorrow"b$=Right(a$,8):c$=Left(a$,5)MsgBox a$, ,b$,c$执行后消息框中显示的内容是（C ）。A Today B TomorrowC Today And Tomorrow D 130608 下列程序运行时,消息框显示的内容是（A ）。Private Sub Command1_Click() MsgBox CStr(123 + 321) End SubA 444B 123321C 123+321D 显示出错信息30609 窗体上有一个命令按

32、钮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 输入框标题

33、是"n="C n等于数值5D n的值为字符"5"30611 执行x = MsgBox("数据类型不匹配", , "出错提示!") ，然后按回车，x的值是（B ）。A 0 B 1 C True D False30612 下列语句正确的是（ A）。A MsgBox "" B MsgBox VbOkOnly,"Error"C MsgBox ( VbOkOnly, "Error" )D MsgBox ( "Error", VbOkOnly, ,

34、100 )30613 下列关于InputBox函数的叙述，错误的是（ ）。 AA 可以省略任何参数B 可以在屏幕指定位置显示输入框 C 可以指定默认值 D 返回值为String类型30614 下列程序运行时,消息框显示的内容是（ ）。 C Private Sub Command1_Click() MsgBox CStr("123 + 321") End SubA 444 B 123321 C 123 + 321D 显示出错信息30615 执行语句a = MsgBox("你好", vbAbortRetryIgnore + vbDefaultButton2)

35、，当出现消息框时，按回车，a的值为（ ）。 BA vbAbort B vbRetry C vbIgnore D vbDefault30616 对于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

36、 softwareC hardware D software and hardware30618 对于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

37、246 B 123123C 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&qu

38、ot;, vbOKCancel) D) MsgBox (vbOKCancel, "Error")30701 将窗体的（C ）属性设置为True，可使Form_Load事件中的Print方法显示结果。A DrawStyleB DrawModeC AutoRedrawD Enabled30702 将窗体的BoderStyle属性设置为（A ）可使窗口不显示标题栏。A 0 B 1 C 2 D 530703 下列叙述中，正确的是（B ）。A 窗体的Name属性可以为空B 窗体的Name属性定义窗体的名称C 可以在运行期间改变窗体的Name属性D 窗体的Name属性的值显示在窗体标题

39、栏中30704 设置窗体的（A ）属性可改变窗体标题。A Caption B NameC BackColor D BorderStyle30705 通过（A ）属性设置窗体图标。A Icon B Picture C MouseIconD DownPicture30706 一个工程含有多个窗体及标准模块，下列叙述错误的是（A ）。A 如果工程含Sub Main过程，程序首先执行该过程B 任何时刻最多只有一个窗体是活动窗体C 标准模块不能设置为启动模块D Hide方法只是隐藏而不从内存中清除窗体30707 使用（C ）方法可隐藏窗体，但不从内存中释放。A Show B Load C Hide D

40、UnLoad30708 下列叙述中，错误的是（ C）。A 窗体的Load事件在加载窗体时发生B 窗体的Height、Width属性用于设置窗体的高和宽C 执行Unload Form1语句后，窗体仍在内存中但不可见D 当窗体的Enabled属性为False时，对窗体的操作都被禁止30709 运行后，在窗口上单击鼠标时，窗体不会接收到的事件是（ D）。A MouseDown B MouseUp C Click D Load30710 要使窗体显示在屏幕的中央，应设置属性StartUpPosition为（ C）。A 0 B 1 C 2 D 330711 运行时，单击窗体不能将窗体的背景色设置为红色的

41、事件过程是（C ）。A Private Sub Form_Click( ) Me.BackColor = vbRed End SubB Private Sub Form_Click( ) Form1.BackColor = vbRed End SubC Private Sub Form_Click( ) this.BackColor = vbRed End SubD Private Sub Form_Click( ) BackColor = vbRed End Sub30712 可以在运行期间设置窗体的（C ）属性。A BorderStyle B ControlBoxC Icon D MaxB

42、utton30713 在属性窗口设置窗体的Moveable属性为False，使得窗体（ ）。 B A 不可见 B 不可移动 C 不可放大 D 不可激活30714 要为窗体设置一幅背景图片，应设置（ ）属性。 D A BackImage B Image C Icon D Picture30715 能模态显示Form1窗口的语句是（ ）。 CA Form1.Show B Form1.LoadC Form1.Show vbModal D Form1.Load vbModal30716 如果Form1是启动窗体，并且Form1的Load事件过程中有Form2.Show，则程序启动后（ A ）。A Fo

43、rm1是最后的活动窗体 B Form2是最后的活动窗体 C 编译错误 D 运行出错30717 能被一个对象所识别的外界动作称为（ A ）。A 事件 B 方法 C 过程 D 属性30718 若要使用Print方法在窗体上打印红色的文字，应设置窗体的（ B ）属性。A Font B ForeColorC Appearance D FillColor30719 使用（A）方法可隐藏窗体，但不从内存中释放。A) Hide B) UnLoad C)Show D) Load30720 下列叙述错误的是（B）。A) 当一个窗体变成活动窗体时，会触发Activate事件B) 一旦装载窗体，会自动触发Click

44、事件C) 当单击一个窗体上的关闭按纽卸载该窗体时，会触发Unload事件D) 当一个窗体不再是活动窗体时，会触发Deactivate事件30801 下列叙述错误的是（ A）。A 标签和文本框都有Caption属性B 标签和文本框的主要区别在于能否编辑其内容C 标签具有AutoSize属性，而文本框没有D 文本框具有ScrollBar属性，而标签没有30802 能清除文本框Text1中内容的语句是（B ）。A Text = "" B Text1.Text = ""C Text1.clear D Text1.Cls30803 设置（ A）属性使标签Label

45、1没有边框。A Label1.BorderStyle = 0B Label1.BorderStyle = 1C Label1.BackStyle = TrueD Label1.BackStyle = False30804 下列叙述错误的是（B ）。A 标签和文本框都有Move方法B 标签和文本框都有Text属性C 标签具有Caption属性，而文本框没有D 文本框具有Locked属性，而标签没有30805 下列控件属性赋值语句错误的是（D ）。A Label1 = "欢迎" B Text1.Text = "欢迎"C Text1 = "欢迎&qu

46、ot; D Text = "欢迎"30806 设置标签Label1的（D ）属性使它不可见。A Label1.Visible = 0 B Label1.Visible = 1C Label1.Visible = True D Label1.Visible = False 30807 设置标签的（ C）属性，可改变其文字对齐方式。A Justify B FontC Alignment D 以上都不是30808 触发文本框Change事件的操作是（A ）。A 改变文本框的内容 B 改变文本框的大小C 文本框获得焦点 D 文本框失去焦点30809 修改文本框的内容触发（B ）事件

47、。A Modify B ChangeC ChangeData D AutoSize30810 对窗体上的文本框Text1编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) If Chr(KeyAscii) > "Z" Or Chr(KeyAscii) < "A" Then KeyAscii = 0 End If End Sub运行时，文本框中能输入的字符是（B ）。A 字母 B 大写字母C 大写字母外的其它字符D 不能输入字母30811 文本框没有（ D）属性。A Name B

48、LeftC Font D Caption30812 要使文本框能显示多行文本，需设置（B ）。A AutoSize属性为TrueB MultiLine属性为TrueC SingleLine属性为FalseD MaxLines属性大于130813 能使文本框Text1中文本不可编辑的语句是（ ）。 DA Text1.Editable = False B Text1.Enabled = TrueC Text1.TabStop = False D Text1.Locked = True30814 设置文本框的（ ）属性，可限制文本框中能输入文本的最大长度。 AA MaxLength B Width

49、C MultiLine D MaxText30815 窗体上有文本框Text1和命令按钮Command1，对Command1编写如下事件过程： Private Sub Command1_Click() Text1.Text = "12345" Text1.SelStart = 1 Text1.SelLength = 3 MsgBox Text1.SelText End Sub运行时，单击命令按钮，出现的信息框显示（ ）。 BA 12345 B 234 C 123 D "345"30816 在窗体上有一个名称为Text1的文本框，要得到在其中输入字符的AS

50、CII码，应使用它的（ A ）事件。A KeyPress B KeyUpC KeyDown D Change30817 由系统触发的事件有（ C ）。A MouseMove,MouseUp,MouseDownB Hscrollbox,Click,DblClickC Initialze,Load,TimerD KeyPress,KeyUp,KeyDown30818 要用文本框控件Text1实现一个密码输入框，可以通过（ A ）设置，使得无论用户输入什么字符文本框只显示“*”。A Text1.PasswordChar = "*" B Text1.Font = "*&q

51、uot; C Text1.Text = "*" D Text1.Appearance = "*" 30819 要对文本框Text1中的文本加删除线，可以通过（ B ）来实现。A Text1.Font.FontStrikethru = True B Text1.FontStrikethru = True C Text1.Font = vbStrikethru D Text1.Style = vbStrikethru30820 下列语句中，除（ ）以外，都能使文本框Text1不可编辑（ C ）。A Text1.Locked = True B Text1.Vi

52、sible = FalseC Text1.ReadOnly = True D Text1.Enabled = False30821 下列叙述正确的是（B）。A) 当文本框的内容发生变化时，必将触发LostFocus事件B) 设置文本框的MaxLength属性，可限制文本框中能输入文本的最大长度C) AutoSize属性为True时，能使文本框Text1自动改变大小以适应其文本内容的多少D) 文本框不具有Left属性30822 为了使标签Label1有边框，正确的属性设置为（B）。A) Label1.BorderStyle=0 B) Label1.BorderStyle=1C) Label1.B

53、ackStyle=0 D) Label1.BackStyle=030901 设置图像框的（C ）可使框内的图片按图像框大小自动调整。A AutoSize属性为True B AutoSize属性为FalseC Stretch属性为True D Stretch属性为False30902 下列语句组：ScaleWidth = 100 : ScaleHeight = 100 Circle(50, 40) ,10, , , ,2绘制的是（B ）。A 圆形 B 椭圆 C 扇形 D 弧线30903 将当前目录下的图形文件Clock.jpg装入图片框Picture1的语句是（ D）。A Picture = "Clock1.jpg"B Picture = LoadPicture("Clock1.jpg")C Picture1.Picture = "Clock1.jpg"D Picture1.picture = LoadPicture("Clock1.jpg")