VB复习题6-.pdf

《VB复习题6-.pdf》由会员分享，可在线阅读，更多相关《VB复习题6-.pdf（10页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB复习题1.某 Visua1 Basic 工程的代码窗口如图所示：从图中可以看出，当前正在编辑的是（B）。ALabel1 的 Click事件过程代码B.Command1的 Click事件过程代码C.Form1 的 Click事件过程代码D.Form1的 Load 事件过程代码2.数学公式 x2+bx在 VB 中的正确写法是（C)A.x2+bxB.x2+b*xC.x2+b*xD.x2+bx3下列 VisualBasic表达式的值等于127的是（B)A.str(“123”)+”4”B.Val(“123”)+4C.Len(“123”)+4D.Sqr（123)+44某 VisualBasic 程序如

2、下：PrivateSub command1_Click()Dim a Ag Single,b Ag SingleDim c As Singlea=1b=5C=Sqr（a-b)Text1.Text=cEnd Sub运行程序，单击命令扶钮command1后弹出如图所示的出错信息提示，此时程序正执行的语句是（A）。A.c=Sqr（a-b)B.Text1.Text=cC.b=5D.Dim c as Single5.某地驾照考试规定，考试成绩不低于 80 分为合格，下图是根据成绩判断是否合格的部分流程图：如果输入的成绩为85，则该流程的执行顺序为（B）。A B C D 6.在 VB 中执行以下程序段结束

3、后J 的值是(5)。For I=1 To 3J=I+2Next I7.有如下 VB 程序段：a=5b=2lfa b Then m=aElse m=b该程序段运行后,变量 m 的值为(5)。8.函数 Int(-1.3）运行结果是(-2)9.在 VB 中，以下程序段，执行后x 的值为(3)。x=0Do While x-6And 5=5 运行的结果是(True)（填写“True”或“False）第二套空气污染指数（API）值不超过 50，说明空气质量为优。下图是根据API 值判断空气质量情祝的部分流程图：如果输入的 API 值为 55，则该流程的执行顺序为（C）。A B C D 2.某 Visual

4、Basic 程序如下：PrivateSub Command1 _click()Dim x As Single,y As Singlex=inputBox(“x=”)Ifx 5 Then y=5*xElsey=x*2End IfPrintyEnd Sub运行程序，单击命令按钮command1后弹出如图所示的出错信息提示，此时程序正执行的语句是（B)A.Ifx 5 Then y=5*xB.elseC.x=InputBox(“x”)D.Dim x AsSingle,y As Single3.在 VB 中，下列哪个是合法的变量名（C）。A.SqrB.IntC.MaxD.End4.在 VB 中，以下关于

5、字符型常量的声明正确的是（C）A.Dim GSAs StringB.Const GSAs StringC.Const GSAS String=”甘肃”D.Dim Gs As string=”甘肃”5.将数学表达式(x 的单位：弧度)写成 visualbasic 表达式，正确的是（A）。A.Sin(x)*Cos(x)/2B.SinxCosx/2C.Sinx*Cosx/2D.Sin(x)Cos(x)/26.在 VB 中执行以下程序段结束后循环变量i的值是(5)For i=1 To 4 Step 2Print VB Next i7.有如下 VB 程序段，该程序段运行后，变量 y 的值是(-1)。X=

6、5Lf x 5 Theny=1Elsey=-1End If8.在以下程序段中，循环体执行的次数为(3)X=2DoX=X+XLoop whilex 5 Theny=5*xElsey=3*xEnd If7.该程序段运行后，变量x 的值是(6)。For i=3 To 1 Step-1x=5x=x+iNextPrintx8.表达式 Sqr(9)+1 的值是(4)。9.在以下程序段，运行后x 的值为(5)。x=5Do Untilx=5X=xxLoop10.在 VB 中 a=2,b=”command Button”，执行 Mid(b,a,3）语句后的值是（omm）。第四套1.某 visualBasic 程

7、序如下：PrivateSub Command1-click()Dim x As Integer,iAs Integer,J AsIntegerFor i=1 To 10 Step 3For j=1 To 2x=i*(i+2)Next iNext jText1.Text=xEnd Sub运行程序，单击命令按钮Command1 后弹出如图所示的出错信息提示，引起该错误的第一个语句是（B）。A.Text1.Text=xB.Next iC.Next jD.For i=1 To 10 Step 32.下列属于正确的VisualBasic 赋值语句的是（C）。A.a*b=2B.a+b=2C.a=TrueD

8、.2=a+b3.在 VisualBasic 代码编辑窗口中，输入了“Text1.”后出现了如图所示的信息：其中的“Text”是 Text1 的（D）。A 事件名B 对象名C 方法D 属性名4.语句 Print8+5 mod2*3 正确的输出结果是（C）A.14B.11 C.13 D.85.某算法的流程图如下所示：当输入 a,b 的值分别为 7,9，该算法的输出结果为（D)A.7B-2C.9D.166.有以下 VB 程序段：a=2b=5Ifa b Then m=a Else m=b该程序段运行后，变量m 的值为(5)。7.表达式 Not(3 7）运行的结果是(True)（填写“True”或“Fa

9、1Se ）8.在 VB 中，以下程序段执行后x 的值为(1)。x=0Dox=x+1Loop Untilx=09.下列程序执行后，整型变量n 的值为(2)。n=OforI=1 to 10ifI mod 4=0 then n=n+1next10.若 x=6.1786，则表达式 Int(x+0.5）的值是(6)。第五套1.将数学表达式城abc 写成 visualBasic 表达式，正确的是（B）。A.a=b Not b=cB.a=b And b=cC.a=b=cD.a=b or b 10 Theny”HELLO”Elsey”BYEBYE”End IfText2.Text=yEnd Sub这个程序运行

10、的时候出现“类型不匹配”的错误，应把下划线处改为（B）。A.LongB.BooleanC.IntegerD.String3.某 visualBasic 工程的代码窗口如图所示：从图中可以看出，当前正在编辑的是（C）A.Text1的 Click事件过程代码B.Form1 的 Click事件过程代码C.Label1的 Click事件过程代码D.form1 的 Load 事件过程代码4.在 VB 语言中，下列语句中不合法的是（C）A.print“x=5”B.print“x=”;5C.print“x=”:5D.printx=55.某交通工具允许乘客带不超过20 千克的行李，检测行李重量的部分流程图如下

11、，图中的虚线框部分的功能正确的是（A）。A.判断行李大于等于20 公斤B.判断行李小于等于20 公斤C.判断行李小于 20 公斤D.判断行李大于 20 公斤6.以下 VB 程序段循环体执行的次数为(2)。x=0Dox=x+1Loop untilx 17.在 VB中，表达式 104+5 mod2 的结果是(3)。8.以下 VB 程序段运行后，变量y 的值是(6)。X=2Ifx 5 Theny=5*xElsey=3*xEnd If9.在 VB 中，表达式 Left(VB程序设计”,3）的结果是(VB 程)10.该程序段运行后，变量x 的值是(7)。x=1For i=3 To 1 Step-1x=x

12、+iNext第六套1.将 数 学 表 达 式写 成 visualBasic 表达式，正确的是（D）AInt(b*b-4*a*c)B.Str(b*b-4*a*c)C.Abs(b*b-4*a*c)D.Sqr(b*b-4*a*c)2.某算法的流程图如下所示：若输入 a、b的值分别为 8、10，则该算法的输出结果为（C）。A-0.25B-0.2C.0.25D.0.23.某 visua1Basic 程序如下：PrivateSub Form_Click()Dim IAs Single,J As IntegerI=0DoI=I+1J=I+2Loop I=3Label1.Caption=JEnd Sub运行程

13、序，单击命令技钮 Form后弹出如图所示的出错信息提示，此时程序正执行的语句是（B）。A.Label1.Caption=JB.Loopl=3C.Dim I As Single,J As IntegerD.Do4.在 visualBasic 代码编辑窗口中，输入了“command1.”后出现了如图所示的信息：其中的“caption”是 command 的（C）A 方法 B 事件名C 属性名D 对象名5.在 Visual Basic 中,如果给变量 a、b 都赋值为 3，则下列语句正确的是（D）。A.b=a=3B.a=3;b=3C.a=b=3D.a=3:b=36.在 VB 中，表达式 Right(

14、VB 程序设计”,2）的结果是(设计)7.在 VB 中，表达式 Sqr(4）-1 的结果是(1)。8.下列程序段中，循环体执行的次数是(0)次。x=0For y=1 TO 10 Step-1x=x+1Next y9.有如下程序段：s=0For x=1 To 9 Step _s=s+xNext x要使循环体语句 s=s+x 执行 5 次，循环变量的步长值应该是(2)。10.以下程序段，执行后x 的值为(6)。a=5lfa=5 Thenx=6Elsex=5End if第七套1.某 visualBasic 程序如下：PrivateSub Command1 _Click()Dim I As Integ

15、er,J As IntegerJ=OFor I=1 T0 3J=J+1Next JText1.Text=JEnd Sub运行程序，单击命令按钮Command1 后弹出如图所示的出错信息提示，此时程序正执行的语句是（C）。A.Text1.Text=二 JB.J=J+1C.Next JD.Dim I As Integer,J As Integer2.在 VisualBasic 中,表示鼠标单击的事件名是（C）。A.KeyPressB.LoadC.ClickD.DblClick3.下列运算结果中，值最大的是（C）A.3/4B.4 mod 3C.3 mod4D.344.下列图标中不是VB 的标准控件图

16、标的是(B)A BCD5.有流程图如下所示：该算法的输出结果为（B）A.5B.8C.9 D.36.下列程序段循环体执行的次数为(2)次。x=1Do While x 9x=x*3Loop7.表达式 05 or 3 b ThenM=aElsem=bEnd If7.在 VB 中执行以下程序段结束后i的值是(5)For i=1 To 4 Step 2Print“VB”Next i8.在 VB 中，表达式 Int(Abs(-3.6)）的结果是(3)9.在 VB 中，表达式 Len(12345 ）的结果是(5)。10.有如下程序段S=0:x=2Ifx=1 thens=8End If该程序段运行后，变量S

17、的值为(0)第九套某 VisualBasic 程序如下：PrivateSub Command1-Click()Dim I As Integer,J As IntegerJ=1For I=1 To 30 Step lJ=J*INextPrintJEnd Sub引起程序运行时出现的“溢出”错误，应更正的地方是（B）才能使程序运行通过。AI AsInteger应改为 I asLongB J As Integer应改为 J AsDoubleC Next 应改为 Next IDStep 1 应省略不写2.在 Visual Basic 中，语句 Text1.Text=”高一（1)”中的 Text 是（D）

18、。A 对象名 B 窗体名C 属性值 D 属性名3.下列语句中，可以说明 x 是偶数的是（B）。A.x/2=int(x)/2B.x/2=int(x/2)C.Sqr（x）=x/2D.x/2=abs(x)4.某算法的流程图如下所示：当输入 a 和 b 的值分别为 3、6 时，该算法的输出结果为（A）。A.8 B.9 C.6 D.35.代数式写成 VB 表达式正确的是（C）。A.1/(b+Sqr（c)B.1/babs(c)C.1/(b+abs(c)D.1/b+Sqr（c)6.下面一段 VB 程序运行后，y 的值为(0)。x=1:y=0Do Untilx=0.5 thens=1Elses=0End if

19、该程序运行后，s 的值是(1)。9.在 VB 中，表达式 Sqr(Abs（-4)）的结果是(2)。10.当变量 a=3.14,b=10 时，执行语句C=Int(a)+b后，变量 c 的值是(13)第十套某算法的流程图如下所示：依次输入 x 的值为 5、3、0后，该算法的输出结果为（B）。A.5 B.8 C.3 D.22.下面的表达式的值为“on”的是（D）。A.Mid(“only”,2,2)B.Right(“cartoon”,3)C.Len(“on”)D.Mid(“cartoon”,6,2)3.某 VisualBasic 程序如下:PrivateSub Command1-Click()Dim

20、iAs Integer,sum As Integersum=OI=0DOUntilI=10I=I+2sum=sum+ILoop IText1.Text=sumEnd Sub运行程序，单击命令按钮Command1 后弹出如图所示的出错信息提示，此时程序正执行的语句是（B）。A sum=sum+IB Loop IC DOUntilI=10 D sum=O在 VisualBasic中，某对象的属性窗口如下图所示：该对象名是（B）。A.AppearanceB.Command_1C.CommandButton D.Command15.下列表达式中，符合VisualBasic 表达式书写规范的是（A）A.

21、k*2-1B.3+k-1C.2k-1D.a.k/26.在 VB 中以下程序段执行结束后循环变量I 的值是(4)For I=1 To 3J=J+1Next I7.条件语句中的条件Not 2*511 的逻辑值是(False)（填写 False 或 True)8.函数 Fix（-3.6）运行结果是(-3)9.有如下 VisualBasic 程序段：a=4b=5a=a/2C=Abs(a-b)该程序段运行后，变量C 的值为(3)。10.有如下 VisualBasic 程序段：w=9a=90b=50Ifw10 or a*b 4000 ThenLabel1.Caption=“托运“ElseLabel1.Caption=”携带”End If该程序段运行后，在标签 Label1 上显示的是(托运)