VB开发基础(习题卷9)

试卷科目：VB开发基础VB开发基础(习题卷9)PAGE"pagenumber"pagenumber/SECTIONPAGES"numberofpages"numberofpagesVB开发基础第1部分：单项选择题，共232题，每题只有一个正确答案,多选或少选均不得分。[单选题]1.rnd函数，数值不可能为下列（）值A)0.1234B)0.0005C)1[单选题]2.设a=10，b=5，c=1，执行语句Printa>b>c后，窗体上显示的是()。A)TruB)FalsC)出错信息[单选题]3.对于窗体Form1，执行了Form1.Top=Form1.Top-1100语句后，该窗体将___。A)上移B)下移C)左移D)右移[单选题]4.下列程序：PrivateSubTextl_Change()PrintTextl；EndSub当在文本框输入"1234"这4个字符时，窗体上显示的是A)1234B)1234C)1121231234D)1121231234[单选题]5.有如下函数过程:Functiongys(ByValXASInteger,ByValyASInteger)ASIntegerDOWhiley<>0preminder=x/yx=yy=preminderLoopgys=xEndFunction以下是调用该函数的事件过程,该程序的运行结果是().PrivateSubCommand1_Click()DimaASIntegerDimbASIntegera=10b=2x=gys(a,b)PrintxEndSubA)0B)25C)5D)100[单选题]6.语句5\4Mod6/5*2的输出结果是()。A)1B)2C)3D)0[单选题]7.设a=5,b=6,c=7,d=8，执行语句X=Ilf（（a＞b）And（c＞d）,10,20）后，x的值是______。A)10B)20C)30D)200[单选题]8.若使用Textbox控件时,为对用户输入内容进行立即检查,应对Textbox控件的哪个事件编程_____.A)ChangeB)IntervalC)LeftD)Top[单选题]9.能正确表达a≤1或a≥5的逻辑表达式是().A)a<=1或a>=5B)a<=1,a>=5C)a<=1D)a<=l[单选题]10.下面是()合法的字符常数.A)ABC$B)"ABC"C)'ABC'D)ABC[单选题]11.时钟控件只响应()事件。A)TimerB)IntervalC)ClickD)Enable[单选题]12.设S="中华人民共和国"，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为()A)"中华民国B)"中国人民"C)"中共人民"D)"人民共和"[单选题]13.PrivateSubForm_Click()A$="123"C=Val(a$)+"123"PrintcEndSub的值是0.A)246B)123C)"123"D)错误[单选题]14.要得到组合框内用户选择的内容,需要使用__属性A)CaptionB)ListC)StyleD)Text[单选题]15.1个二维数组可以存放1个矩形.在程序开始有语句OptionBase0,则下面定义的数组中正好可以存放1个4*3矩阵(即只有12个元素)的是_____.A)Dima(-2To0,2)AsIntegerB)Dima(3,2)AsIntegerC)Dima(4,3)AsIntegerD)Dima(-1To-4,-1To-3)AsInteger[单选题]16.窗体上有一个按钮和一个列表框(Sorted属性为True),执行下列过程后的输出结果为().PrivateSubCommand1_Click()List1.AddItem"China"List1.AddItem"Great"List1.AddItem"Is",1List1.AddItem"!",3PrintList1.List(2)EndSubA)ChinaB)GreatC)IsD)1[单选题]17.工程文件的扩展名是______。A)vbgB)vbpC)vbwD)vbl[单选题]18.运行以下语句，为在窗体上输出"Hello"，应在窗体上执行___操作。A)按下鼠标左键B)按下鼠标右键C)按下鼠标滚轮D)同时按下Ctrl键和鼠标右键[单选题]19.语句Dima&(1T020),bA)一维单精度实型数组和二维双精度型数组B)一维整型数组和二维单精度实型数组C)一维单精度实型数组和二维整型数组D)一维长整型数组和二维双精度数组[单选题]20.设变量MyName(字符串型),Age(整型)分别表示一个人的姓名和年龄,要设计一个逻辑表达式,当该人姓张,并且超过60岁,则表达式的值为True,下面正确的是______。()A)Right(MyName,1)="张"AndAge>60B)Left(MyName,Len("张"))="张"AndAge>60C)Left(MyName,Len("张"))="张"OrAge>60D)MyName="张"AndAge>60[单选题]21.当输入4时,以下程序的输出结果是().PrivateSubCommand1_Click()x=InputBox(x)Ifx^2<15Theny=1/xIfx^2>15Theny=x^2+1PrintyEndSubA)4B)17C)18D)25[单选题]22.要设置定时器的时间间隔可以通过_______属性来实现。A)ValueB)TextC)InterValD)Max[单选题]23.为了给x，y，z三个变量赋初值1，正确的赋值语句是____。A)x=1:y=1:z=1B)x=1,y=1,z=1C)y=x+30D)3y=x+1[单选题]24.数组声明语句Dima(2to3,-2to2,3to5)中，数组a包含元素的个数为()。A)120B)75C)30D)13[单选题]25.窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1(1).FontSize=Text1(0).FontSize*2Text1(1).Text=Text1(0).TextCase1Text1(0).FontSize=Text1(1).FontSize/2Text1(0).Text=Text1(1).TextCaseElseMsgBox"执行Else分支"EndSelectEndSub关于上述程序,以下叙述中错误的是()。A)Index用于标识数组元素B)本程序中CaseElse分支的语句永远不会被执行C)向任何一个文本框输入字符,都会在另一个文本框中显示该字符D)下标为0的文本框中显示的字符尺寸将越来越小[单选题]26.3>8-3OR10+2<=3*4AND5=2+3的结果是().A)TrueB)FalseC)-3D)10[单选题]27.要获得计算机当前屏幕的分辨率,可以使用()系统对象。A)AppB)ScreenC)PrinterD)Mouse[单选题]28.在代码中，定义了一个子过程：SubP(a,b)…EndSub下面调用该过程的格式正确的___________。A)P()B)P10,20,30C)P10D)P10,20[单选题]29.滚动条不具有____事件。A)ClickB)ChangeC)ScrollD)GotFocus[单选题]30.下列控件中,没有Caption属性的是______.A)框架B)列表框C)复选框D)按钮[单选题]31.引用列表框（List1）最后一个数据项应使用的表达式是()A)List1.List(List1.ListCount)B)List1.List(ListCount)C)List1.List(List1.ListCount-1)D)List1.List(ListCount-1)[单选题]32.编写如下事件过程和函数过程:PrivateFunctionp2(ByValnAsInteger,number()AsSingle)AsIntegerp2=number(1)Forj=2TonIfnumber(j)<p2Thenp2=number(j)NextEndFunctionPrivateSubForm_Click()Dimnum(1To6)AsSinglenum(1)=103:num(2)=190:num(3)=0num(4)=32:num(5)=-56:num(6)=100Printp2(6,num())EndSub程序运行后窗体上显示的值是_____.A)-56B)0C)103D)190[单选题]33.表达式Val("21mn")的值为()。A)1B)21C)21mnD)Mn[单选题]34.在下列的属性中,不属于列表框的是().A)clsB)ListCountC)TextD)Listlndex[单选题]35.下列程序运行后,其结果为______.PrivateSubForm_Click()Filename="c:\testfile.txt"OpenfilenameForOutputAs#1Print#1,"ABCD我是一个学生"Close#1OpenfilenameForInputAs#1MsgBoxInput(8,1)Close#1EndSubA)在通用对话框中显示"ABCD我是一个"B)在通用对话框中显示"ABCD我是"C)在窗体中显示"ABCD我是一个"D)在窗体中显示"ABCD我是"[单选题]36.设a="VisualBasic",下面使b="Basic?的语句是0.A)b=Left(a,8,12)B)b=Mid(a,7.5)C)b=Right(a,5,5)D)b=Left(a,8,5)[单选题]37.假定窗体的名称为Form1,则把窗体的标题设置为?VB_Test?的语句为()。A)Form1=?VB_TestB)Form1.Caption=?VB_Test?C)Form1.Text=?VB_TestD)F=?VB_Test?[单选题]38.假设在图片框Pictrue1中装入一个图形,为了清除该图形(不删除图片框),应采用的正确方法是:A)选择图片框,然后按Delete键.B)执行语句Pictrue1.Pictrue=LoadPictrue("")C)执行语句Pictrue1.Pictrue=""D)选择图片框,在属性窗口选择Pictrue1属性,然后安回车键[单选题]39.下面程序PrivateSubForm_Click()score=Int(Rnd*10)+80SelectCasescoreCaseIsA)AB)BC)CD)D[单选题]40.表达式a+b=c+d是____。A)赋值表达式B)字符表达式C)算术表达式D)关系表达式[单选题]41.以下叙述正确的是()。A)窗体的Name属性指定窗体的名称，用来标识一个窗体B)窗体的Name属性的值是显示在窗体标题栏中文本C)可以在运行期间改变对象的Name属性的值D)对象的Name属性值可以为空[单选题]42.当一个窗体被卸载时,最后引发的一个事件是.A)DeactivateB)QueryUnloadC)UnloadD)terminate[单选题]43.在使用InputBox时，必须设置的参数是________。A)无B)提示C)标题D)缺省[单选题]44.下列选项中____不是VisualBasic常量。A)"GoodLuck"B)PIC)1.5E-03D)16.3412[单选题]45.下列选项中,属于VisualBasic6.0程序设计方法的是().A)面向对象、顺序驱动B)面向对象、事件驱动C)面向过程、事件驱动D)面向过程、顺序驱动[单选题]46.确定字符串str2在字符串str1中起始位置的函数是_________。A)Mid()B)String()C)Left()D)Instr()[单选题]47.下列关于设置控件属性的叙述正确的是().A)用户必须设置属性值B)所有的属性值都可以由用户随意设定C)属性值不必一一重新设置D)不同控件的属性项都完全一样[单选题]48.在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:PrivateSubCommand1_Click()Fora=1To5Y=1Forb=1To10ForC=1To6X=X+1Y=y+1NextCNextbNextaText.Text=yEndSub程序运行后,单击命令按钮,文本框中的值为0.A)(A)61B)(B)60C)(C)36D)(D)6[单选题]49.用来设置文字字体是否斜体的属性是：A)FonUnderlineB)FontBoldC)FontslopeD)FontItalic[单选题]50.有如下程序:DimaAsString,bAsStringa=12345h="abcde"Fori=1To5c=c+Left(a,i)+Right(b,i)NextiPrintc运行后输出的结果是().A)alb2c3d4e5B)1a2b3c4de5C)eld2c4b5eld2c3b4a5D)1e12del23cdel234bcdel2345abcde[单选题]51.下面程序段输出的结果是().PrivateSubCommand1_Click()x=8Fori=0To20Step5x=x+iNextPrint"X=";xEndSubA)X=210B)X=218C)X=50D)X=58[单选题]52.\、/、Mod、*等4个算术运算符中,优先级最低的是().A)\B)/C)ModD)*[单选题]53.假定一个工程由两个窗体文件Form1及Form2和一个标准模块文件Model1组成.Model1代码如下:PublicxAsIntegerPublicyAsIntegerPublicSubS1()x=1S2EndSubSubS2()y=10Form1.ShowEndShowForm2的Load事件过程如下:PrivateSubForm_Load()S1EndSub其中Form2被设置为启动窗体.程序运行后,各模块的执行顺序是A)Form1->Form2->Model1B)Form2->Form1->Model1C)Form1->Model1->Form2D)Form2->Model1->Form1[单选题]54.下列对象中没有焦点属性的是().A)命令按钮控件B)窗口控件C)文本框控件D)框控件[单选题]55.VisualBasic程序设计语言中，响应对象的外部动作称为_________，而对象可以执行的动作或对象本身的行为则称为________。A)属性，方法B)过程，事件C)方法，事件D)事件，方法[单选题]56.面向对象的程序设计方法中,对象间的通信是靠()来传递的A)类B)实例C)继承D)消息[单选题]57.表达式Int（8*sqr(36*（10^(-2)）*10+0.5））/10的值是A)0.48B)0.048C)0.05D)0.5[单选题]58.有如下程序:infocase$=InputBox("Inputoneletter:")SelectCaseinfocaseSCase?a"grades=?Verygood"Case"b?grade$="good"Case"C"grade$="OK"Case"d?grade$="Qualified"CaseElsegrade$="Bad"EndSelectPrintgrades运行时从键盘上输入英文小写字母d后,输出的结果是0.A)VerygoodB)GoodC)BadD)Qualified[单选题]59.用户释放键盘上任意一个键时，被触发的事件是_______。A)KeyPressB)KeyDownC)KeyUpD)Key[单选题]60.要强制显式声明变量,可在窗体模块或标准模块的通用声明段中加入语句()A)OptionBaseB)OptionExplicitC)OptionBase1D)OptionCompare[单选题]61.启动VisualBasic后,系统为用户新建的工程起一个名为()的临时名称.A)工程1B)窗体1C)工程D)窗体[单选题]62.下面所列中，正确的数组声明语句是__________。A)Dima[3,3]asIntegerB)Dima(3)(3)asIntegerC)Dima(3,3)asIntegerD)Dima[n,n]asInteger[单选题]63.在VB中过()属性来设置字体颜色.A)FontColorB)ForeColorC)BackColorD)ShowColor[单选题]64.可以用作其它控件容器的控件有().A)窗体控件,列表控件,图像控件B)窗体控件,文本框控件,框架控件C)窗体控件,框架控件,图片框控件D)窗体控件,标签控件,图片控件[单选题]65.常用控件的Style属性值是().A)字符常量B)逻辑常量C)数值常量D)日期常量[单选题]66.要使文本框获得输入焦点，则应采用文本框控件的哪个方法()。A)GotFocuB)LostFocusC)KeyPresD)SetFocus[单选题]67.下面程序段的执行结果为。DimM(10),N(10)I=3Fort=1to5M(t)=tN(i)=2*i+tNexttPrintN(i);M(i)()A)311B)315C)113D)153[单选题]68.下面关系表达式的值为真的是().A)"A">"a"B)"9">"a"C)"That">"Thank"D)12>12.1[单选题]69.下面()是不合法的单精度常数。A)100!B)100.0C)1E+2D)100.0D+2[单选题]70.可以在窗体模块的通用声明段中声明().A)全局变量B)全局常量C)全局数组D)全局用户自定义类型[单选题]71.要从磁盘上读入一个文件名为"c:\t1.txt?的顺序文件,如下语句中正确的A)F="c:\t1.txt"OpenFForInputAs#1B)F="c:\t1.txt"Open?F?ForInputAs#1C)Open"c:\t1.txt"ForOutputAs#1D)Openc:\t1.txtForInputAs#1[单选题]72.假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是()。A)数组中每个命令按钮的名称(Name属性)均为Command1B)若未做修改,数组中每个命令按钮的大小都一样C)数组中各个命令按钮使用同一个Click事件过程D)数组中每个命令按钮的Index属性值都相同[单选题]73.以下合法的一组VisualBasic用户标识符是A)Sum和8abcB)Const和DoWhileC)a#x和PiD)ForLoop和Total[单选题]74.产生N个空格组成的字符串的函数是()。A)Space$B)Ltrim$C)Rtrim$D)Spc$[单选题]75.对象.cls方法对______控件有效.A)窗体、图像框B)窗体、图片框C)屏幕、窗体D)图像框、图片框[单选题]76.使标签中的文本靠右显示,则应将其Alignment属性设置为_____.A)0B)1C)2D)3[单选题]77.阅读下面的程序段.Fori=1To3Forj=iTo3Fork=1To3a=a+iNextkNextjNexti执行上面的3重循环后,a的值为().A)30B)3C)9D)14[单选题]78.计算z的值,当x大于y时,z=x;否则z=y。下列语句错误的是()A)Ifx>=yThenz=x:z=y;B)Ifx>yThenz=xElsez=yC)z=y:Ifx>yThenz=xD)Ifx<=yThenz=yElsez=x[单选题]79.下列关于SelectCase的叙述中,错误的是()A)Case10To100表示判断Is是否介于10与100之间B)Case"abc","ABC"表示判断Is是否和"abc"、"ABC"两个字符中的一个相同C)Case"X"表示判断Is是否为大写字母XD)Case-7,0,100表示判断Is是否等于字符串"-7,0,100"[单选题]80.在窗体上画一个列表框,名称为List1,然后编写如下事件过程:()A)1,3,5B)2,4,6C)1,2,3D)4,5,6[单选题]81.有如下程序.DimaAsString,bAsStringa=12345h="abcde"Fori=1To5c=c+Left(a,i)+Right(b,i)NextiPrintc运行后输出的结果是().A)alb2c3d4e5B)1a2b3c4de5C)eld2c4b5eld2c3b4a5D)1e12del23cdel234bcdel2345abcde[单选题]82.重新定义动态数组，应使用____定义关键字。A)DimB)PrivateC)PublicD)ReDim[单选题]83.Print方法连续输出时，用()分隔多个表达式。A)空格B)逗号C)冒号D)分号[单选题]84.下述程序段运行时的显示结果为().x=3.54+10PrintLen(x)A)13B)14C)5D)非法使用,无输出[单选题]85.要在图片框P1中打印字符串"HowAreYou",应使用语句().A)Picture1.Print="HowAreYou"B)P1.Picture=LoadPicture("HowAreYou")C)P1.Print"HowAreYou"D)Print"HowAreYou"[单选题]86.下面程序段：ForI=3To1Step-1PrintSpc(5-i)；Forj=1To2*I-1Print"*"；NextjPrintNexti的运行结果为A)图1B)图2C)图3D)图4[单选题]87.inputBox函数返回值的类型为().A)数值B)字符串C)变体D)数值或字符串(视输入的数据而定)[单选题]88.可以接受焦点的控件是(0.A)FrameB)CommandC)LabelD)Timer[单选题]89.控件内的对齐方式()属性决定.A)AlignmentB)WordWrapC)AtuoSizeD)Style[单选题]90.确定一个窗体或控件大小的属性是().A)WidthB)WidthC)TopD)Top[单选题]91.以下属于合法的数组元素是().A)x8B)x[A]C)x(3)D)x{6}[单选题]92.设有数组声明语句:OptionBase0Dimb(-lTo10,2To9,20)AsInteger则数组B中共有()个元素.A)1800B)1848C)2016D)2310[单选题]93.表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是________。A)0.48B)0.048C)0.05D)0.5[单选题]94.下面的运算符中优先级最高的是()A)NotB)\C)<D)*[单选题]95.从字符串变量Cstr中取左边4个字符，应使用________。A)Left(Cstr，4)B)Left(Cstr，1，4)C)Mid(Cstr，3，4)D)Mid(Cstr，4，3)[单选题]96.下列哪个操作可以清除文本框对象Text1的内容()。A)Text1.Text=""B)Text1.clsC)Text＝""D)cls[单选题]97.下列数据类型中,占用内存最大的是().A)BooleanB)ByteC)IntegerD)Single[单选题]98.以下各表达式中,计算结果为0的是().A)INT(12.4)+INT(-12.6)B)CINT(12.4)+CINT(-12.6)C)FIX(13.6)+FIX(-12.6)D)FIX(12.4)+FIX(-12.6)[单选题]99.OPTIONEXPLICIT语句不可以放在().A)窗体模块的声明段中B)标准模块的声明段中C)类模块的声明段中D)任何事件过程中[单选题]100.下列表达式值为False的是___。A)"I"<"YOU"B)"YOU">"HE"C)"I">"HE"D)"3">"s"[单选题]101.以下不属于VisualBasic系统的文件类型是()。A)vbpB)frmC)basD)bmp[单选题]102.表达式10\8Mod9的值是_________。A)2B)1C)9D)0[单选题]103.删除字符串前导和尾随空格的函数是().A)Ltrim()B)Rtrim()C)Trim()D)Lcase[单选题]104.阅读程序:FunctionF(aAsInteger)b=0Staticcb=b+1c=c+2F=a+b+cEndFunctonPrivateSubCommand1_Click()DimaAsIntegera=2Fori=1to3PrintF(a);NextiEndSub运行上面的程序,单击命令按钮,输出结果为_____.A)456B)579C)468D)479[单选题]105.复选框或按钮的当前状态通过____属性来设置或访问。A)CaptionB)CheckedC)ValueD)Selected[单选题]106.下列程序执行后,n的值为().n=0ForI=1To100IfIMod4=0Thenn=n+1NextIA)5050B)25C)26D)33[单选题]107.为使图像框的大小自动适应图像的大小.则应()A)将其AutoSize属性值设置为TrueB)将其AutoSize属性值设置为FalseC)将其Stretch属性值设置为TrueD)将其Stretch属性值设置为False[单选题]108.要判断在文本框是否按了Enter键，应在文本框的()事件中判断。A)ChangeB)KeyDownC)ClickD)KeyPress[单选题]109.命令按钮的标题文字由()属性来设置。A)TextB)ValueC)CaptionD)Name[单选题]110.当一个对象(如窗体或图片框)被移动或改变大小之后,或当一个覆盖该窗体被移开之后,如果要保持该所画图形的完整性,可以选择触发()事件来完成图形的重画工作.A)PaintB)LoadC)ClickD)Active[单选题]111.VB6.0是一种面向（）的编程环境。A)过程B)机器C)应用D)对象[单选题]112.设有工程文件Proj,其中含有Form1窗体、Form2窗体、标准模块Module1.bas在Form1窗体模块的通用声明段中书写了如下语句PublicXAsInteger,在Form1窗体模块中还定义了通用过程LocalSub。则以下说法中正确的是______。()A)可以在整个Proj工程中的所有模块中使用变量XB)只能在窗体Form1和Form2中使用变量X,但不能在标准模块Module1中使用变量XC)在标准模块Module1中可以使用变量X,但在窗体Form2中不能使用变量XD)变量X的作用范围不包含Form1中的LocalSub[单选题]113.用一个程序段对一个对象被单击(或双击)做出响应,从而实现指定的操作,称为().A)可视化程序设计B)事件驱动编程机制C)过程化程序实际方法D)非过程化程序设计语言[单选题]114.OptionBase0下述程序的运行结果PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3,4,5,6,7,8,9)Fori=0To3Printa(5-i);NextEndSubA)4321B)5432C)6543D)7654[单选题]115.当拖动滚动块并松开鼠标后,将触发滚动条的____事件。A)ScrollB)GetfocusC)MoveD)Change[单选题]116.组合框控件是将()组合成一个控件.A)列表框控件和文本框控件B)标签控件和列表框控件C)标签控件和文本框控件D)复选框控件和选项按钮控件[单选题]117.在运行程序时,将焦点移至指定的控件或窗体,则需使用的方法是0.A)ChangeB)SetFocusC)GetFocusD)Move[单选题]118.下面选项中()是字符连接运算符.A)%B)ModC)&D)And[单选题]119.结构化程序设计的三种基本结构是____。A)输入、处理、输出B)树状、网状、环状C)顺序、分支、循环D)主调程序、子程序、过程[单选题]120.执行了下面的程序.PrivateSubForm_Click()Fori=1To6List1.AddItemiNextFori=1To3List1.RemoveItemiNextEndSub列表框中的数据项为().A)1.5,6B)2.4,6C)4.5,6D)1.3,5[单选题]121.执行指令"Line(1200,1200)-Step(1000,500),,B"后,CurrentX=().A)2200B)1200C)1000D)1700[单选题]122.数学表达式3≤X<10在VB中的逻辑表达式为__________。A)x>=3ORX<10B)3<=xAND<10C)3<=xANDx<10D)3<=x<10[单选题]123.运行时当用户在文本框中输入新的内容,或在程序代码中对文本框的Text属性进行赋值从而改变了文本框的Text属性时,将触发文本框的事件()A)ClickB)DblClickC)GotFocusD)Change[单选题]124.关于变量，下列说法正确的是____。A)变量必须先声明后使用B)变量名区分大小写C)执行a=b=1语句后，变量a，b的值均为1D)执行Dima,bAsInteger后，a为变体型，b为整型[单选题]125.以下各组数据类型中,满足占用存储空间从小到大排序的是0.A)Byte、Integer、DoubleB)Byte、Integer、Double、BooleanC)Boolean、Byte、Integer、LongD)Boolean、Byte、Integer、Double[单选题]126.保存一个工程至少应保存两个文件，这两个文件分别是()。A)文本文件和工程文B)窗体文件和工程文件C)窗体文件和标准模块文D)类模块文件和工程文件[单选题]127.终止应用程序的正确方法是()A)卸载窗体,然后执行End语句B)卸载窗体C)执行End语句D)执行Stop语句[单选题]128.当拖动滚动条的滚动块时,将触发滚动条的什么事件?A)MoveB)ChangeC)ClearD)Scroll[单选题]129.设a=5，执行x=IIf()后，x的值为____。A)5B)6C)0D)-1[单选题]130.如果文本框的Enabled属性被设置为False,则运行时().A)文本框中的文本将变成灰色,并且此时用户不能将光标置于文本框上B)文本框中的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容C)文本框中的文本将变成灰色,用户仍然能改变文本框中的内容D)文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容[单选题]131.执行以下语句后,输出的结果是.A="ABCDEF":B="22"MID(A,3,2)=BB=MID(A,2,3)PRINTBA)BCDB)A22C)B22D)CDE[单选题]132.循环语句FORK=1TO10STEP-1控制的循环次数为()。A)1B)10C)0D)11[单选题]133.用Scale方法不带参数时，则采取坐标系的形式是A)默认坐标系B)二维坐标系C)用户自定义坐标系D)标准坐标系[单选题]134.要使文本框可输人多行文字,要设置的默认选项是().A)ScrollBoars和MuhiLineB)MultiLineC)ScrollBoarsD)以上都不是[单选题]135.下列合法的VisualBasic数值变量是______。()A)?BianLiang?B)aBCD&C)S$D)2.5D-3[单选题]136.启动窗体在程序运行后,不进行任何操作的情况下会发生事件()A)Initialize和LoadB)ShowC)ActivateD)A和C[单选题]137.单击滚动条两端的箭头,将触发该滚动条的()事件。A)ScrollB)KeyDownC)ChangeD)Dragover[单选题]138.有如下程序:PrivateSubCommand1_Click()a$="AWORKERISOVERTHERE"x=Len(a$)Fori=1ToX-1b$=Mid$(a$,i,2)Ifb$="ER"Thens=s+1NextiPrintsEndSub程序运行后的输出结果是().A)1B)2C)3D)4[单选题]139.下列表达式值为True的是____。A)"a">"b"B)"YOU">"i"C)"You">"I"D)"9">"a"[单选题]140.确定一个控件在窗体上的位置的属性是()。A)Width或HeighB)Width和HeightC)Top或LefD)Top和[单选题]141.已知Str1$="Goodevening",Str2$=Left(),Str3$=Str2+"Luck",则Str3的值为____。A)GoodB)eveningLuckC)GoodLuckD)GoodLuck[单选题]142.简单组合框的style值为().A)0B)1C)2D)3[单选题]143.程序运行后，在窗体上单击鼠标，此时窗体的事件不会发生的是_______。A)LoadB)MouseDownC)MouseUpD)Click[单选题]144.MsgBox函数，返回值的类型是__________。A)数值或字符串B)整型数值C)字符串D)变体[单选题]145.如果列表框List1中已有10项数据，应使用语句（）将数据"Mydata"插入到列表框的第3项A)List1.Insert"Mydata",3B)List1.Insert"Mydata",2C)List1.Additem"Mydata",2D)List1.Additem"Mydata",3[单选题]146.如果x是一个正实数，对x的第3位小数四舍五入的表达式是A)0.01*Int（100*（x+0.005））B)0.01*Int（x+0.005）C)0.01*Int（100*（x+0.05））D)0.01*Int（x+0.05）[单选题]147.在VisualBasic中,以10为底的x的常用对数表达式为().A)Lo(x)B)LOglO(x)C)LOg(x)/Log(e)D)Log(x)/Log(10)[单选题]148.表达式InStr("ABCDEFG","DE")+"100"的值是______.A)4100B)1004C)104D)出错[单选题]149.从字符串变量Cstr的第4个字符开始，获取3个字符，应使用________。A)Rtrim(Cstr，3，4)B)Mid(Cstr，3，4)C)Mid(Cstr，4，3)D)Instr(Cstr，3，4)[单选题]150.ViaualBasic主要用于开发哪种系统下的文件()A)DOSB)WindowsC)DOS和WindowsD)UNIX[单选题]151.产生[10,37]之间的随机整数的VisualBasic表达式是().A)InB)Int(Rnd(1)*28)+10C)Int(Rnd(1)*27)+11D)Int(Rnd(1)*28)+11[单选题]152.下面程序运行时循环总次数是().ForM=1To3ForN=0To2NextNNextMEndSubA)6B)7C)8D)9[单选题]153.下面属于系统软件的是______。()A)财务管理系统B)数据库管理系统C)编辑软件WordD)杀毒软件[单选题]154.下面4项中不属于面向对象系统三要素的是().A)变量B)事件C)属性D)方法[单选题]155.标签所显示的内容,由()属性值决定。A)TextB)名称C)CaptionD)Alignment[单选题]156.下列语句中，正确的是_______。A)Ifx<=yThent=a:a=b:b=tB)Ifx≤yThent=a;a=b;b=tC)Ifx<=yThent=aa=bb=tD)Ifx≤yThent=aa=bb=t[单选题]157.vb应用程序是分层管理的,其最高的层次为().A)工程B)模块C)窗体D)过程[单选题]158.运行下面程序:PrivateSubForm_Click()a=1B=1N=InputBox("n=")ForI=2ToNStep1c=a+bA=bb=cNextForm1.ClsPrintbEndSub单击窗体输入3后,窗体上的显示结果为:()A)1B)3C)5D)7[单选题]159.若要使得文本框的初始值为空,则应更改文本框的属性是().A)captionB)textC)nameD)index[单选题]160.代数式exSin(300)2x/(x+y)lnx对应的VB表达式是().A)E^X*Sin(30*3.14/180)*2*x/x+y*log(x)B)Exp(x)*Sin(30)*2*x/(x+y)*ln(x)C)Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*log(x)D)Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*ln(x)[单选题]161.下列程序的运行结果是().s=0:t=0:u=0Forx=1To3Fory=1ToxForz=yTo3S=s+1Nextzt=t+1Nextyu=u+1NextxPrints;t;uA)3B)14C)14D)16[单选题]162.语句Print"Int(-13.2)=";Int(-13.2)的输出结果为().A)Int(-13.2)=-13.2B)Int(-13.2)=13.2C)Int(-13.2)=-13D)Int(-13.2)=-14[单选题]163.下面()对象在运行时一定不可见A)LineB)TimerC)TextD)Option[单选题]164.执行语句M=MsgBox()，所产生对话框的标题是____。A)祝您成功！B)VB等级考试C)64D)0[单选题]165.如果希望一个按钮仅显示图片,正确的设置是()A)将按钮的Style属性设置为1-GraphicalB)设置按钮的Caption属性为空C)将按钮的Picture属性指定为一个图片文件D)以上都必须设置[单选题]166.当用户单击命令按钮时,()属性可以使得命令按钮对激发事件无效。A)DefaultB)CancelC)NameD)Enabled[单选题]167.在VisualBasic6.0中编写代码，如果要强制显式声明变量，可在窗体模块或标准模块的声明中加入语句____。A)OptionExplicitB)OptionCompareC)OptionBase0D)OptionBase1[单选题]168.设有如下的记录类型TypeStudentNumberAsstringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是_____.A)S="张红"B)DimsAsS="张红"C)DimsAsTypeStudent="张红"D)DimsAsType="张红"[单选题]169.有如下程序:a$="123456":b$="abcde"Forj=1To5C$=c$+Left$(a$,1)+Right$(b$,1)NextjPrintc$运行后输出的结果是().A)a1b2c3d4e5B)a1b2c34d5eC)e1d2c3b4a5D)lelelelele[单选题]170.设a=6,则执行下面的语句后,x的值是x=IIf(a>5,-1,0)()A)5B)-1C)0D)4[单选题]171.如果x是一个正实数，对x的第3位小数四舍五入的表达式是________。A)0.01*Int(100*(x+0.005))B)0.01*Int(x+0.005)C)0.01*Int(100*(x+0.05))D)0.01*Int(x+0.05)[单选题]172.要使For语句fork=__To-5Step-2循环执行20次，循环变量的初值应是_________。A)35B)33C)32D)31[单选题]173.下列程序运行后,信息框显示的内容是().PrivateSubCommandl_Click()Dims1AsString,s2ASIntegers1="Hello-World,2003"s2=Len(s1)+InStr(1,S1,"2")MsgBOXs2EndSubA)Hello-WorldB)2003C)16D)29[单选题]174.以下关于图片框控件的说法中,错误的是()。A)图片框控件可以作为容器使用B)用Cls方法可以清空图片框控件中图形C)可以通过Print方法在图片框中输出文本D)清空图片框控件中图形的方法之一是加载一个空图形[单选题]175.下面程序段的功能是求两个数中的大数，其中_________是不正确的。A)Max=IIf(x>y，x，y)B)Ify>=xThenMax=y:Max=xC)Ifx>yThenMax=xElseMax=yD)Max=x:Ify>=xThenMax=y[单选题]176.关闭程序打开的所有文件,语句为().A)CloseB)CloseC)CloseD)Close[单选题]177.工程文件的扩展名是()A)vbgB)vbwC)frmD)vbp[单选题]178.以下程序OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=1To3Ifj＞1Andi＞1Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEndIfPrinta(I,j);"";NextjPrintNextiEndSub输出结果是A)123231323B)123123123C)123246369D)111222333[单选题]179.当组合框的（）属性值为2时，不允许用户在组合框中输入任何文本A)TextB)ListC)StyleD)ListCount[单选题]180.阅读下面的程序段:Fori=1To3Forj=1ToiFork=jTo4a=a+1NextkNextjNexti执行上面的三重循环后,a的值为.A)9B)14C)20D)21[单选题]181.退出VisualBasic的快捷键是().A)Ctrl+QB)Shift+QC)Alt+QD)Ctrl+Alt+Q[单选题]182.有说明语句：Dimx!，则x是（）类型的变量A)整形B)单精度浮点型C)长整形D)双精度浮点型[单选题]183.若m,x.y,均为Integer型变量,则执行下面语句后m值是0.M=l:x=2:y=3m=If(x>y.x+y,x-y)A)(A)-1B)(B)0C)(C)1D)(D)2[单选题]184.如果变量x=2、y=5、a="acd"、b="abc"，则表达式x<yOrb>aAnda=b的值____。A)TrueB)FalseC)YesD)No[单选题]185.要使Print方法在Form_Load事件中起作用，要对窗体的()属性进行设置。A)BackcoloB)ForeColorC)AutoRedraD)BackStyle[单选题]186.当VB执行下面语句后,A的值为A=1IfA>0ThenA=A+1IfA>1ThenA=0()A)0B)1C)2D)3[单选题]187.以下关于复选框的说法正确的是。()A)复选框的Enabled属性用于决定该复选框是否被选中B)复选框的Value属性用于决定该复选框是否被选中C)复选框的Checked属性用于决定该复选框是否被选中D)复选框的Visible属性用于决定该复选框是否被选中[单选题]188.标准工具箱中的控件().A)数目是固定不变的B)数目可以增加或减少C)包含了VisualBasic所有控件D)在窗体建立对象时不一定被使用[单选题]189.若要编写一些Sub过程,并能从多个窗体中访问这些过程,最好应该将放在_____中A)标准模块B)窗体C)类模块D)以上都不可以[单选题]190.以下Case语句中错误的是_______。A)CaseIs>10AndIs<5B)Case3,5,Is>10C)CaseIs>10D)Case0to10[单选题]191.设有下面的过程：FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegeri=2i=i+m+1m=i+a+bFunc=mEndFunction在窗体上添加一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimkAsInteger,mAsInteger,pAsIntegerk=4:m=1p=Func(k,m)Printp;p=Func(k,m)PrintpEndSub程序运行后，单击命令按钮Command1，输出结果为________。A)820B)817C)88D)816[单选题]192.下列表达式中,其值为0的是().A)7/9B)7C)7\9D)15[单选题]193.滚动条不具备的属性是____。A)CaptionB)ValueC)SmallChangeD)LargeChange[单选题]194.下面程序段显示的结果是()。A)优秀B)良好C)通过D)不通过[单选题]195.下面合法的常量是____。A)1/2B)'abcd'C)1.2*5D)False[单选题]196.在窗体上画一个名称为command1的命令按钮,然后编写如下事件过程.PrivateSubCommand1_Click()DimXASInteger,nASIntegern=0DOn=n+2X=X+nLoopWhilen<10Debug.PrintXEndSub程序运行后,单击命令按钮,则立即窗口中显示的内容是().A)2B)10C)12D)30[单选题]197.因文本框中内容的改变而触发的事件是____。A)GotFocusB)ChangeC)LostFocusD)Click[单选题]198.若有数组说明语句:Dimt（1To10），则t被定义为A)字符串型数组B)变体类型数组C)动态数组D)整形数组[单选题]199.有如下程序:Form1.ClsForr=35To85Step25Circle(300,240),rNextr单击窗体后,窗体上显示的是().A)3个相交圆B)3个同心不相交圆C)4个同心不相交圆D)两个同心不相交[单选题]200.下面关于顺序文件的描述正确的是A)文件中按每条记录的记录号从小到大排序好B)文件中按每条记录的长度从小到大排序好C)文件中按记录的某关键数据项从大到小的顺序排序D)记录按进入的先后顺序存放,读出也是按原写入的先后顺序读[单选题]201.以下语句结构是错误的()A)For…NextB)Do…LoopWhileC)For…LoopD)DoWhile…Loop[单选题]202.在窗体上有一个文本框控件,名称为TxtTime,一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间,程序为:PrivateSubTimer1________()TxtTime.text=TimeEndSub在下划线上应填入的内容是______.A)EnabledB)VisibleC)IntervalD)Timer[单选题]203.下列程序运行时,两次单击窗体后,显示的结果是_____.PrivateSubForm_ClickDimbAsIntegerStaticcAsIntegerb=b+2:c=c+2Print"b="b;"c=";cEndSubA)b=2c=2b=2c=2B)b=2c=2b=4c=4C)b=2c=2b=2c=4D)b=2c=2b=4c=2[单选题]204.在VB中可通过()属性来设置背景色.A)FontColorB)ForeColorC)BackColorD)ShowColor[单选题]205.InputBox()函数的返回类型是A)字符串B)对象C)数字型D)整型[单选题]206.有如下程序:PrivateSubCommand1_Click()m$="ABC"n$="abc"k$=LCase$(mS)j$=UCase$(n$)PrintAsc(k$+j$)EndSub程序运行后,输出的结果是().A)abcabcB)ABCABC)C:65D)97[单选题]207.要将名为MyForm的窗体显示出来,正确的使用方法是().A)MyFormB)Show.MyFormC)MyFormD)MyForm.Show[单选题]208.不能打开代码窗口的操作是()。A)双击窗体设计器的任何地方B)按下F4键C)单击工程窗口中的?查看代码?按钮D)选择?视图?下拉菜单中的?代码窗口?[单选题]209.现有语句：y=IIf(x>0,xMod3,0)_______。设x=10,则y的值是A)0B)1C)3D)语句有错[单选题]210.表达式Int(4*Rnd+1)*(Int(4*Rnd-1))值的范围是().A)[0,8]B)[-1,8]C)[-3,8]D)[-4,8][单选题]211.将命令按钮Command1设置为不可见,应修改该命令按钮的()属性.A)VisibleB)ValueC)CaptionD)Enabled[单选题]212.许多常用控件都有Value属性,Value属性的作用是0.A)确定控件的属性B)确定控件的位置C)确定控件的状态和位置D)确定控件的状态、内容及位置[单选题]213.有如下的事件过程:PrivateSubCommand1_Click()Dima(3,4)Fori=1To3Forj=1To4a(i,j)=(i-1)*2+jPrinta(i,j);NextjPrintNextiEndSub运行程序后,单击命令按钮,则执行的结果为____.A)123434565678B)876565434321C)567834561234D)432165438765[单选题]214.表达式Int()/100的值是___。A)19B)19.05C)18.55D)18.5[单选题]215.不能通过()来删除列表框中的选项.A)List属性B)Removeltem方法C)Clear方法D)Test属性[单选题]216.打包是将应用程序打包为一个或多个可以展开到选中位置的文件()A)CABB)COMC)CTLD)EXE[单选题]217.为了在按下回车键时执行某个命令按钮的事件过程需要把该命令按钮的一个属性设置为True,这个属性是_____.A)ValueB)CancelC)EnabledD)Default[单选题]218.如果Form1是启动窗体,并且Form1的Load事件过程中有语句Form2.Show,则程序启动后0.A)发生一个运行时错误B)发生一个编译错误C)在所有的初始化代码运行后Form1是活动窗体D)在所有的初始化代码运行后Form2是活动窗体[单选题]219.以下关于函数过程的叙述中,正确的是_____.A)如果不指明函数过程参数的类型,则该参数没有数据类型B)函数过程的返回值可以有多个C)当数组作为函数过程的参数时,既能以传值方式传递,也能以引用方式传递D)函数过程形参的类型与函数返回值的类型没有关系[单选题]220.不管一个对象的属性如何设置,程序运行时始终都能接收焦点的方法是().A)用Tab键B)用鼠标C)用方向键D)不能实现[单选题]221.要暂时关闭计时器,需设置()属性.A)VisibleB)EnabledC)LockD)Cancel[单选题]222.写出如下程序运行结果().Functionf(mAsInteger)AsIntegerb=1StaticcAsIntegerb=b+1c=c+1f=m*b*cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=2sum=0ForI=1To3sum=sum+f(a)NextIprintsumEndSubA)12B)16C)20D)24[单选题]223.下面程序运行时,内层循环的循环总次数是().ForM=1To3ForN=0ToM-1NextNNextMA)6B)5C)3D)4[单选题]224.当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件,这三个事件发生的顺序是().A)KeyPress、KeyDownB)KeyDown、KeyUp、KeyPressC)KeyDown、KeyPress、KeyUpD)没有规律[单选题]225.在鼠标事件MouseDown、MouseUp、MouseMove中，代表鼠标按键状态的参数是____。A)MouseB)x、yC)ShiftD)Button[单选题]226.下面四个语句中,能打印显示20*30字样的是_____.A)Print"20*30"B)Print20*30C)PnntChr(20)+","+chr(30)D)Printval("20")*val("20")[单选题]227.在窗体上画一个文本框和一个按钮,如下图所示。当程序运行后单击按钮,可将文本框字号变为?24?的是()。图1①.PrivateSubOption1_Click()Text1.Font=24EndSub②.PrivateSubOption1_Click()Text1.FontSize=24EndSub③.PrivateSubOption1_Click()Text1.FontStrikethru=24EndSub④.PrivateSubOption1_Click()Text1.FontStrikethru="24"EndSubA)①B)②C)③D)④[单选题]228.在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程.PrivateSubForm_Load()Textl.Text=""Textl.SetFocusFori=1To10Sum=Sum+iNextiText1.Text=SumEndSub上述程序的运行结果是().A)在文本框Text1中输出55B)在文本框Text1中输出0C)出错D)在文本框Text1中输出不定值[单选题]229.设有下面程序Subinc(aAsInteger)StaticxAsIntegerx=x+aPrintx;EndSubPrivateSubForm_Click()inc2inc3inc4EndSub程序运行后，单击命令按钮Command1，则输出的结果是________。A)3610B)111418C)4711D)259[单选题]230.若要退出For循环,使用的语句为()。A)EndB)ExitC)ExitD)Exit[单选题]231.让命令按钮控件在程序过程中不可用,可修改控件的属性。()A)AppearanceB)CaptionC)EnabledD)Visible[单选题]232.下列程序的执行结果为().A="1"B="2"A)+ValB)C)-9D)9E)-12F)0第2部分：判断题，共28题，请判断题目是否正确。[判断题]233.Forml.PrintFormat(3.18,"0.0")会在Forml上显示(3.2)A)正确B)错误[判断题]234.设计菜单中每一个菜单项分别是一个控件，每个控件都有自己的名字。A)正确B)错误[判断题]235.在窗体模块的声明部分中用Private声明的变量的有效范围是其所在的工程.A)正确B)错误[判断题]236.影像框和图片框都可以用AutoSize属性来控制控件大小调整的行为，当AutoSize属性值为True时，两者控件大小根据图片来调整；设置为False时，只有一部分图片可见A)正确B)错误[判断题]237.用dim语句声明的局部变量能保存上一次过程调用后的值.A)正确B)错误[判断题]238.属性是VisualBasic对象性质的描述，对象的数据就保存在属性中。A)正确B)错误[判断题]239.VisualBasic的Double类型数据可以精确表示其数值范围内的所有实数。A)正确B)错误[判断题]240.许多属性可以直接在属性表上设置、修改，并立即在屏幕上看到效果。A)正确B)错误[判断题]241.用Dim语句声明变量时,VB系统不仅为变量分配相应数据类型的内在空间,而且还为变量赋所需的初值.A)正确B)错误[判断题]242.在VB中,文件菜单的"删除工程"的作用是将当前VB工程在硬盘中删除掉.A)正确B)错误[判断题]243.Do/LoopWhile结构中的循环体，至少被执行一次。A)正确B)错误[判断题]244.数组控件中不能使用循环结构A)正确B)错误[判断题]245.在循环体内，循环变量的值不能被改变。A)正确B)错误[判断题]246.在过程中用Dim和Static定义的变量都是局部变量.A)正确B)错误[判断题]247.Visual_basic是合法的变量名.A)正确B)错误[判断题]248.Do/LoopUntil结构的循环，是?先判断、后执行（循环体）?的循环结构。A)正确B)错误[判断题]249.用通用对话框能建立文件对话框和(字体对话框)。()A)正确B)错误[判断题]250.框架控件和形状控件都不能响应用户的鼠标的单击事件.A)正确B)错误[判断题]251.标签控件可以用来让用户输入数据.A)正确B)错误[判断题]252.时钟控件的属性Interval值为0时,表示屏蔽计时器.A)正确B)错误[判断题]253.VB通过窗体管理构成应用程序的各类文件的集合.A)正确B)错误[判断题]254.文本框在其MultiLine属性设置为True之后，具备于数组控件。A)正确B)错误[判断题]255.循环结构DoWhile…Loop与Do…LoopWhile是完全一样的。()A)正确B)错误[判断题]256.在VB的工具栏中包括了所有的VB控件,我们不能再加载其他的控件.A)正确B)错误[判断题]257.同一个窗体文件只能用于一个工程中。A)正确B)错误[判断题]258.改变图形对象的坐标系可以用Scale方法A)正确B)错误[判断题]259.用通用对话框能建立(文件夹)对话框和字体对话框、颜色对话框和打印对话框。A)正确B)错误[判断题]260.当DoWhile…Loop或DoUntil…Loop语句中While或Until后的表达式的值为True或非零时,循环继续.A)正确B)错误1.答案:C解析:2.答案:B解析:3.答案:A解析:4.答案:C解析:5.答案:C解析:6.答案:A解析:7.答案:B解析:8.答案:A解析:9.答案:C解析:10.答案:B解析:11.答案:A解析:12.答案:B解析:13.答案:A解析:14.答案:D解