历年浙江信息技术选择题整理之VB基本表达式及常用函数

“在一个算法的步骤序列中，执行完一个处理步骤后，顺序执行紧跟着的下一个处理步骤。”这种算法模式称为(A)顺序模式 (B)选择模式 (C)循环模式 (D)树型模一、变量或数组变量的定义考点：1.变量名命名规则：必须以字母、汉字、数字或下划线组成，但不能以数字开头不能使用VB中的关键字，如IF、Then、Loop，不与函数名同名，如Int、Len等.变量类型：整数型、长整型、单精度、双精度、字符串、布尔型、日期型、字符型.数组变量定义及类型在VisualBasic中，下列能作为变量名的是A.MyB.IfC.a+yD.2nd在VisualBasic中，以下可作为合法变量名的是( )A.Count_2sB.Text@123C.Chr D.2ab在VisualBasic中，用变量code存储数据“HN2012”，下列说明语句正确的是A.DimcodeAsInteger B.DimcodeAsSingleC.DimcodeAsString D.DimcodeAsBoolea在VisualBasic程序中要用到存储范围为-150000〜150000的某一整数变量，则该变量的类型应该定义为Integer (B)Long (C)Single(D)Boolea在VisualBasic中，定义字符串常量a的正确语句是(A)ConstaAsIntegerConsta="hello"AsString(C)DimaAsString(D)Consta="hello”在VisualBasic中，语句Dima(1To10)AsString所定义的数组元素个数是(A)1 (B)9 (C)10 (D)11在VisualBasic中，要定义一个由50个元素构成的一维整型数组cp,下列语句正确的是(A)Constcp(1to50)AsInteger(B)Dimcp(1To50)AsInteger(C)Constcp(1To5)AsInteger(D)DimcpAsIntege二、赋值语句和表达式(学会将代数表达式改写成VB代码中的表达式)在VisualBasic中，如果要在标签Lab上显示文字“注意事项”，则下列语句正确的是(A)Label.Caption="注意事项" (B)Lab.Text="注意事项”(C)Lab.Caption="注意事项" (D)Label.Width="注意事项在VB中，将窗体标题“Form1”改为“中华美食”需设置的属性是( )A.Name B.Caption C.Font D.Visible在VisualBasic中，语句Command1.Font="隶体"中的“。0皿皿2鼠1”是（ ）A.对象名B.属性名C.属性值D.窗体名在VisualBasic中，语句List_11.AddItem"hello"中的"AddItem”是(A)对象名 (B)方法名(C)属性值 (D)事件在VB中，x=1，y=—1，则表达式x=y的值为A.1 B.-1 C.TrueD.False下列VisualBasic表达式中，值最大的是(A)3Mod7 (B)3/7 (C)3\7 (D)7Mod3在VisualBasic中，表达式13\5Mod4的值是TOC\o"1-5"\h\z(A)1 (B)2 (C)3 (D)4下列VB表达式的值最大的是( )A.10Mod5 B.5Mod10C.10/5 D.5/10设X=5678,能得到其百位上数字“6”的正确表达式是( )A.XMod100 B.X\100Mod10C.X\100Mod100 D.X\10Mod10将数学表达式内以 「写成VisualBasic表达式，正确的是Int(Abs(ab-c*c)Sqr(Abs(ab-c*2)TOC\o"1-5"\h\zInt(Abs(a * b - c * c)Sqr(Abs(a * b - c * c)将数学表达式J2+5y+1写成VisualBasic表达式，正确的是(A)y*y+ 5 y + 1 (B) y ~ 2 + 5 * y + 1(C)y*y+ 5 * y (D) Abs(y " 2 + 5 * y+1)三、逻辑表达式(条件表达式)下列能表示“x与y都小于10”的VisualBasic逻辑表达式是A.(x<10)And(y<10) B.x<10,y<10C.(x<10)Or(y<10) D.X<10:y<10下列能表示“x>100或者y>80”的visualBasic逻辑表达式是(x>100)and(y>80)x>100,y<80(x>100)or(y>80)x>100:y>80TOC\o"1-5"\h\z下列VisualBasic表达式的值为True的是（ ）A.1=2 B."78"〉"79"C.Len("78")=Len(“中国") D.Mid("abcdef",2,3)="abc"四、标准函数使用在VisualBasic中，有整型变量a=5b=13,要在标签控件中显示结果为18,则执行下列语句能正确显示结果的是( )A.Label1.caption=Str(a+b)B.Text1.text=Len(a)+Val(b)C.Text1.text=Sqr(a+b) D.Label1.caption=Str(a)+Str(b)计算表达式Val("10")+Len("2AB")的值是( )A.12 B.13 C.102 D.102AB在VisualBasic中，表达式Abs(—3.6)*Sqr(100)的值是A.36B.360C.—36 D.—360下列VisualBasic表达式的值等于56的是(A)Mid("1234567",5,3) (B)Len("55")+1(C)Sqr(56) (D)Abs(-55)+1字符串变量st的值为“ZheJiangTongXiang”,下列VB表达式的值为“丁健8*1298”的是( )A.Mid(st,9,8) B.Mid(st,9,4)+"Xiang"C.Mid(st,13,5) D."Tong"+Mid(st,13,5)产生［1,40］范围内某一随机整数的表达式是Rnd*40Int(Rnd*40)Int(Rnd*40)+1Int(Rnd*39)+1在VB中，下列函数返回值最大的是A.Sqr(9)B.Abs(-3.2)C.int(3.2)D.Len("3.2")已知字符A〜Z的ASCII码值分别对应65〜90。小明编写了一个在标签Label1上显示26个英文大写字母"ABCDE……XYZ”的VB程序。部分程序如下：a=""Fori=65To90NextiLabel1.Caption=a方框中正确的语句是A.a=a+Str(i)B.a=a+Chr(i)C.a=a+Int(i)D.a=a+Asc(i)

五、阅读三种结构（顺序、分支、循环结构）计算长方体体积的算法如下：①输入长方体的长（L）、宽（W）、高（H）的值②计算体积V=L*W*H③输出体积V上述算法属于（A）解析算法 （B）枚举算法 （C）排序算法 （D）递归算法有如下VB程序段：PrivateSubCommand1_Click（）DimsAsStrings=Str（Val（"20"）+Len（"student"））Label1.Caption=sEndSub下列说法正确是A.发生事件的对象名为“Label1" B.这是一个“鼠标单击”事件C.事件过程名为“Command1"D.此程序段里只有一个对象在VisualBasic中，与程序段：a=a+bb=a-ba=a-b功能相同的程序段是A.a=bB.a=a+bb=aa=a-bb=a-bC.t=aD.Ifa>bThena=ba=bb=tElseb=aEndIf若x=1,执行语句Ifx<3Theny=1-xElsey=1+x后，变量y的值是(A)0 (B)1 (C)2 (D)3“如果条件表达式xNyNO成立，那么i=i+1"。能实现该功能的VB语句是( )A. if xNy三0theni=i+1 B. ifxNy andyNO theni=i+1C. if x>=yorx>=0theni=i+1 D. ifx>=y andy>=0 theni=i+1有如下VB程序段：x=a(1)Fori=2to50Ifa(i)<xThenx=a(i)Nexti该程序段执行后，变量x中存储的是A.累加值B.计数值 C.最小值D.最大值该程序段执行后，变量x中存储的是A.累加值B.计数值 C.最小值D.最大值DoWhilex<yx=x-2Loop运行这段程序段，循环体的循环次数为( )A.4 B.3 C.2 D.0下面是一段VisualBasic程序：PrivateSubCommand1_Click()DimsumAsDouble,iAsIntegersum=0Fori=1To5sum=sum+i*iNextiText1.Text=Str(sum)EndSub该程序运行后，语句sum=sum+i*i共执行了几次A.5B.4 C.55 D.25某算法的流程图及其编写中的VisualBasic代码如下图所示。分析流程图，在代码窗口中①处应填写的代码正确的是DoWhilea三30DoWhilea三30a=a*(1-0.2)n=n+1LoopDoWhilea>=30a=a*(1-0.2)n=n+1LoopC.DoWhilea>=30D.DoWhilea>=30

C.DoWhilea>=30D.DoWhilea>=30a=a*(1-0.2)0.2)LoopNext某算法的部分程序代码与其相对应的流程图分别表示如下：程序代码 流程图PrivateSubCommand1_Click()DimiAsIntegerDimsAsLongs=1For a=a*(1-0.2)0.2)LoopNext某算法的部分程序代码与其相对应的流程图分别表示如下：程序代码 流程图PrivateSubCommand1_Click()DimiAsIntegerDimsAsLongs=1For ① ②NextiLabel1.Caption=Str(s)EndSub则代码中①和②处应填入的是(A)①i=1To10②s=s*i(C)①i=1To10Step2②s=s+i有10个数据100、15、28、70、80、12、(B)①i=1To10②s=s+i(D)①i=1To10Step2②s=s*i10、200、6、50依次存放在数组d(1to10)中，使用如下程序段找出最小值：(讲解视频：“zt2014零距离04-6VB数组.mp4”)min=d(l)Fori=2to10Ifd(i)<minthenmin=d(i)Nexti当方框内的语句刚好执行完5次后(此时循环变量i的值为6)，变量min的值是( )A.15B.12C.10D.6以下程序段是实现x*y(x、y均为自然数)运算的程序段，则划线处的语句应该是(x=Val(Text1.Text)y=Val(Text2.Text)s=0:j=1DoWhilej<=yj=j+1Loop