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

“在一个算法的步骤序列中，执行完一个处理步骤后，顺序执行紧跟着的下一个处理步骤。”这种算法模式称为（A）顺序模式（B）选择模式（C）循环模式（D）树型模一、变量或数组变量的定义考点：1.变量名命名规则：必须以字母、汉字、数字或下划线组成，但不能以数字开头不能使用VB中的关键字，如IF、Then、Loop，不与函数名同名，如Int、Len等2.变量类型：整数型、长整型、单精度、双精度、字符串、布尔型、日期型、字符型3.数组变量定义及类型在VisualBasic中，下列能作为变量名的是A.MyB.IfC.a+yD.2nd在VisualBasic中，以下可作为合法变量名的是（）[e-mail].2ab在VisualBasic中，用变量code存储数据“HN2012”，下列说明语句正确的是A.DimcodeAsIntegerB.DimcodeAsSingleC.DimcodeAsStringD.DimcodeAsBoolea在VisualBasic程序中要用到存储范围为-150000～150000的某一整数变量，则该变量的类型应该定义为（A）Integer（B）Long（C）Single（D）Boolea在VisualBasic中，定义字符串常量a的正确语句是（A）ConstaAsInteger（B）Consta=helloAsString（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．NameB．CaptionC．FontD．Visible在VisualBasic中，语句Command1.Font=隶体中的“Command1”是（）A.对象名B.属性名C.属性值D.窗体名在VisualBasic中，语句List_11.AddItemhello中的“AddItem”是（A）对象名（B）方法名（C）属性值（D）事件在VB中，x=1，y=－1,则表达式x=y的值为A．1B．-1C．TrueD．False下列VisualBasic表达式中，值最大的是（A）3Mod7（B）3/7（C）3\7（D）7Mod3在VisualBasic中，表达式13\5Mod4的值是（A）1（B）2（C）3（D）4下列VB表达式的值最大的是（）A．10Mod5B．5Mod10C．10/5D．5/10设X=5678,能得到其百位上数字“6”的正确表达式是(）A．XMod100B．X\100Mod10C．X\100Mod100D．X\10Mod10将数学表达式写成VisualBasic表达式，正确的是A.Int(Abs(ab–c*c)B.Sqr(Abs(ab–c*2)C.Int(Abs(a*b–c*c)D.Sqr(Abs(a*b–c*c)将数学表达式152yy写成VisualBasic表达式，正确的是（A）y*y+5y+1（B）y^2+5*y+1（C）y*y+5*y（D）Abs(y^2+5*y+1)三、逻辑表达式（条件表达式）下列能表示“x与y都小于10”的VisualBasic逻辑表达式是A.(x10)And(y10)B.x10,y10C.(x10)Or(y10)D.X10:y10下列能表示“x100或者y80”的visualBasic逻辑表达式是A.(x100)and(y80)B.x100,y80C.(x100)or(y80)D.x100:y80下列VisualBasic表达式的值为True的是（）A．1=2B．78〉79C．Len(78)＝Len(中国)D．Mid(abcdef,2,3)=abc四、标准函数使用在VisualBasic中，有整型变量a=5，b＝13,要在标签控件中显示结果为18，则执行下列语句能正确显示结果的是（）A．Label1.caption=Str（a+b）B．Text1.text=Len（a）+Val(b)Ｃ.Text1.text=Sqr(a+b)D．Label1.caption=Str（a）+Str（b）计算表达式Val(10)+Len(2AB)的值是（）A.12B.13C.102D.102AB在VisualBasic中，表达式Abs(－3.6)*Sqr(100)的值是A.36B.360C.－36D.－360下列VisualBasic表达式的值等于56的是（A）Mid(1234567,5,3)（B）Len(55)+1（C）Sqr(56)（D）Abs(-55)+1字符串变量st的值为“ZheJiangTongXiang”，下列VB表达式的值为“TongXiang”的是()A．Mid(st,9,8)B．Mid(st,9,4)+XiangC．Mid(st,13,5)D.Tong+Mid(st,13,5)产生[1，40]范围内某一随机整数的表达式是（A）Rnd*40（B）Int(Rnd*40)（C）Int(Rnd*40)+1（D）Int(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=aB.a=a+ba=a-bb=a-bC.t=aa=bb=tD.IfabThena=bElseb=aEndIf若x=1，执行语句Ifx3Theny=1-xElsey=1+x后，变量y的值是（A）0（B）1（C）2（D）3“如果条件表达式x≥y≥0成立，那么i=i+1”。能实现该功能的VB语句是()A．ifx≥y≥0theni=i+1B.ifx≥yandy≥0theni=i+1C.ifx=yorx=0theni=i+1D.ifx=yandy=0theni=i+1有如下VB程序段：x=a(1)Fori=2to50Ifa(i)xThenx=a(i)Nexti该程序段执行后，变量x中存储的是（）A．累加值B．计数值C．最小值D．最大值某同学编写了如下VisualBasic程序段：Dimx,yAsIntegerx=2y=20DoWhilexyx=x^2Loop运行这段程序段，循环体的循环次数为（）A．4B．3C．2D．0下面是一段VisualBasic程序：PrivateSubCommand1_Click()DimsumAsDouble，iAsIntegersum=0Fori=1To5sum=sum+i*iNextiText1.Text=Str(sum)EndSub该程序运行后，语句sum=sum+i*i共执行了几次A．5B．4C．55D．25某算法的流程图及其编写中的VisualBasic代码如下图所示。分析流程图，在代码窗口中①处应填写的代码正确的是A.DoWhilea≥30a=a*(1-0.2)n=n+1LoopB.DoWhilea=30a=a*(1-0.2)n=n+1LoopC.DoWhilea=30D.DoWhilea=30a=a(1-0.2)n=n+1Loopa=a*(1-0.2)n=n+1Next某算法的部分程序代码与其相对应的流程图分别表示如下：程序代码流程图则代码中①和②处应填入的是（A）①i=1To10②s=s*i（B）①i=1To10②s=s+i（C）①i=1To10Step2②s=s+i（D）①i=1To10Step2②s=s*i有10个数据100、15、28、70、80、12、10、200、6、50依次存放在数组d(1to10)中，使用如下程序段找出最小值：(讲解视频:“xzt2014零距离04-6VB数组.mp4”)当方框内的语句刚好执行完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+1LoopText3.Text=Str(s)A．s=s*jB．s=s+xC．s=x*jD．s=s*xPrivateSubCommand1_Click()DimiAsIntegerDimsAsLongs=1For①②NextiLabel1.Caption=Str(s)EndSub某同学编写一个可输出1到100之间所有偶数之和的VisualBasic程序，部分程序如下：PrivateSubCommand1_Click()DimxAsSingleForI=0To100If____Thenx=x+IEndIfNextIPrintxEndSub横线上应填写的正确语句是（）A.xMod2=0B.xMod20C.iMod2=0D.IMod20