VB考试题库-二级习题(含答案)

1VB考试一1、能够获得一个文本框中被选取文本的内容的属性是______。A：SelStartB：SelLengthC：SelTextD：Text参考答案：C2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。A：Text1.Enabled=FalseB：Text1.HideC：Text1.ClearD：Text1.Visible=False参考答案：D3、对于语句Ifx=1Theny=1,下列说法正确的是____。A：x=1和y=1均为赋值语句B：x=1和y=1均为关系表达式C：x=1为赋值语句，y=1为关系表达式D：x=1为关系表达式，y=1为赋值语句参考答案：D4、以下变量名中，______是不符合VisualBasic的命名规范的。A：_mnu_Open_234B：Abc901C：price_D：K参考答案：A5、MsgBox函数返回值的类型是__________。A：数值或字符串B：字符串C：变体D：整型数值参考答案：D6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。A：进入中断模式B：进入运行模式C：进入设计模式D：不用进入任何模式参考答案：A7、设a=6，则执行x=IIF(a5,-1,0)后，x的值为______。A：-1B：6C：0D：5参考答案：A8、可以同时删除字符前导和尾部空白的函数是______。A：MidB：RtrimC：TrimD：Ltrim参考答案：C9、以下语句的输出结果是______。PrintFormat$(32548.5,000,000.00)2A：32,548.5B：32548.5C：032,548.50D：32,548.50参考答案：C10、设有如下声明：DimXAsInteger如果Sgn(X)的值为-1，则X的值是______。A：等于0的整数B：大于0的整数C：整数D：小于0的整数参考答案：D11、在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Fori=1To4x=4Forj=1To3x=3Fork=1To2x=x+6NextkNextjNextiPrintxEndSub程序运行后，单击命令按钮，输出结果是______。参考答案：15#15#15#1512、执行下面的程序段后，S的值为______。s=5Fori=2.6To4.9Step0.6s=s+1Nexti参考答案：913、下列表达式有错误,正确的写法应该是______。[(a+b)+c]/80-5÷(d+e)参考答案：(a+b+c)/80-5/(d+e)#（a+b+c）/80-5/（d+e）14、表示x是5的倍数或是9的倍数的逻辑表达式为__________参考答案：xMod5=0OrxMod9=0#xMod9=0OrxMod5=015、以下程序的功能是:从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。3PrivateSubForm_click()Dimx,yAsSingleDimzAsIntegerx=InputBox(Enterascore)Dowhilex=0y=y+xz=z+1x=InputBox(Enterascore)LoopIfz=0Thenz=1EndIfy=______PrintyEndSub参考答案：y/zVB考试二1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。A：ListIndexB：ListCountC：CountD：Index参考答案：B2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A：PrivateSubList1_Click()Label1.Caption=List1.TextEndSubB：PrivateSubList1_Click()Label1.Name=List1.ListIndexEndSubC：PrivateSubList1_Click()Label1.Name=List1.TextEndSubD：PrivateSubList1_Click()Label1.Caption=List1.ListIndexEndSub参考答案：A3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示______。A：ListindexB：IndexC：ListD：Tabindex参考答案：A44、为了清除列表框中的所有内容，应使用的方法是：______。A：ClearB：RemoveC：RemoveItemD：Cls参考答案：A5、在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为______。A：Fori=1ToList1.ListCount……NEXTB：Fori=0ToList1.Count-1……NEXTC：Fori=0ToList1.ListCount-1……NEXTD：Fori=1ToList1.Count……NEXT参考答案：C6、设有如下程序：OptionBase0PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3,4,5,6,7,8,9)Fori=0To3Printa(5-i);NextEndSub程序运行后，单击窗体，则在窗体上显示的是______。A：6543B：5432C：4321D：7654参考答案：A7、设执行以下程序段时依次输入1、3、5，执行结果为______。Dima(4)AsInteger,b(4)AsIntegerForK=0To2a(K+1)=Val(InputBox(请输入数据))b(3-K)=a(K+1)NextKPrintb(K)A：0B：3C：5D：1参考答案：D58、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDima(10,10)AsIntegerFori=1To3Forj=1To3a(i,j)=(i-1)*3+jPrinta(i,j);NextjPrintNextiEndSub程序运行后，单击命令按钮，窗体上显示的是______。A：123456789B：234345456C：147258369D：123246369参考答案：A9、用下面的语句所定义的数组的元素个数是：______。Dimarr(3To5,-2to2)A：24B：12C：15D：20参考答案：C10、下列______语句可以为动态数组分配实际元素个数。A：static语句B：Dim语句C：public语句D：ReDim语句参考答案：D11、假定程序中有以下语句：answer=MsgBox(String1,,String2,String3,2)执行该语句后，将显示一个信息框，此时如果单击确定按钮，则answer的值为：______。A：String3B：String2C：String1D：1参考答案：D612、设有语句x=InputBox(输入数值,0,示例)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是______。A：0是默认值B：变量X的值是字符串10C：在InputBox对话框标题栏中显示的是示例D：变量X的值是数值10参考答案：B13、以下程序段运行的结果是：______。Dima(-1To5)AsBooleanDimflagAsBooleanflag=FalseDimiAsIntegerDimjAsIntegerDoUntilflag=TrueFori=-1To5j=j+1Ifa(i)=FalseThena(i)=TrueExitForEndIfIfi=5Thenflag=TrueEndIfNextLoopPrintjA：20B：7C：8D：35参考答案：D14、设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为：______。x=IIF((ab)And(cd),10,20)A：300B：20C：30D：10参考答案：B15、要将一个组合框设置为简单组合框（SimpleCombo），则应将其Style属性设置为______。A：0B：1C：3D：2参考答案：BVB考试三1、设组合框Combo1中有3个项目，则以下能删除最后一项的语句是______。7A：Combo1.RemoveItemCombo1.ListcountB：Combo1.RemoveItem2C：Combo1.RemoveItem3D：Combo1.RemoveItemText参考答案：B题分：62、在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：FunctionFunc(ByValxAsInteger,yAsInteger)y=x*yIfy0ThenFunc=xElseFunc=yEndIfEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=3b=4c=Func(a,b)Printa=;aPrintb=;bPrintc=;cEndSub程序运行后，单击命令按钮，其输出结果为：______。A：a=3b=4c=12B：a=13b=12c=12C：a=3b=4c=3D：a=3b=12c=3参考答案：D题分：63、单击命令按钮时，下列程序代码的执行结果为______。PublicSubProcl(nAsInteger,ByValmAsInteger)n=nMod10m=m/108EndSubPrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=12:y=34CallProcl(x,y)Printx;yEndSubA：123B：23C：1234D：234参考答案：D题分：64、以下关于函数过程的叙述中，正确的是______。A：在函数过程中，过程的返回值可以有多个B：函数过程形参的类型与函数返回值的类型没有关系C：当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D：如果不指明函数过程参数的类型，则该参数没有数据类型参考答案：B题分：65、以下说法错误的是______。A：函数过程可以带参数B：子过程没有返回值C：函数过程没有返回值D：子过程可以带参数参考答案：C题分：66、在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：PrivateSubCommand1_Click()DimbAsIntegerb=b+1EndSub运行程序，三次单击命令按钮后，变量b的值是：______。A：2B：1C：0D：3参考答案：B题分：67、假定有以下函数过程：FunctionFun(SAsString)AsStringDims1AsStringFori=1ToLen(S)s1=UCase(Mid(S,i,1))+s1NextiFun=s1EndFunction在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimStr1AsString,Str2AsString9Str1=InputBox(请输入一个字符串)Str2=Fun(Str1)PrintStr2EndSub程序运行后，单击命令按钮，如果在输入对话框中输入字符串abcdefg则单击确定按钮后在窗体上的输出结果为______。A：GFEDCBAB：ABCEDFGC：gfedcbaD：abcdefg参考答案：A题分：68、Sub过程与Function过程最根本的区别是______。A：两种过程参数的传递方式不同B：Function过程可以有参数，Sub过程不可以C：Sub过程可以使用Call语句或直接使用过程名调用，而