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

30101 标准控件不包括（D）控件。A驱动器列表框B目录列表框C文件列表框D通用对话框30102 当一个工程含有多个窗体时，它的启动窗体是（D）0A正在编辑的窗体B最后一个添加的窗体C第一个添加的窗体D在"工程属性"对话框中指定的窗体30103 VB应用程序在（A）模式下不能编辑代码和设计界面。A运行B中断C设计D以上均不能30104下列叙述错误的是（B）。AVB应用程序没有明显的开始和结束语句BVB控件的所有属性值均可在属性窗口中设置CVB是事件驱动型可视化编程工具DVB通过"工具"菜单的"选项"设置代码编辑窗口的字体大小30105 标准模块文件的扩展名是（C）oA.cisB.frmC.basD.rec30106 下列叙述中，错误的是（D）oA打开一个工程文件，系统自动装入与该工程有关的文件B保存VB程序时，应分别保存窗体和工程文件C事件可以由用户触发，也可以由系统触发DVB应用程序只能以解释方式执行30107在设计阶段，双击窗体上的某个控件，可以打开（A）0A代码窗DB属性窗DC工具箱窗口D工程资源管理器窗口30108下列叙述中，错误的是（C）oAVB是可视化程序设计语言BVB采用事件驱动编程机制CVB是面向过程的程序设计语言DVB应用程序可以以编译方式执行30109 下列叙述中，正确的是（D）oAVB的事件由用户定义BVB程序以顺序方式执行CVB程序从Main。函数开始执行DVB运行时，总是等待事件的发生30110在VB中可以通过（C）方法向工具箱加入其它控件。A右击工具箱，执行弹出式菜单中的“添加选项卡”命令B执行“文件”菜单中的“添力□工程”命令C执行“工程”菜单中的“部件”命令D执行“工程”菜单中的“添加窗体”命令30111在VB的工程资源管理器窗口中不可能存在的文件类型是（C）0A*.clsB*.vbgC*.gifD*.bas30112以下那一种方法不能打开“代码窗口”（A）oA按快捷键Alt+CB双击窗体或窗体上的控件C执行“视图”菜单中的“代码窗口”命令D单击“资源管理器”窗口的“查看代码”按钮30113 下列叙述中，错误的是（）oBAVB程序代码不区分字母大小写BVB程序代码中使用“〃”表示注释一行CVB程序代码中不能使用数字作为标识符的首字符DVB程序代码以“回车换行”作为语句结束标志30114VB窗体文件的扩展名是（）0BAcisBfrmCbasDres30115下列关于VB代码编辑时常用组合键的叙述错误的是（）。CACtrl+C表示复制选定代码 BCtrl+X表示剪切选定代码CCtrl+P表示粘贴代码 DCtrl+Y表示删除整行代码30116VB是一种面向对象的程序设计语言，构成对象的三要素是（A）oA属性、事件、方法B控件、属性、事件C窗体、控件、过程D窗体、控件、模块30117以下叙述中错误的是（D）oA一个工程可以含有多个标准模块文件B窗体文件包含该窗体及其控件的属性C以BAS为扩展名的文件是标准模块文件D在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件30118当程序在运行过程中因某种原因中断时，VB进入（C）模式。A）设计B）运行C）中断D）编程30119以下叙述错误的是（B）。A）窗体对象的ControlBox属性可用于设置窗体上的控制菜单B）VisualBasic要设置某个对象的属性时，只能通过属性窗口设置C）当一个工程含有多个窗体时，其中的启动窗体是在“工程属性”对话框中指定的D）通用对话框是一种ActiveX控件30201 下列为整型变量的是（C）oAx!Bx#Cx%Dx$30202 设有语句组：DimSIAsString*5SI="VBTest"则SI的值为（B）oAVBTestBVBTeCVBTesDBTest30203下列（A）是合法的变量名。AxyBx-yC2xDand30204下列（A）为单精度变量。Ax!Bx#Cx%Dx$30205由（C）关键字声明的局部变量在整个程序运行时一直存在。ADimBPublicCStaticDPrivate30206 定义变量时如不指定类型，该变量为（C）变量。AIntegerBStringCVariantDSingle30207 用户自定义数据类型的成员不能是（A）oA数组B日期型C货币型D定长字符串30208下列（B）是合法的变量名。Ax%yBxy%C2xDOr30209日期常量用（C）作为界定符。A"B%C#D&30210 下列哪一个是日期型常量（B）oA"06/08/04"B#06/08/04#C06/08/04D{06/08/04）30211 下列为字符串变量的是（D）oAx!Bx#Cx%Dx$30212 可以在窗体模块的声明段中进行（C）的声明。A全局数组B全局常量C全局变量D全局自定义数据类型30213下列关于常量的叙述，正确的是（）0CA常量必须在第一次使用时被赋值B常量可以在任何时候被赋值C常量必须在定义时被赋值D常量与变量不同，没有数据类型之分30214 如要表示一个在100〜300000之间变化的整数，应使用（）型变量。CAIntegerBStringCLongDByte30215在窗体中，用（）语句声明的变量A可以被其它窗体引用。BADimAAsIntegerBPublicAAsIntegerCPrivateAAsIntegerDStaticAAsInteger30216下列关于符号常量的叙述，正确的是（C）0A符号常量必须在第一次使用时被赋值B符号常量可以在任何时候被赋值C符号常量必须在定义时被赋值D符号常量与变量不同，没有数据类型之分30217用Dimx,yasboolean语句声明变量，下列正确的是（C）。Ax和y都是布尔型变量Bx是整形变量，y是布尔型变量Cx是变体型变量，y是布尔型变量Dx和y都是变体型变量30218以下能正确定义数据类型TelBook的代码是（C）。ATypeTelBookNameAsString*12TeLAsIntegerEndTypeTelBookBTypeTelBookNameAsString*12TeLAsIntegerTypeEndCTypeTelBookNameString*12TeLAsIntegerEndTypeDTypeTelBookNameString*8TeLAsIntegerEndTelBook30219下列（A）是合法的变量名。Aa_lB4ACa-bDstring30220不能被本模块的其它过程引用的是（A）。A）局部变量 B）模块级变量C）全局变量 D）以上都是30221如果要表示一个在100〜300000之间变化的整数，应使用（C）型变量。A）Integer B）StringC）Long D）Byte30301表达式4+6\5*7/9Mod3的值是（B）。A4B5C6D730302 下列逻辑表达式为True的是（C）。A"A"<"9"B"A">"a"C"a">"AT"D"AT"<"AND"30303 下列运算符中，优先级最高的是（B）oALikeBModCNotDEqv30304设a=6,b=5,c=-2；执行语句Printa>b>c后，窗体上显示的是（B）。A1BTrueCFalseD出错信息30305 下列表达式中，值最大的是（C）oA2\3B2/3C2mod3D3mod230306 下列运算符中，优先级最低的是（D）0A* B A C /D\30307表达式2=3<1的是（C）oA0 B 1 C TrueD False30308表示x大于0且小于10的VB表达式是（B）。

A0<x<10Bx>0Andx<10Cx>0Orx<10 Dx>0:x<1030309 判断整型变量x是奇数的表达式是（A）。AxMod2<>0BxMod2!=0CxMod2#0DxMod2=030310设a=6,b=-3,则以下表达式值为True的是（D）。Aa<0Orb>0Ba<0Andb>0Ca>0Andb>0Da<0Eqvb>030311下列正确的赋值语句是（B）0Ai=j=0Bi=0:j=0Ci=0,j=0Di=0;j=030312 下列赋值语句中，正确的是（C）oAi+j=10B2i=jCj=i+jDi=j=030313 能正确表达2的3次幕的表达式是（B）oA2*3B2A3c2**3D2&330314表达式123+23Mod100\7的值是（D）。A6B126C20D13230315表达式12000+"123"&100的值是（）。AA"12123100"B12223C24300D"12223"30316下列逻辑表达式的值为False的是（C）。A"A">"9"B"A"<"a"C"AT">"ATan>"an"C"AT">"ATan>"an"30317下列运算符中，优先级最低的是（C）。A\B/CMODD*30318判断整型变量x是5的倍数的表达式是（B）。AxMod5<>0Bint（x/5）=x/5Cx/5Wint（x/5）D5Modx=030319设a=8,b=6,c=-l；执行语句Printa>b>c后，窗体上显示的是（C）。A1BTrueCFalseD出错信息30320 下列表达式中，非法的是（C）oAa<b+cBa>b+cCa#b>cDa=b+c30321 下列正确的赋值语句是（B）oAi+j=10Bi=0:j=0Ci=0,j=0Di=0;j=030322下列运算符中，优先级最高的是（B）。A）*B）AC）/ D）\30323表达式23+23Mod50\7的值是（C）。A）23B）46C）25D）12330401返回值为数值的函数是（B）oAMidBInstrCLeftDRtrim30402 表达式Len（"幸运52"）的值是（B）oA0B4C6D830403以下（B）语句可表示［50,100］之间的随机数。AInt（Rnd*51）+49BInt（Rnd*51+50）CInt（Rnd*50）+50DInt（Rnd*50+50）30404 返回值为字符串的函数是(A)oA StrB Vai C LenD Asc30405当x=0时，函数1如>0,1,116<0,-1,0))的返回值是(A)oA 0B 1C -1 D出错30406表达式Fix(5.6)+Int(-5.6)的值是(B)oAOB-1C1D以上都不对30407如果Sgn(x)的值为-1,整型变量x的值是(D)。A0B整数C正整数D负整数30408表达式InStr(2,"文本文件"文")的值是(C)。A0B1C3D530409 除去字符串左侧空格的函数是(C)ALeft()BTrim()CLtrim()DLeftTrim()30410 设2="39级台阶",使b="台阶"的语句是(D)oARight(a,4)BInstr(a,5,4)CLeft(a,5,4)Dmid(a,4,2)30411表达式InStr(3,"文件系统控件7件')的值是(C)。A2B3C6DU30412 能判断一个表达式的值是否为数值类型的函数是(B)。AIsDate()BIsNumeric()CIsData()DIsNumber()30413表达式Chr(Asc("B")+1)的值是()。AA"C"BCC67 D"67"30414下列表达式的值为15的是（）。C

AInt(14.6)BFix(14.6)AInt(14.6)BFix(14.6)CRound(15.3)DTrunc(15.3)30415表达式UCase(Mid("basic!”,1,1))+Right("basic!”,5)的值是()。DA"asic"B"Asic!"C"basic!"D"Basic!"30416以下能判断是否到达文件尾的函数是(D)oALOF()BBOF()CLOC()DEOF()30417表达式Len("神州6号")的值是(B)。A10B4C5D830418除去字符串左右侧空格的函数是(B)oARtrim()BTrim()CLtrim()DMid()30419函数Choose(2,"+—X返回值是(B)。A+B-CxD430420表达式String(3,"ABC")的结果为(A)。AAAB)ABCC)BBBD)CCC30421执行以下程序段后，变量C$的值为(D)。a$="Basic程序设计教程"b$="Visual"c$=b$&Ucase(Mid(a$,l,6))&Right(a$,2)A)VisualBasicVISUALBASIC教程C)VisualBasic程序D)VisualBASIC教程30501VB表达式Format(Val("11la"),"##.##")的值是(C)。AH.laB11.IOClll.D111.0030502 下列语句不合法的是（D）oAx=1:y=2B?x;y;C?x,y,Dx=1;y=230503 如果VB语句超过一行，可以使用空格加（D）续行。A-B+C；D_30504 正确使用Cis方法的是（B）。ATextl.ClsBPicturel.ClsCListl.ClsDImage1.Cis30505 下列语句合法的是（C）oAx+y=2Bx>2=yCx=y>2Dx=y++30506 错误使用Print方法的是（D）。APicture1.PrintBForm1.PrintCDebug.PrintDText1.Print30507 Print方法分区输出时，用（B）分隔多个表达式。A空格B逗号C冒号D分号30508Print"10+6=";10+6的输出结果是（C）。A16=10+6B10+6=10+6C10+6=16D"10+6="10+630509 下列叙述错误的是（A）oA 不允许使用行号与标号B 单条语句可分行书写C 同一行上可以书写多条语句DVB代码不区分字母的大小写30510VB表达式Format（CInt（"3.14"）,"00.00"）的值是（A）。A03.00B03.14C3.14D330511下列语句合法的是（B）oA1+2=3Bx=y<>0Cy>0=xDx=2y30512 下列语句错误的是（B）oAClsBImagel.ClsCForml.ClsDPicture1.Cis30513Print方法紧密输出时，用（）分隔多个表达式。DA空格B逗号C冒号D分号30514 下列关于VB编码规则的叙述，错误的是（D）oA一条语句可以分多行书写B可以用“Rem”注释单行语句C注释可以放在语句之前D可以用作为语句的结束符30515 以下程序段中有（）处错误。CReDimaAsIntegern+3=na=0;b=1Printn+3=nAlB2C3 D430516要强制显式声明变量，可在窗体模块或标准模块的声明段中加入（C）语句。AOptionBase0BOptionBase1COptionExplicitDOptionCompare30517下列语句错误的是（B）oACisBImage1.CisCForm1.CisDPicture1.Cis30518不能把2A5*3.14*8的结果输出到“立即”窗口的是（B）。A）在代码窗口中使用Debug.Print2A5*3.14*8语句B）在“立即”窗口中直接使用2A5*3.14*8语句C）在“立即”窗口中使用？2A5*3.14*8语句D）在“立即”窗口中使用Print2A5*3.14*8语句30519要强制显式声明变量，可在窗体模块或标准模块的声明段中加入（D）语句。A）OptionBase0 B）OptionBase1C）OptionCompare D）OptionExplicit30601执行x=InputBox（"请输入半径",0,"求面积"），在输入框中输入3后回车,则下列叙述正确的是（B）oAx的值是数值3Bx的值是字符"3"C。是默认值D对话框标题是“求面积"30602执行x=MsgBox（"数据类型不匹配",VbOKCancel,"出错提示!"），然后单击消息框的“取消”按钮，x的值是（D）oATrueBFalseC1D230603下列语句正确的是（B）oAMsgBoxVbOkOnly,"Error"BMsgBox"Error",VbOkOnlyCMsgBox（VbOkOnly,"Error"）

DMsgBox("Error",VbOkOnly)30604执行Len(InputBox("请输入编号:"))，在输入框中输入"神州1号"后回车，结果为(A)0A4B7C0D出错30605执行MsgBox"除数不能为0!”,48,"数据出错"，在弹出的消息框中显示的图标是(C)。A停止图标B问号图标C感叹号图标D消息图标30606下列语句组：a$="TodayAndTomorrow"b$=Right(a$,8):c$=Left(a$,5)MsgBoxa$,,b$,c$执行后消息框的标题是(B)。ATodayBTomorrowCTodayAndTomorrowD130607 下列语句组：a$="TodayAndTomorrow"b$=Right(a$,8):c$=Left(a$,5)MsgBoxa$,,b$,c$执行后消息框中显示的内容是(C)。ATodayBTomorrowC TodayAndTomorrowD 130608下列程序运行时,消息框显示的内容是30608下列程序运行时,消息框显示的内容是（A）0PrivateSubCommandl_Click()MsgBoxCStr(123+321)EndSubA444B12332IC123+32ID显示出错信息30609 窗体上有一个命令按钮Command1,编写如下事件过程：PrivateSubCommandl_Click()x=InputBox("x=")y=InputBox("y=")Printx+yEndSub运行后，单击命令按钮，先后在两个输入对话框中输入123和321,窗体显示的内容是(B)oA444B123321C123+321D出错信息30610执行n=InputBox("n=",0,"n!"),在输入框中输入5后回车，则下列叙述中,正确的是(D)oA0是默认值B输入框标题是"n="Cn等于数值5Dn的值为字符"5"30611 执行x=MsgBox("数据类型不匹配",，"出错提示!”)，然后按回车，x的值是(B)oA0B1CTrueDFalse30612 下列语句正确的是(A)oAMsgBox""BMsgBoxVbOkOnly,"Error"CMsgBox(VbOkOnly,"Error")DMsgBox("Error",VbOkOnly,,100)30613 下列关于InputBox函数的叙述，错误的是()。AA可以省略任何参数B可以在屏幕指定位置显示输入框C可以指定默认值D返回值为String类型30614 下列程序运行时,消息框显示的内容是()0CPrivateSubCommandl_Click()MsgBoxCStr("123+321")EndSubA444B123321C123+321D显示出错信息30615 执行语句a=MsgBox("你好",vbAbortRetrylgnore+vbDefaultButton2),当出现消息框时，按回车，a的值为()oBAvbAbortBvbRetry Cvblgnore DvbDefault30616对于InputBox函数，下列说法不正确的是(A)。AInputBox函数输入的是数值型BInputBox函数值必须赋予一个变量CInputBox函数prompt参数不能缺省D每执行一次InputBox函数，只能输入一个值30617执行语句a="softwareandhardware":b=Right(a,8):c=Mid(a,l,8):MsgBoxa,,b,c,l后消息框的标题是（C）0A1BsoftwareChardwareDsoftwareandhardware30618对于InputBox函数，下列不正确的说法是（B）。A每执行一次InputBox函数，只能输入一个值BInputBox函数只能输入数值CInputBox函数的prompt参数不能缺省DInputBox函数的参数有三个以上30619 窗体上有一命令按钮Commandl,编写下列事件过程：PrivateSubCommandl_Click（）MsgBoxCStr（"123"+123）EndSub程序运行时，单击按钮，消息对话框显示的内容是（A）oA246B123123C123+123D显示出错信息30620在立即窗口中执行语句：a=InputBox（"请输入姓名：姓名"，"张三”），出现输入对话框后直接选择"确定"按纽后，a的值为（B）oA）姓名 B）张三C）请输入姓名： D）以上都不对30621下列语句中正确的是（A）。MsgBox"Error",vbOKCancelMsgBoxvbOKCancel,"Error"MsgBox（"Error",vbOKCancel）MsgBox（vbOKCancel,"Error"）30701将窗体的（C）属性设置为True,可使Form_Load事件中的Print方法显示结果。ADrawStyleBDrawModeCAutoRedrawDEnabled30702将窗体的BoderStyle属性设置为（A）可使窗口不显示标题栏。A0B1C2D530703 下列叙述中，正确的是（B）oA窗体的Name属性可以为空B窗体的Name属性定义窗体的名称C 可以在运行期间改变窗体的Name属性D 窗体的Name属性的值显示在窗体标题栏中30704 设置窗体的（A）属性可改变窗体标题。ACaptionBNameCBackColorDBorderStyle30705通过（A）属性设置窗体图标。AIconBPictureCMouseiconDDownPicture30706 一个工程含有多个窗体及标准模块，下列叙述错误的是（A）oA如果工程含SubMain过程，程序首先执行该过程B任何时刻最多只有一个窗体是活动窗体C标准模块不能设置为启动模块DHide方法只是隐藏而不从内存中清除窗体30707使用（C）方法可隐藏窗体，但不从内存中释放。AShowBLoadCHideDUnLoad30708下列叙述中，错误的是（C）oA窗体的Load事件在加载窗体时发生B窗体的Height、Width属性用于设置窗体的高和宽C执行UnloadForm1语句后，窗体仍在内存中但不可见D当窗体的Enabled属性为False时，对窗体的操作都被禁止30709运行后，在窗口上单击鼠标时，窗体不会接收到的事件是（D）。AMouseDownBMouseUpCClickDLoad30710要使窗体显示在屏幕的中央，应设置属性StartUpPosition为（C）。A0B1C2D330711运行时，单击窗体不能将窗体的背景色设置为红色的事件过程是（C）。APrivateSubForm_Click（）Me.BackColor=vbRedEndSubBPrivateSubForm_Click（）Forml.BackColor=vbRedEndSubCPrivateSubForm_Click（）this.BackColor=vbRed

EndSubDPrivateSubForm_Click（）BackColor=vbRedEndSub30712 可以在运行期间设置窗体的（C）属性。ABorderStyleBControlBoxCIconDMaxButton30713 在属性窗口设置窗体的Moveable属性为False,使得窗体（）。BA不可见 B不可移动C不可放大D不可激活30714 要为窗体设置一幅背景图片，应设置（）属性。DABackimageBImageCIconDPicture30715能模态显示Forml窗口的语句是（）。CAForml.ShowBForml.LoadCForml.ShowvbModalDForml.LoadvbModal30716如果Forml是启动窗体，并且Forml的Load事件过程中有Form2.Show,则程序启动后（A）。AForml是最后的活动窗体BForm2是最后的活动窗体 C编译错误D运行出错30717 能被一个对象所识别的外界动作称为（A）0A事件B方法C过程D属性30718 若要使用Print方法在窗体上打印红色的文字，应设置窗体的（B）属性。AFontBForeColorCAppearanceDFillColor30719使用（A）方法可隐藏窗体，但不从内存中释放。HideB）UnLoadC）ShowD）Load30720 下列叙述错误的是（B）。A）当一个窗体变成活动窗体时，会触发Activate事件一旦装载窗体，会自动触发事件C）当单击一个窗体上的关闭按纽卸载该窗体时，会触发Unload事件D）当一个窗体不再是活动窗体时，会触发Deactivate事件30801 下列叙述错误的是（A）oA标签和文本隔部有Caption属性B标签和文本框的主要区别在于能否编辑其内容C标签具有AutoSize属性，而文本框没有D文本框具有ScrollBar属性，而标签没有30802 能清除文本框Textl中内容的语句是（B）。AText=""BTextl.Text=""CTextl.clear DTextl.Cis30803设置（A）属性使标签Labell没有边框。ALabell.BorderStyle=0BLabel1.BorderStyle=1CLabell.BackStyle=TrueDLabell.BackStyle=False30804 下列叙述错误的是（B）oA标签和文本框都有Move方法B标签和文本框都有Text属性C标签具有Caption属性，而文本框没有D文本框具有Locked属性，而标签没有30805 下列控件属性赋值语句错误的是（D）oALabell="欢迎"BText1.Text="欢迎"CTextl="欢迎" DText="欢迎"30806设置标签Labell的（D）属性使它不可见。ALabell.Visible=0BLabell.Visible==1CLabel1.Visible=TrueDLabel1.Visible=False30807设置标签的（C）属性，可改变其文字对齐方式。AJustifyBFontCAlignmentD 以上都不是30808触发文本框Change事件的操作是（A）。A改变文本框的内容B改变文本框的大小C文本框获得焦点D文本框失去焦点30809修改文本框的内容触发（B）事件。AModifyBChangeCChangeDataDAutoSize30810对窗体上的文本框Textl编写如下事件过程：PrivateSubText1_KeyPress（KeyAsciiAsInteger）IfChr（KeyAscii）>"Z"OrChr（KeyAscii）<"A"ThenKeyAscii=0EndIfEndSub运行时，文本框中能输入的字符是（B）oA字母B大写字母C大写字母外的其它字符D不能输入字母30811文本框没有（D）属性。ANameBLeftCFontDCaption30812 要使文本框能显示多行文本，需设置（B）。AAutoSize属性为TrueBMultiLine属性为TrueCSingleLine属性为FalseDMaxLines属性大于130813 能使文本框Textl中文本不可编辑的语句是（）。DATextl.Editable=False BTextl.Enabled=TrueCTextl.TabStop=False DTextl.Locked=True30814 设置文本框的（）属性，可限制文本框中能输入文本的最大长度。AAMaxLengthBWidthCMultiLineDMaxText30815 窗体上有文本框Textl和命令按钮Command],对Command1编写如下事件过程：PrivateSubCommandl_Click（）Textl.Text="12345"Textl.SelStart=1Textl.SelLength=3MsgBoxTextl.SelTextEndSub运行时，单击命令按钮，出现的信息框显示（）oBA12345B234C123D"345"30816 在窗体上有一个名称为Textl的文本框，要得到在其中输入字符的ASCII码，应使用它的（A）事件。A KeyPress BKeyUpC KeyDownDChange30817由系统触发的事件有（C）oAMouseMove,MouseUp,MouseDownBHscrollbox,Click,DblClickCInitialze,Load,TimerDKeyPress,KeyUp,KeyDown30818 要用文本框控件Textl实现一个密码输入框，可以通过（A）设置，使得无论用户输入什么字符文本框只显示AText1.PasswordChar=BTextl.Font=CTextl.Text="*"DTextl.Appearance="*"30819要对文本框Textl中的文本加删除线，可以通过（B）来实现。ATextl.Font.FontStrikethru=TrueBTextl.FontStrikethru=TrueCTextl.Font=vbStrikethruDTextl.Style=vbStrikethru30820下列语句中，除（）以外，都能使文本框Textl不可编辑（C）。AText1.Locked=TrueBTextl.Visible=FalseCTextl.Readonly=TrueDText1.Enabled=False30821下列叙述正确的是（B）。A）当文本框的内容发生变化时，必必触发LostFocus事件B）设置文本框的MaxLength属性，可限制文本框中能输入文本的最大长度C）AutoSize属性为True时，能使文本框自动改变大小以适应其文本内容的多少D）文本框不具有Left属性30822为了使标签Label1有边框，正确的属性设置为（B）。A）Label1.BorderStyle=0B）Label1.Borderstyle=1C）Labell.BackStyle=0D）Label1.BackStyle=030901设置图像框的（C）可使框内的图片按图像框大小自动调整。AAutoSize属性为TrueBAutoSize属性为FalseCStretch属性为TrueDStretch属性为False30902下列语句组：ScaleWidth=100:ScaleHeight=100Circle（50,40）,10,,,,2绘制的是（B）oA圆形B椭圆C扇形D弧线30903 将当前目录下的图形文件。ock.jpg装入图片框Picture1的语句是（D）。APicture="Clock1.jpg"BPicture=LoadPictureCClockl.jpg")CPicture1.Picture="Clock1.jpg"DPicture1.picture=LoadPicture（"Clockl.jpg"）30904设置Line控件的（A）属性可使其呈现不同式样。ABorderStyleBStyleCFillStyleDShape30905 下列叙述中，错误的是（B）oAScale方法用来定义新坐标系B窗体缺省坐标原点在窗体的左下角CScaleLeft和ScaleTop属性可改变坐标系的原点位置。DScaleWidth和ScaleHeight属性可改变其对象高度和宽度的刻度单位30906 下列叙述错误的是（D）oAPset方法用于绘制点BCircle方法用于画圆、椭圆、圆弧和扇形CLine方法用于画直线或矩形DPonit方法用于绘制有颜色的点30907设置图片框的（A）使其按图片尺寸自动调整大小。AAutoSize属性为TrueBAutoSize属性为FalseCStretch属性为TrueDStretch属性为False30908不属于VB作图方法的是（C）oAPsetBLineCShapeDCircle30909VB的图形控件不包括（B）oA直线B框架C图像框D图片框30910为了清除图片框内绘制的图形，应采用的正确方法是（B）。A选择图片框，然后按Del键B执行语句Picture1.CisC执行语句Picture】.ClearD执行语句Picture1.Picture=LoadPicture（""）30911窗体中有标签、文本框和用图形方法绘制的图形，它们依次位于哪一图形层（B）oA上层、中层和下层B中层、上层和下层C下层、中层和上层D上层、下层和中层30912设置Shape控件的（D）属性可使其呈现不同形状。ABorderStyleBStyleCFillStyleDShape30913 下列语句可使Sh叩el控件呈现为实心图形的是（）。DAshape1.BorderStyle=0BShape1.BackStyle=0CShapel.Shape=3DShape1.FillStyle=030914 将当前目录下的图像文件Clock.jpg装入图像框Imagel的语句是（）。DAImage="Clockl.jpg"BImage=LoadPicture（"Clockl.jpg"）CImage1.Picture="Clockl.jpg"DImage1.Picture=LoadPictureCClockl.jpg"）30915 为了清除图片框（PictureBox）内装入的图片，应采用的正确方法是（）。DA选择图片框，然后按Del键B执行语句Picture1.CisC执行语句Picture1.ClearD执行语句Picture1.Picture=LoadPicture（""）30916窗体上有一命令按钮Commandl,编写下列事件过程:

PrivateSubCommandl_Click()a=100:b=150:c=2000:d=2000CisLine(a,b)-(c,d),vbBlue,BEndSub运行时，单击按钮窗体上显示(A)。A一个未填充的矩形 B一条直线C一个填满了颜色的矩形 D无任何图形30917 窗体上有一命令按钮Command1,编写下列事件过程：PrivateSubCommandl_Click()c=2000:d=2000CisCircleStep(c,d),1000,vbRed,3.14,2*3.14,1EndSub运行时，单击按钮，窗体上显示(C)oA—*个填充的圆 B—外未填充的圆C一段圆弧 D一个点30918 执行指令"Forml.Line(1500,1OOO)-step(1000,500),B"后，Forml的CurrentX的值为(D)。A)1000B)1500C)500D)250030919Pset方法绘制的点的大小受其容器对象的(A)属性的影响。A)DrawWidthB)PictureA)DrawWidthB)PictureC）AutoRedraw D）stretch31001复选框的Value属性为0表示（A）0A复选框未被选中B复选框被选中C复选框内有灰色的钩D操作出错31002 单选按钮被选定时，其Value属性为（C）。A1B0CTrueDFalse31003运行时，下列哪种方法不能选中单选按钮（B）oA用鼠标单击单选按钮B在属性窗口中将单选按钮的Value属性设置为1C用Tab键将焦点转移到一组单选按钮后单击其中的单选按钮D采用单选按钮的访问键快捷方式31004下列（B）语句使复选框Check1无效。ACheck1.Value=1B Check1.Value=2CCheckl.Style=ID Check1.Style=031005下列（D）语句使复选框Checkl的标题显示在左边。ACheck1.Style=0BCheck1.Alignment=0CCheckl.Style=1DCheck1.Alignment=131006下列（B）语句设置单选按钮Optionl为选中状态。AOption1.Value=0BOption1.Value=TrueCOption1.Value=1DOption1.Value=False31007 复选框和单选按钮的（A）属性可以反应其当前状态。AValueBCheckedCCaptionDSelected31008 单选按钮不具有（B）属性。AValueBCheckedCCaptionDStytle31009要取得复选框的状态，应访问（A）属性。AValueBCheckedCVisibleDEnabled31010 在窗体运行时，复选框处于选中但不激活状态，表示（B）oAEnabled为False且Value为0BEnabled为False且Value为1CEnabled为True且Value为0DEnabled为True且Value为131011下列（B）方法可以将单选按钮设置为图形单选按钮。AOption1.Style=0BOption1.Style=1COption1.Picture=0DOption1.Picture=131012设置（D）属性可以改变单选按钮或复选框的标题对齐方式。AValueBAlignCSortedDAlighment31013下列（）方法可以将复选框设置为图形复选框。BACheck1.Style=0 BCheck1.Style=1CCheck1.Picture=0 DCheck1.Picture=131014 在实际应用中，经常将一组单选按钮置于一个框架（Frame）控件内，这主要是为了（）oDA使用户界面美观B使该组单选按钮同步C使该组单选按钮处于禁止状态D使该组单选按钮互斥，即同一时刻只有一个单选按钮被选中31015 访问单选按钮的（）属性可以获取其状态。AAValueBCheckedCVisibleDEnabled31016如果要把单选按钮的标题显示在它的左边，应把（B）oAAlignment属性设置为OBAlignment属性设置为1CStyle属性设置为0DStyle属性设置为131017 窗体上有一个单选按钮Option1。如要求当窗体初始显示时Optionl就处于选中状态，可以通过（C）实现。A在窗体的Load事件过程中加入语句：Option1.Value=FalseB在窗体的Show事件过程中加入语句：Optionl.Value=FalseC在窗体的Load事件过程中加入语句：Option1.Value=TrueD在窗体的Show事件过程中加入语句：Option1.Value=True31018 下列控件中，可以对单选按钮进行分组是（A）oA框架（Frame）控件B文本框（TextBox）控件C图像框（ImageBox）控件D标签（Label）控件31019下列（A）语句表示复选框Checkl被选中。A）Checkl.Value=l B）Checkl.Checked=1C）Checkl.Value=0 D）Checkl.Checked=031020复选框和单选按钮的（A）属性可以反映其当前状态。A）ValueB）CheckedC）CaptionD）Selected31101 属性窗口为命令按钮的Picture属性装入了图片，但却没有显示的原因是（B）oA按钮的Enabled属性为FalseB按钮的Sytle属性为0C按钮的Default属性为FalseD按钮的DisabledPicture属性没有装入图片31102 如果命令按钮的Caption属性包含（A）,则按下Alt+C可激活该按钮。A&CB$CC#CD@C31103 设置命令按钮的（A）属性为True,可使按下Esc键时执行该按钮的单击事件过程。ACancelBEnabledCValueDDefault31104设置命令按钮的（B）属性，可使指针指向该按钮时显示提示内容。ACaptionBToolTipTextCFontDTag31105下列（C）方法不能触发命令按钮的Click事件。A在程序运行时单击命令按钮B在代码中设命令按钮的Value属性为TrueC在设计时设命令按钮的Default属性为True,运行时按键D使用Tab键把焦点移到按钮上，然后按空格键或回车键31106 下列叙述中，错误的是（D）0A单击命令按钮可触发MouseDown事件B单击命令按钮可触发MouseUp事件C命令按钮支持单击事件D命令按钮支持双击事件31107 窗体上有命令按钮OK,它的单击事件过程为CmdOK_Click（）,则该按钮的Name和Caption属性分别为（C）。AOK,CmdBCmd,OKCCmdOK,OKDOK,CmdOK

31108执行（B）语句，可使窗口的按钮Command1上显示“确定”。ACommand1.Show="确定"BCommand1.Caption="确定"CCommand1.Name="确定"DCommand1.Visible="确定"31109 命令按钮不能响应（A）事件。ADblClick BDragDropCKeyPress DMouseMove31110 在窗体上新建一个命令按钮，其Index属性的默认值为（C）。A0B1C无D任意值31111 设置命令按钮的（C）属性，可以使鼠标停在命令按钮上时显示提示信息。AWhatsThisHelpIDBHelpTextCToolTipTextDTipText31112应通过（D）属性装入命令按钮处于非激活状态时显示的图片。APictureBDragiconCDownPictureDDisabledPicture31113 下列语句（）可以使命令按钮Commandl处于禁止状态。AACommand1.Enabled=FalseBCommand1.Disabled=FalseCCommand1.Enabled=TrueDCommand1.Disabled=True31114应通过（）属性装入命令按钮处于激活状态时显示的图片。AAPictureBEnabledPicture

APictureBEnabledPictureCDownPictureDDisabledPictureCDownPictureDDisabledPicture31115下列语句（）可以设置命令按钮Command1的标题为“黑体”。DACommand1.Caption.Name="黑体"BCommand1.Font="黑体"CCommand1.Font.FontName="黑体"DCommand1.FontName="黑体"31116若要设置图形方式的命令按钮，必须（A）oA先设置Style属性，后设置Picture属性B先设置Picture属性，后设置Style属性C先设置Visible属性，后设置Caption属性D先设置Enabled属性，后设置Picture属性31117在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommandl_Click（）Move500,500EndSub程序运行后，单击命令按纽，执行的操作为（C）0A窗体向左、上方向各移动500B命令按纽向左、上方向各移动500C窗体移动到距屏幕左边界、上边界各500的位置D命令按纽移动到距窗体左边界、上边界各500的位置31118 要设计一个图形方式的命令按钮，且按钮被按下与不按下时显示不同的图像，可通过对（D）属性进行设置。APicture、DisabledPictureBPicture>DownPictureCStyle>Picture和DisabledPictureDStyle>Picture和DownPicture31119 当命令按钮控件Commandl的Enabled属性被设为False时，该控件(C)。A不可见，不能响应事件B变为灰色，但能响应事件C变为灰色，不能响应事件D可见并且能响应事件31120设置命令按钮的(C)属性为True,可在按下Esc键时执行该按钮的单击事件过程。A)EnabledB)ValueC)CancelD)Default31121窗体上有命令按钮“OK”，它的单击事件过程为CmdOK_Click(B),则该按钮的Caption和Name属性分别为(B)。A)OK,CmdB)OK,CmdOKC)CmdOK,OKD)Cmd,OK31201引用列表框Listl最后一项数据应使用(B)oA Listl.List (ListCount-1)B Listl.List (Listl.ListCount-1)C Listl.List (ListCount)D Listl.List (Listl.ListCount)31202下列(C)控件结合了文本框和列表框的特性。A图片框B图像框C组合框D标签31203 将列表框的MultiSelect属性设置为(D)后，可用Shift或Ctrl键配合鼠标在列表框中进行多项选择。A无B0C1D231204引用列表框Listl被选中项数据应使用（D）0AListl.list BListl.listCountCListl.IndexDListl.Text31205使用（D）语句将"北京奥运"添加到列表框Listl的首项。AList1.Text="北京奥运"BListl.Additem"北京奥运"CListl.List（0）=、北京奥运"DListl.Additem"北京奥运”,031206使用（D）方法可以只删除列表框指定项目。ACisBClearCRemoveDRemoveitem31207用（D）方法可将项目添加到组合框中。AListBListlndexCAddDAdditem31208 能输出组合框Combol中现有项目数的语句是（C）。APrintCombo1.ListindexBPrintCombo1.IndexCPrintCombo1.ListCountDPrintCombo1.Count31209使用（C）语句可将组合框Combol的第3项置为当前项。ACombol.Listindex=3BCombo1.Index=3CCombo1.Listindex=2DCombo1.Index=231210使用(B)方法可以一次性删除列表框中全部项目。ACisBClearCRemoveDRemoveitem31211 要将字符串数组a中所有学生姓名按数组下标顺序追加到列表框Listl中，可以使用的程序段为(C)oAListl.AdditemaBFori=0ToUBound⑶-1Listl.Additema(i),0NextiCFori=0ToUBound(a)-1Listl.Additema(i)NextiDFori=0ToUBound(a)-1Listl.List(i)=a(i)Nexti31212 要删除列表框Listl中选定的某一项，可以使用的程序段为(A)oAListl.Removeitem(Listl.Listindex)BListl.RemoveitemList1.Columns(List1.Listindex)CList1.ClearList1.ListindexDListl.ClearList1.Columns(List1.Listindex)31213将列表框的MultiSelect属性设置为()后，可以使用鼠标进行多项选择,但无法结合Shift或Ctrl键同时进行。CA无B0C1 D231214使用（）语句可将列表框Listl的第3项的值置为“Basic"。DAListl.ListIndex(3)="Basic"BListl.ListIndex(2)="Basic"CListl.List(3)="Basic"DListl.List(2)="Basic"31215设置列表框的()属性可以使每个列表项前面出现一个复选框。AAStyle BSortedCMultiSelect DListCheck31216使用(C)语句可将组合框Combol的第1项置为当前项。ACombol.Listindex=1BCombol.Index=1CCombo1.Listindex=0DCombo1.Index=031217使用(D)语句可将列表框Listl的第3项的值置为“VB6.0”。AListl.ListIndex(3)="VB6.0"BListl.ListIndex(2)="VB6.0"CListl.List(3)="VB6.0"DListl.List(2)="VB6.0"31218 设有两个列表框控件Listl和List2,下列代码段的功能是(C)。Fori=0ToListl.ListCount-1List2.List(i)=Listl.List(i)NextiA将Listl的所有列表项追加到List2中B将Listl的所有列表项插入到List2的前部C用Listl的所有列表项覆盖List2中对应位置的列表项D用Listl取代List231219 假设列表框控件Listl被设置为允许多重选择，那么可以返回所选列表项数目的属性是(A)oASelCountBListCountCDataCount DCount31220使用(D)语句将"06足球世界杯"添加到列表框Listl的首项。AListl.Text="06足球世界杯"BListl.Additem"06足球世界杯"CListl.List(0)="06足球世界杯"DListl.Additem"06足球世界杯",031221设组合框Combol中有5个选项，下列能删除最后一项的语句是(D)。Combol.RemoveitemTextCombo1.RemoveitemCombol.ListcountCombo1.Removeitem5Combol.Removeitem431222若列表框Listl中有5个选项，下列(A)语句可以把选项"VisualBasic"添加到列表框的最后一项。Listl.Additem"VisualBasic",Listl.ListCountListl.Additem"VisualBasic",Listl.ListCount-1Listl.Additem"VisualBasic",4Listl.Additem4,"VisualBasic"31301 计时器控件以一定时间间隔触发（D）事件。AEnabledBIntervalCTimer1DTimer31302将框架的（A）属性设为False,可使框架内的所有对象在运行时均不可操作。AEnabledBVisibleCBorderSytleDClipControls31303 拖动滚动条中的滑块将触发滚动条的（B）事件。ASlideBScrollCDragOverDDragDrop31304下列叙述错误的是（D）oA计时器的Enabled属性为False,会暂停计时器的计时操作B运行时计时器不可见，所以其位置和大小无关紧要C触发计时器Timer事件的时间间隔可人为设定D计时器的Interval属性以秘为单位31305用（A）分隔同一窗体中的多组单选按钮，使它们互不干扰。A框架B组合框C复选框D列表框31306 单击滚动条两端的箭头可触发滚动条的（A）事件。AChangeBScrollCDragOverDItemCheck31307设置（D）属性可改变单击滚动条两端箭头时的滚动步长。AMaxBMinCLargeChangeDSmallChange31308将框架的（B）属性设为False,可使框架内的所有对象在运行时均不可见。AEnabledBVisibleCBorderSytleDClipControls31309 计时器控件能正常工作应具备的两个条件是（C）oAEnabled属性为True和Interval属性为0BEnabled属性为False和Interval属性为0CEnabled属性为True和Interval属性非0DEnabled属性为False和Interval属性非031310 述中，错误的是（D）oATimer是计时器的唯一事件BTimer事件的时间间隔可人为设定C计时器的Enabled属性为False,会暂停其计时操作D通过适当的设置，运行时计时器可以显示在窗体上31311计时器控件Timerl的Interval属性为2000,执行如下事件过程:PrivateSubTimerl_Timer（）Dimi%staticj%Fori=1To6j=j+2NextiEndSub运行后5秒时，j的值为（C）。A0B12C24D以上都不是31312 下列叙述中，正确的是（C）oA框架不响应任何事件BCaption是框架的唯一属性CTimer是计时器的唯一事件D计时器的Interval属性以秒为单位31313 计时器控件的（）属性可以控制Timer事件发生的时间间隔。BAEnabledBIntervalCTimerSetDTimer31314 下列关于框架及其内部放置的命令按钮的叙述，错误的是（）。DA命令按钮跟随框架一起移动B如果框架被禁止，则命令按钮也被禁止C如果框架不可见，则命令按钮也不可见D单击框架时，框架和命令按钮的Click事件同时被激发31315设置（）属性可改变单击滚动条空白处时的滚动步长。CAMaxBMinCLargeChangeDSmallChange31316可以触发滚动条的Scroll事件的操作是（C）。A单击滚动条空白处B单击滚动条两端的箭头C拖动滚动条的滑块 D单击滚动条的滑块31317 下列程序片断中，可以使计时器控件Timerl每隔2秒触发一次的是（D）。ATimerl.Interval=200BTimerl.Interval=2000CTimerl.Enabled=True:Timerl.Interval=200DTimerl.Enabled=True:Timerl.Interval=200031318 假设时钟控件的Interval属性为500,Enabled属性为True,并且有下面的事件过程，程序运行10秒后变量x的值为（B）。DimxAsIntegerPrivateSubTimerl_Timer（）x=x+10EndSubA）10000B）200C）5000D）以上都不对31319下列叙述错误的是（A）。A）计时器的Interval属性值以型为单位B）将计时器的Enabled属性设置为False,会暂停计时器的操作C）计时器以一定的时间间隔触发Timer事件D）程序运行时计时器不可见，所以其位置无关紧要31401使用（A）方法将焦点移到某个控件上。ASetFocusBGotFocusCMoveDRefresh31402文本框获得焦点时，能触发KeyPress事件的操作是（C）oA选定文本框中内容B双击文本框C按下键盘上的某个键D单击文本框31403下列叙述中，错误的是（A）oA历:说物空存均支持Tab顺序B可以在设计阶段改变Tab顺序C可以在运行阶段改变Tab顺序D可以设置相应的属性使Tab顺序不起作用31404下列叙述中，正确的是（D）oA不同控件的Tabindex属性可以相同B同一窗体中不同控件的Tabindex属性值可以任意设置C窗体、命令按钮、标签和文本框控件都有Tabindex属性D窗体上控件的Tabindex属性值必须小于该窗体的控件个数31405对文本框Textl编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimbAsStringb=Chr(KeyAscii)KeyAscii=Asc(UCase(b))EndSub运行时，下列叙述正确的是(C)oATextl中无法输入字符BTextl中内容为"b"CTextl中输入的字符都变为大写DTextl中输入的字符都被转换成ASCII码31406下列叙述错误的是(D)。A在KeyDown事件中，键盘上输入的A或a被视作相同的字母B在KeyUp事件中，键盘上的"1"和右侧小键盘上的,T,视作不同的数字C只有获得焦点的对象才能够接受键盘事件DKeyPress事件中可以识别键盘上某个键的按下与释放31407 下列叙述错误的是(A)oA如果文本框的TabStop属性为False,则不能接收从键盘上输入的数据B文本框的Enabled属性为False时，其Tab顺序不起作用C文本框失去焦点时，触发LostFocus事件D可以用Tabindex属性改变Tab顺序31408 设置控件的(C)属性为False,使该控件不能通过Tab键得到焦点。AGotFocusBSetFocusCTabStopDTabindex31409 要使用自定义的鼠标指针，必须将MousePointer属性设置为(D)。AOB15C3D9931410 编写如下两个事件过程：PrivateSubForm_KeyPress(KeyAsciiAsInteger)PrintChr(KeyAscii)EndSubPrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSub运行时，在不按住Shift键和没有锁定大写情况下，按"A"键，程序的输出是(A)。AAaBaACAADaa31411 运行时单击窗体，以下事件发生的次序是(B)0AMouseDown、Click、MouseUpBMouseDown、MouseUp>ClickCClick^MouseDown、MouseUpD随机发生31412 编写如下事件过程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_XAsSingle,YAsSingle)IfShift=3AndButton=2ThenPrint"VisualBasic"EndIfEndSub运行时，为了在窗体上输出"VisualBasic",应执行的操作为（D）。A按下Shift键和鼠标左键B同时按下Shift、Alt键和鼠标左键C按下Alt键和鼠标右键D同时按下Shift.Ctrl键和鼠标右键31413 当控件失去焦点时，触发的事件是（）0CAGotFocusBSetFocusCLostFocusDMoveFocus31414当文本框的TabStop属性设为False时，下列叙述正确的是（）。DA该文本框无法获得焦点B无法在该文本框中输入文本C焦点将始终停留在该文本框上D该文本框无法通过使用Tab键获得焦点31415使用（）语句可使窗体的鼠标指针呈现“沙漏”型。DAMe.MousePointer=vbArrowBMe.MousePointer=vbCustomCMe.MousePointer=vbCrossDMe.MousePointer=vbHourgla