vb考试题库2.pdf

一、单项选择题(25道小题，共2 5分)1、V B中工程软件的扩展名为(c)A、dsB、frmC、vbp D、bas2、把字符串abcdef 右边的空格去掉应使用(b)函数A、trim B,rtrimC、right D mid3、文本框textl的text属性的数据类型是(b)A、整数型B、字符串C、单精度D、双精度4、下列(b)属性决定窗体标题栏显示内容(1分)A、NameB、CaptionC,TextD、BackStyl5、命令按钮 command1不具有下列哪个事件(d)(1 分)A、ClickB、KeyPressC、GotFocusD,DblClick6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars属性设置为(d)(1分)A、OB、IC、2D、37、Dim D(3,l To 10,1 To 15)语句中，数组的元素个数为(c)A、3*10*16B、3*H*16C、4*10*15D、4*11*158、如果整型变量c、d、x的值分别为8、6、0,则下列语句ForI=ctod:x=x+i:NextI执行结束时，I的值为(a)(1分)A、8B、7C、6D、59、假定有以下循环结构 Do U ntil条件 循环体 L oop则正确的描述是(b)(1分)A、如果”条件”是一个为0的常数，则一次循环体也不执行B、如果”条件”是一个为0的常数，则至少执行一次循环体C 如果 条件 是一个不为0的常数，则至少执行一次循环体D、不论 条件 是否为 真，至少要执行一次循环体10、x是小于100的非负数”，用V B表达式表示正确的是(c)A、0=x Or x100B、0=x 100C、0=x And x 100Ds 0=x,x exit doC end subD exit select12、Inputbox函数返回的数据类型为(d)A、整型B、逻辑型C、单精度D、字符串13、假定有以下程序段:For 1=1 To 3:For j=1 To 5 Step-1:Print I*j:Next j:Next I 则语句 Print I*j 的执行次数是(d)(1 分)A、15B、18C、10D、014、如果要清除在窗体中打印输出的文字，可以利用(c)语)A、InpulB、LoadC.QsD、Paint15、case v 表达式表列，其中的表达式表列不正确的为(d)(1分)A、Case 100*a表Case 1000To 2000C、Case Is3000D.Case 2000Is4:x=x*y:y=y+1:Loop 执行后 x 的结果为(b)A、IB、4C、8D、2019、以下声明和命名标识符错误的是(c)A、必须以字母开头B、变量名的最后一个字符可以是类型声明字符C、长度不能超过8个字符D、不能与关键字同名20、下列说明错误的是(d)(1 分)A、Const MyVar#=123B Dim my name as stringC dim a as integer,dim b as singleD、dimMyString=MHello,+MMy friend!21、VB 中允许出现的数据形式为(b)A、1.89E1.1B、.368C、D32D、2.5E22 设 a=2,b=3,c=4,d=5,下列表达式 abANDcv二dOR2*ac 的值是(b)A、TrucB False C、-ID、123、语句 6*66/6 的输出结果是(c)A、6B、12C 36D、21624、给窗体 foiml 加载背景图片，应使用(c)A、picturcB ucaseC loadpictureD image25、字符串”河南农业大学现教部”的长度是(c)A、18B、10C、9D、16二、填空题(12道小题，共35分)1、设定系统当前日期是2004年5月12日，Month(date)=5o2、设 A$=Visual Basic”en(a$)函数返回值是 12。3、在窗体的声明部分，语句Private x%语句，是将变量定义为 窗体模块 级变量。4、逻辑型数据只有true false 两个值。5、顺序文件读操作用 open 语句。6、一个工程可以包括多种类型的文件，其中扩展名为.frx的文件表示frm 文件。7、Commandl.Visible=False,是将命令按钮I设为 把它设置为隐藏。8、当鼠标在控件上暂停时，显示提示信息，要用属性 ToolTipText 属性。9、Textl.SetFocus语句功能是把焦点移到上 Textl10、Dim X As Currency是将变量X定义为 货币 型。三、判断题（10道小题，共10分）1、V B中请求对象执行某一操作的要求称为 方法“。（1分）正确2、False为字符型常量。（1分）错误3、语句Print 25*40执行时输出的结果是1000。（I分）正确4、窗体的卸载使用L oad语句。（1分）错误5,表达式268=268的结果为True。（1分）错误6、语 句if 0 then print Hello是错误的。（1分）错误7、在for循环结构对循环变量的赋值中，终值可以大于初值，也可以小于初值。（1分）正确8、将文本框Textl中的内容清除，可使用语句Textl.cls。错误9、文件名的命名规则同变量的命名规则一样。（1分）正确10、InputBox函数返回值的类型是字符串类型。（1分）正确Private Sub Command l_Click（）Dim mark!,aver!,i%,maxi!,mini!aver=0For i=1 To 6mark=InputBox（输入第&i&位评委的打分）If i=1 Thenmaxi=mark:mini=markElseIf mark max I Thenmaxl=markEnd IfEnd Ifaver=aver+markNextaver=（aver-min 1 -max 1）/4Print averEnd Sub1、以下叙述中错误的是（b）（1分）A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件B、控件的名称可以由编程人员设定C、窗体文件包含该窗体及其控件的属性D、Visual B asic中控件的某些属性只能在运行时设置2、以下关于窗体的描述中，错误的是（d）（1分）A、窗体的Load事件在加载窗体时发生B、当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止C、窗体的Height、width属性用于设置窗体的高和宽D、执行Unload F onnl语句后，窗体Fonnl消失，但仍在内存中3 用 Static M（60 to 90）As Integer 语句定义的数组的元素个数是（c）（1 分）A、60 B、30 C、31 D、904、如果整型变量a、b的值分别为3和1,则下列语句中For I=a tob:Print I:Next I循环体的执行次数是（c）（1分）A、3 B 2 C ID、05、关于语句If x=l Then y=l下列正确的说法是（c）（1分）A、x=l和y=l均为赋值语句B、x=l和y=l均为关系表达式C、x=l为关系表达式,y=l为赋值语句D、y=l为关系表达式,x=l为赋值语句6、用情况选择语句Select Case X,选择|X|10情况的语句为Case（c）（1分）A、Not（-10 To 10）lOTo-IOCs Is v-10,Is 】0 D、ABS（X）107、下列哪条语句是错的（c）（1分）A、RTrim（）Exit Function C、Exit While D、Exit Do8、在Visual Basic中下面的四个数组声明语句，正确的是（c）（1分）A、Dima10 B Deffn（IO）C.Dim a（10）D Dimension a（10）9 阅读下面的程序段For i=l To 3:Forj=l To i:For k=j To 3:a=a+2:Next:Next:Next执行上面的三重循环后,a的值为（c）（1分）A、26 B、27 C、28 D、2910、下面说法错误的是（b）（1分）A、对象的性质和状态值称为“属性”B、请求对象执行某一操作的要求称为“消息”C、改变对象的一个或多个属性值的操作称为“事件”D、对象发生某事件所执行的程序称为事件驱动程序11、若使用文本框Textl,为对用户输入内容进行立即检查，应对Texll的哪个事件编程（a）（1分）A、Change B、Interval C Left D、Top12、如果数据包含小数,则不应定义为下列哪种类型（c）（1分）A Double B Single C、Byte D Currency13 下列程序段 s=0:for i=9 to 42 step 11:s=s+i:next:if i50 then s=s+i else s=s-i 运行后 s 的结果为（）（1 分）A、167 B、139 C、144 D 15514、有如下程序,m$二 ABCDE”:MID（m$,1 ,5）=abcde”:Prim m$，运行后的输出结果是（a）（1 分）A abcdcABCDE B ABCDEabcdc C abcdcD、ABCDE15、在下列四个式子中,非法的Visual Basic表达式是（c）（1分）A、a=b+cB、53+3C、a=expD 5516、表达式 INT（6*RND+1）*（INT（6*RND-1）值的范围是（b）（1 分）A、-6,18 B、-6,24 C、-3,24 D、-3,1817、字符串”计算机技术基础”的长度是，应使用下列（c）函 数（1分）A、TABB、STRC、LEND、INSTR表达式（not true or true）and（true or false）的值为（b）（1 分）A false B true CN 0D、-119、下列叙述中正确的是（c）（1分）A、在窗体的Form_Load事件过程中定义的变量是全局变量B、局部变量的作用域可以超出所定义的过程C、在某个S u b过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程D、在调用过程时，所有局部变量被系统初始化为0或空符串20、下面的变量名合法的是（c）（1分）A k.name B k%nameC、name D k-name21、在Visual Basic中,下面四个数据，数据形式错误的是（b）（1分）A、3.456#B 236!C、1.23D-23 D、1.89E1.122、已知CD,ST,正确表示它们之间关系的式子是（c）（1分）A、Sgn（D-C）-Sgn（S-T）0 B Sgn（D-C）-Sgn（S-T）=-2C、Sgn（D-C）-Sgn（S-T）=O Sgn（D-C）-Sgn（S-T）=l23、表达式Int（Rnd*l 1）+100的值的范围是（b）（1分）A、lll,lllB s 100,110 C 11,100 100,11124、下列关于属性设置的叙述正确的是（d）（1分）A、所有的对象都有同样的属性B、控件的属性只能在设计时修改，运行时无法改变C、控件的属性都有同样的默认值D、引用对象属性的格式为：对象名称属性25、Visual Basic中没有提供下列（d）事 件（1分）A、MouseDown B、MouseUp C MouseMove D MouseExit二、填空题（12道小题，共35分）1、可视化Visual Basic语言是 公司推出的程序开发语言。2、双击某个对象时，最终引发该对象的事件 执行。3、程序流程中被重复执行的程序段叫 循环体。4、将对象设置为允许用户操作，并对操作作出响应，是将它的Enabled属性值设为 True。5、在 Visual Basic6.0 中，用 Font.StrikeThtouth 属性设置。6、表示单精度型数据的单一字符是!o7、Rnd函数的含义是o8、Chr$(数值)函数返回 该数值表示的字符。9、在窗体各过程中均有效的变量是 全局变量。10、在Print方法中，句尾有符号时，是 换行 执行下一个Prim语句II、下列程序段将十进制数转换为十六进制数，要求十进制数为非负整数。单击窗体，弹出InputBox对话框，让用户输入一个十进制数；单击 确定 后，在Labell上显示出十六进制数的结果。如果输入的不是十进制数，在标签Labell上显示出”你输入的不是十进制数”，退回到对话框状态，让用户重新输入。Private Sub Form_Click()Dim sHcx As String,Ys As IntegerDim n As String,nd As Integer,Ai As StringsHex=n=InpulBox(请输入一个十进制整数”)If Not IsNumeric(n)Or Left(n,1)=0 Or_Int(Val(n)Val(n)ThenMsgBox”你输入的不是十进制整数！”EndElsend=Val(n)Do While nd=10Ys=nd Mod 16Select Case YsCase 10Ai 二“ACase 11Ai 二“BCase 12Ai=C”Case 13Ai=D”Case 14Ai=nECase 15Ai=nFCase 0 To 9Ai=YsEnd SelectsHex=Trim(Ai)&sHexnd=nd 16LoopLabel 1 =nd&sHexEnd IfEnd Sub12、在窗体上有两个命令按钮和一个文本框，名称分别为cmdstart（开始”）、cmdend（结束”）和txt。程序开始运行时，要求文本框txt中的字符个数不超过300个，“结束”按钮成灰色，单击“开始”按钮后，“开始”按钮不可用，同时使“结束”按钮能响应，单击“结束”按钮结束程序。Private sub fbrm_load（）=300Cmdend.enabled=falseEnd subPrivate sub cmdstart_click（）cmdstart.enabled=false=trueend subprivate sub cmdend_click（）endend sub三、判断题（10道小题，共10分）1、通 过label 1.c is可以清除由label 1所显示的内容。（1分）错误2、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分）错误3、设a=5,则语句print a=5的运行结果为True。（1分）正确4、能够改变窗体背景颜色的属性是BackColor。（1分）正确5、在V B的表达式中，加入括号有时可以改变运算符的优先级。正确6、在if条件,th e n结构中，条件可以是逻辑表达式或关系表达式。（1分）正确7、在For v控制变量=v初值,To v终值 Step v步长习结构中，步长可以取任意值。（1分）错误8、可以用Textl.text=”来清除T extl中的内容。（1分）正确9、在V B中可以同时打开多个工程。（1分）正确10、在定义了一个函数后，可以象调用任何一个V B内部函数一样使用它，即可以在任何表达式、语句或函数中引用它。（1分）错误四、编程题（4道小题，共60分）1、求公式：e=l/l!+l/2!+l/3!+l/n!直到最后一项小于10A（-6）时e的值。（保留小数点后9位）（注：程序代码写在命令按钮Commandl的Click事件中。）Private Sub Command I _Click（）e=0s=1i=1Do Until s 10 A（-6）s=s/ie=e+si=i+1LoopPrint eEnd Sub2、有100匹马，驮100担货：大马驮3担，中马驮2担，两匹小马驮1担，问有大、中小马各多少？（本题不要求填写运行结果）请将你解答本题所写的源程序粘贴到下面或者上载源程序Private Sub Command 1 _Click（）Dim a,b,c As IntegerFor a=1 To 100For b=1 To 100c=100-a-bIf3*a+2*b+c/2=100 ThenPrint a,b,cEnd IfNextNextEnd Sub3、编写程序，用牛顿切线法求方程f（x）=x+lnx-1.7=0的近似实根r,迭代初值自选，精确到0.0001。（提示:计算公式为x=x-f（x）/f（x）必须将本题程序最后的运行结果填入下面的框中。否则，该题以零分计！4、编写程序，输出下列三角形：（要求用循环做，非循环不给分。）11 231 23451 2 3 4 5 6 7Private Sub Command 1 _Click（）For i=1 To 4PrintTab（2 0-3*i）;For t=1 To 2*i-1Print t;NextNextEnd Sub1、如果一个工程含有多个窗体，则以下叙述中错误的是（d）（1分）A、不可以在运行期间改变对象的Name属性的值B、用Hide方法只是隐藏一 个 窗体，不能从内存中清除该窗体C、任何时刻最多只有一个窗体是活动窗体D、窗体的Name属性的值是显示在窗体标题栏中的文本2、下列不能打开属性窗口的操作是（c）（1分）A、执 行“视图”菜单中的“属性窗口”命 令B、按F4键C、按CW+TD、单击工具栏上的“属性窗口”按钮3、用Dim S（20）As Integer语句定义的数组的元素个数是（）（1分）A、19 B、20 C、21 D、224、如果整型变量a b的值分别为3和1,则下列语句中For I=a to b:Print I:Next I循环体的执行次数是（）（1分）A、3B、2C、1 D、05、关于语句If x=l Then y=l下列正确的说法是（）（1分）A、x=l和y=l均为赋值语句B、x=l和y=l均为关系表达式C、x=l为关系表达式,y=l为赋值语句D、y=l为关系表达式,x=l为赋值语句6、用情况选择语句Select Case X,选择|X|10情况的语句为Case（）（1分）A、Not（-10 To 10）lOTo-IOCs Is v-10,Is 】0 D、ABS（X）107、在运行阶段，要在文本框Textl获得焦点时选中文本框中所有内容，对应的事件过程是（a）（1分）A、Private Sub Text 1 _GotFocus（）:Textl.SelStart=O:Textl.SelLength=Len（TextI.text）:End Sub Private Sub Textl_LotFocus（）:Textl.SeiStart=O:Text 1 .SclLcngth=Len（Text 1 .text）:End SubC、Private Sub Textl_Change（）:Textl.SelStart=O:Textl.SelLength=Len（Textl.text）:End Sub Dx Private Sub Textl_SetFocus（）:Textl.SelStart=O:Text 1 .SelLcngth=Len（Text 1 .text）:End Sub8、在Visual Basic中下面的四个数组声明语句，正确的是（）（1分）A Dim a10 B Def fn（10）C Dima（10）D、Dimension a（10）9、假设有以下程序段For 1=1 to 3:For j=7 to 1 Step-l:Print I*j:Next j:Next I则语句Print I*j的执行次数以及I、j的值分别是（）（1分）A、21 30 B、2140 C、20 3 0 D、20 4 010、如果Form l是启动窗体，并且F onnl的Load事件过程中有Form2.Show,则程序启动后（c）（1分）A、发生一个运行时错误B、发生一个编译时错误C、在所有的初始化代码运行后Form l是活动窗体D、在所有的初始化代码运行后Form2是活动窗体11、以下控件中可以入选为容器控件的是（b）（1分）A、Image图像框控件B、PictureBox图片框控件C、TcxtBox文本框控件D、ListBox列表框控件12、假设变量bool_x是一个布尔型（逻辑型）的变量，则下面正确的赋值语句是（b）（1分）A、bool_x=False B bool_x=.False.bool_x=#False#D、bool_x=Fa!se13、下列程序段 If（2*2=5）21015、在下列四个式子中，非法的Visual Basic表达式是（）（1分）A、a=b+e B、53+3 C、a=exp D、5516、表达式 INT（4*RND+2）*（lNT（4*RND-2）值的范围是（）（1 分）A、-10,8 B-4,8 C.-10,5 D,4,817、耍统计出字符串”计算机技术基础visual basic”的长度，应使用下列（）函 数（1分）A、TAB B STRC、LEND、INSTR18、表达式253mod3.2*im（2.5）的值为（）（1 分）A、1 B、2 C、3D、519、Dim bl,b2 as boolean 语句显式声明变量（d）（1 分）!A、b l和b2都为布尔型变量B、b l是整型,b2是布尔型变量C、b l和b2都为是可变型变量D、b l是可变型,b2是布尔型变量2 0 下列哪一个是Visual Basic合法变量名（d）（1分）A、IFB、7AB C、AB7D、AB721、用变量a存放数据888666.666888,应将变量a的类型定义为（）（1分）A、Long B Integer C Single D Double22、下面逻辑表达式值为真的是（）（1分）A、“A，a“B、“9“a”C、“ThatThank”D、1212.123、函数 String（n,”str）的功能是（）（1 分）A、把数值型数据转换为字符串B、返回由n个字符组成的字符串C、从字符串中取出n个字符D、从字符串中第n个字符的位置开始取子字符串24、如果希望一个窗体在显示的时候没有边框，应该设置的属性是（b）（1分）A 将窗体的Caption设成空字符B、将窗体的BorderStyle置成NoneC、将窗体的Enabled属性置成False D、将窗体的ContalBox置成False25（b）对象能使用print方 法（1分）A、文本框B、图片框C、命令按钮D、标签二、填空题(12道小题，共35分)1、从机器的执行角度来说，程序设计语言可分为高级语言和 两大类。2、双击某个对象时，最终引发该对象的事件。3、程序流程是按一定条件重复多次执行一段程序的结构是结构。4、将对象设置为禁止用户操作，是将它的Enabled属性值设为。5、在 Visual Basic6.0 中，用 Font.Italic 属性设置。6、长整型变量的关键字是。7、三角函数是以为单位。8、Chr$(13)为 huiche。9、在整个工程的所有模块中均有效变量是全局变量。10、方法用于在窗体、图片框、调试窗中、打印机等对象上输出文本11、下列程序段是用于在一个字符串变量中查找“red，并用信息输出框给出找到的个数或没有找到的查找结果。Private Sub Form_Click()Dim Strl As String,Length As Integer,Sum As Integer,1 As IntegerStrl=InputBox(请输入个字符串)Length=1=1Sum=0Do While I=length-3If=red ThenSum=Sum+1End If1 =1 +1LoopIf ThenMsgBox”没有找到！,ElseMsgBox”找到了“&Str(Sum)&”个“End IfEnd Sub12、在窗体上画一个标签(名称为L abell)和 个计时器(名称为T im crl),然后编写如下儿个事件过程:Private Sub Form_Load()Timer).Enabled=FalseTimerl.Interval=End SubPrivate Sub Form_Click()Timerl.Enabled=End SubPrivate Sub Timerl_Timer()Label 1 .Caption=time()End Sub程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换一次(如见下图)。14:54:41三、判断题（10道小题，共10分）1、立即窗口既可显示程序调试时新产生的信息，也可执行一行代码。错误2、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分）错误3、语句a=7:print：a=8:print a可以输出a的两个值。4、可以在运行期间改变对象的Name属性的值。（1分）错误5、字符串“AB”与“ab”是两个相等的字符串。（1分）6、在if v条件 th e n结构中，条件必须是逻辑表达式或关系表达式。（1分）7、在Forv控制变量=初值,To终值,Step步长 结构中，可以写成For a=nx to nz （I分）8、计时器（Timer）控件的Interval属性的单位是亳秒，即若将此属性值设为1 0,则每0.01秒产生一次Timer事件。（1分）9、窗体文件的扩展名是.frmo（1分）10、在丫8中，血（前*90）+10的取值范围是口0,99。（1分）四、编程题（4道小题，共60分）1、输入一串数字，求其中各位数字之和。例如输入123456,则求1+2+3+4+5+6。必须将本题程序最后的运行结果填入下面的框中。否则，该题以零分计！请将你解答本题所写的源程序粘贴到下面或者上载源程序2、勾股定理中三个数的关系是：a 9 +bA2=c八2编写程序，输出100以内满足上述关系的整数组合，例如3,4,5就是一个整数组合。（本题不要求填写运行结果）请将你解答本题所写的源程序粘贴到下面或者上载源程序3、编写程序，用普通迭代法求方程f（x）=x+lgxL7=0的近似实根r,迭代初值为1.5,精确到0.0001。（提示：必须把方程f（x）=0化成其等价形式x=g（x）。（允许使用其他迭代法）必须将本题程序最后的运行结果填入下面的框中。否则，该题以零分计！请将你解答本题所写的源程序粘贴到下面或者上载源程序4、编写程序，输出下列三角形：（要求用循环做，非循环不给分。）GFGEFGDEFGCDEFGBCDEFGABCDEFG（本题不要求填写运行结果）请将你解答本题所写的源程序粘贴到下面或者上载源程序1、以下叙述中错误的是（b）（1分）A、个工程中可以包含多个窗体文件B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用C、若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体D、事件可以由用户引发，也可以由系统引发2、在设计阶段,当双击窗体上的某个控件时，所打开的窗口是（）（1分）A、工程资源管理器窗口 B、工具箱窗口C、代码窗口 D、属性窗口用Static M（60 to 90）As Integer语句定义的数组的元素个数是（）（1分）A、60 B、30 C、31 D、904、如果整型变量c、d的值分别为10和5,则下列语句中For I=c tod:Print I:Next I循环体的执行次数是（）（1分）A、6B、5 C、1 D、05、a和b中有且只有一个为0,可以用以下的表达式来表示（）（1分）A、a=0 or b=0 B、a*b=0 and a+b 0C、a*b=0 or a+bWO D、a=0 and not b=0 and b=0 and not a=06、用情况选择语句Select Case X,选择|X|10情况的语句为Case（）（1分）A、Not（-10To 10）B,lOTo-lOC,Is 10D、ABS（X）107、设a=10,b=5,c=l,执行语句a b c结果是（）（1分）A、TrueB、FalseC、ID、出错信息8、在Visual Basic中下面的四个数组声明语句，正确的是（）（1分）A、Dim a10 B Def fn（10）Dima（10）D、Dimension a（10）9、假设有以下程序段For 1=1 to 3:For j=5 to 1 Step-l:Print I*j:Next jiNext I则语句Print I*j的执行次数以及9 j的值分别是（）（I分）A、1230 B、133 1 C 1240 D、134 110、创建Visual Basic应用程序的主要步骤是：创建应用程序界面 设置控件 设置属性 编写代码，其中正确的步骤是（d）（|分）nnim niniiA、B、C、D、11、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True,这个属性是（）（1分）A、Value BN Default CX Cancel D Enabled12、如果数据包含小数,则不应定义为下列哪种类型（）（1分）A Double B Single C、Byte D Currency13 下列程序段 s=0:for i=9 to 42 step 11:s=s+i:next:if i50 then s=s+i else s=s-i 运行后 s 的结果为（）（1 分）A、167 B、139 C、144 D 15514、有如下程序For x=l TO 2:For y=0TO x-l:Print x*y:Next:Next,内层循环的循环体的总执行次数是（）（1分）A、1 B、2C、3D、415、在下列四个式子中,非法的Visual Basic表达式是（）（1分）A、a=b+cB、53+3C、a=expD 5516、表达式 INT（4*RND+2）*（INT（4*RND 2）值的范围是（）（1 分）A、-10,8 B、-4,8 C、-10,5 D、4,817、要统计出字符串”计算机技术基础visual basic”的长度，应使用下列（）函 数（1分）A、TABB、STRC、LEND、INSTR表达式（not true or true）and（true or false）的值为（）（1A false B true CN 0D、-119、下列哪个关键字声明的局部变量在整个程序运行中一直存在（cA、Dim B Public C Static D、Private20、下面的变量名合法的是（）（1分）A k.namc B k%name C name D、k-name21、Visual Basic中不允许出现的数据形式为（）（1分）A、4.56E-3B、.368C、D32D、0.25822、设a=2,b=4,c=6,下列表达式值为真的是（）（1分）A、ab And cb Or ca C、aa D、bc Or ca23、要使变量x赋值为1至100间（含1,不含100）的一个随机整数，正面语句正确的是（）（1分）A x=Int（100*Rnd）Bs x=Int（101*Rnd）x=l+Int（100*Rnd）D、x=1+Int（99*Rnd）24、下列关于属性设置的叙述正确的是（d）（1分）A、所有的对象都有同样的属性B、控件的属性只能在设计时修改，运行时无法改变C、控件的属性都有同样的默认值D、引用对象属性的格式为：对象名称.属性25、使文本框获得焦点的方法是（）（1分）A、Change B、GotFocusC、SelFocus D、LostFocus二、填空题（12道小题，共35分）1、可视化Visual Basic以结构化 Object pascal 语言为基础。2、个工程可以包括多种类型的文件，其中窗体文件的扩展名为。3、程序流程中被重复执行的程序段叫循环结构。4、将对象设置为不可见的，是将它的属性值设为False。5、在 VisualBasic6.0 中，用 Font.Size 属性设置。6、表示货币型数据的单一字符是。7、lnt（x）函数的含义是。8、设A$=Visual Basic是一种可视化编程语言,mid$（A$,8,5）函数返回值是。9、逻辑值转变为数值时，False为0。10、在Print方法中，输出项用逗号分隔是按 标准 格式输出。II、下列程序段是用于在一个字符串变量中查找“Rose，并用信息输出框给出找到的个数或没有找到的杳找结果。Private Sub Form_Click（）Dim Strl As String,Length As Integer,Sum As Integer,1 As IntegerStrl=InputBox（请输入一个字符串”）Sum=0Do While I 0 and sqr(x)=chr(x)B、x 0 or sqr(x)=abs(x)C、x 0 and sqr(x)=fix(sqr(x)D、x 0 or sqr(x)=int(sqr(x)14、在如下语句中,d$=“123”:f=456”,则d+f$的结果是OA、123456 B、”123456”C、123+256”D、显示出错信息15在Visual Basic中,下面的四个语句中正确的是()(1分)A Log(sin(-1)B c=abs C Print TAB(10)QB a=b=c16、表达式 INT(4*RND+2)*(lNT(4*RND-2)值的范围是()(1 分)A、-10,8-4,8-10,5 D 4,817、要统计出字符串”计算机技术基础visual basic”的长度，应使用下列()函 数(1分)A、TABB、STRC、LEND、INSTR18、表达式(not true or true)and(true or false)的值为()(1 分)A false B true C0 D-119、下列叙述中正确的是(c)(1分)A、在窗体的Form_Load事件过程中定义的变量是全局变量B、局部变量的作用域可以超出所定义的过程C、在某个S ub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其作用域只限于该过程D、在调用过程时，所有局部变量被系统初始化为0或空符串20、以下哪一个是变量名是错误的(c)(1分)A、我你他 B、ABCC、AB.CD、A12321、下列可作为Visual Basic允许的数据形式的是(d)(1分)A、10A(1.256)B D32C、2.5ED、12E322、已知CD,ST,正确表示它们之间关系的式子是()(1分)A、Sgn(D-C)-Sgn(S-T)0 B Sgn(D-C)-Sgn(S-T)=-2 C Sgn(D-C)-Sgn(S-T)=0 D Sgn(D-C)-Sgn(S-T)=123、要使变量x赋值为1至100间(含1,不含100)的一个随机整数，正面语句正确的是()(1分)A x=Int(100*Rnd)BN x=Int(IOl*Rnd)C x=l+Int(100*Rnd)x=1+Int(99*Rnd)24、下列关于属性设置的叙述正确的是()(1分)A、所有的对象都有同样的属性B、控件的属性只能在设计时修改，运行时无法改变C、控件的属性都有同样的默认值D、引用对象属性的格式为：对象名称.属性25 Visual Basic中没有提供下列()事 件(1分)A、MouseDown B、MouseUp C、MouseMove D、MouseExit二、填空题(12道小题，共35分)1、从机器的执行角度来说，程序设计语言可分为高级语言和两大类。2、一个工程可以包括多种类型的文件，其中可执行文件的扩展名为。3、For.Next结构的循环次数为。4、将对象设置为可见的，是将它的属性值设为True。5、在 Visual Basic6.0 中,用 Font.Italic 属性设置。6、变体型变量的关键字是variant。7、三角函数是以为单位。8、设A$=Visual Basic是一种可视化编程语言,Right$（A$.4）函数返回值是。9、在整个工程的所有模块中均有效变量是。10、在Print方法中，句尾有符号时