VB基础练习及参考答案

【知识点:基本数据类型、常量和变量】下列数据中，在VB中用长整型(long)表达最恰当的是（

）A．宇宙中的原子数目B．一头大象的体重（用吨表达）C．姚明的身高（用厘米表达）D．200注体育彩票头奖奖金（1000万/注）下列数据的类型属于Boolean逻辑型的是（）A．2.1E38B．30000C．FalseD．有以下程序段：x=5:y=6p=Not(x+y=11)该程序段运行后，P的数据类型和值分别是（）A．Integer11B．Long11C．BooleanFalse在VB中，下列能作为变量名的是（）A．TrueB．Big@5C．_NBAD．StuName_1在VB中定义重力加速度g为常量，其值为9.8，下列定义对的的是（）A．dimgas9.8B．dimg=9.8C．constgas9.8D．constg=9.8VB原则函数Val(x)的作用是（）A．求x的整数值B．求e的x次方C．数字字符串x转换成数值D．数值x转换成字符串字符串变量x的值为“student”，要从中取出子串“den”，适合的VB函数体现式是（）A．Val（x，4,3）B．Str（x,4,3）C．copy（x,4,3）D．Mid(x,4,3)在VB中，若x=3.14159,下列体现式的值最大的是（）A．Abs（x）B．fix（x）C．int（x）D．Abs(int（x）)在VB中，要定义一种二维数组a，用于存储10行10列的五子棋棋谱，数组元素的值为“Black”代表黑子，为“White”代表明子，为“Zero”代表空子，则对的的数组定义语句是（）A．Dima(1To10，1to10)AsSingleB．Dima(1To10，1to10)AsStringC．Dima(1，10；1，10)AsStringD．Dima(10，10)AsInteger定义一种二维数组，dimStu(0to10,-1to1)asInteger，则该数组定义了多个相似类型的变量（）A．20B．33C【知识点：基本运算和体现式】在VB中，下列体现式的运算成果最大的是（）A．x=4/3B．x=4\3C下列基本运算中，运算优先级最高的是A．ModB．\C．>=D．Not体现式-1+4^2Mod2*3的值是（）A．3 B．-1 C．0 设一种三位整数n,它的个位数字是c，十位数字b,百位数字是a,则b的体现式是（）A．n-a-cB．n-a*100-cC．n\10-n\100*10D．n\10-(n\100)*10匀加速直线运动位移公式是，该公式的VB体现式是（）A．s=v0t+1/2at^2B．s=v0*t+1/2*at^2C．s=v0t+1/2*at^2D．s=v0*t+1/2*a*t^2在VB中，若x是不不大于零的偶数，则下列体现式值一定为真的是（）A．xMod2=1B．x\2=0C．x/2=x\2在VisualBasic中，若a、b都是正整数且关系体现式a*bMod2=0为真，则下列说法对的的是()A．a、b一定同时为奇数B．a、b中必有一种为偶数C．a、b中必有一种为奇数D．a、b一定同时为偶数设a=2,b=3,c=4,d=5,体现式2*a>cora>bandd>c的值是()A．trueB．falseC．tureD．flase如果x=4，y=6,那么下列运算成果为True的体现式是（）A．(x<=4)and(y>6)B．(x<4)or(y>6)C．not(x>=4)and(x>=6)D．not(x+y<>10)【知识点：基础语句】要使得变量a和b的值都赋值为1，下列属于对的语句是（）A．a，b=1B．a=1，b=1C．a=b=1D.将文本框Text1的数据赋值到数值型变量n中，对的语句是（）A．n=text1B．n=text1.textC．n=text1.textD.n=val(text1.text)北京大学自主招生,只有测试成绩达成录用分数线才干录用；鉴定一种学生能否被录用，最适合的程序语句是（）A．赋值语句B．选择语句C．循环语句D.注释语句对于VB语句IFa=100Thenn=n+1Elsen=n-1，下列说法对的的是（）A．a=100为赋值语句B．n=n+1和n=n-1均为关系体现式C．n=n+1和n=n-1均为赋值语句D．n=n+1为关系体现式，n=n-1为赋值语句有以下VB程序段：x=5:y=-4IFnot(x+y=1)Thenx=y-3Elsey=x+3该程序段运行后，x的值为()A．-7B．8C．0有以下VB程序段:a=3:b=27:c=13 IFb>10ThenIFc<=10Thena=4Elsea=b Else a=5 endIF 该程序执行后，a的值为()A．27B．4C．5D．有以下VB程序段：Fori=to4step1k=k+iNexti要使循环体k=k+i执行5次，循环变量的初值是A．-2B．-1C．0有以下VB程序段：a(10)=10Forx=9To1Step-1a(x)=a(x+1)+1Nextx该程序段运行后数组元素a(7)的值为（）A．8B．9C．11D．13运行以下VisualBasic程序，单击命令按钮Command1，出现如图所示的出错信息。发生"下标越界"错误时所执行的语句是PrivateSubCommand1_Click()Dima(0To5)AsIntegerDimiAsInteger'①a(0)=1'②Fori=1To5a(i)=a(i-1)+a(i+1)'③NextiText1.Text=Str(a(5))'④EndSub第10题图第10题图A．①B．②C．③D．④下列程序段中，循环体执行的次数为()y=2 DoWhiley<=8 y=y+y LA．2B．3C有以下VB程序段:DimiAsInteger,sAsLongs=0：i=1DoWhilei<=16s=s+ii=i*2LoopText1.Text=Str(s)该程序段运行后文本框text1显示的内容是（）A．15B．16C．31有以下VB程序段：Dima(1To10)AsIntegerPrivateSubCommand1_Click()a(1)=1:a(2)=1Fori=3To10a(i)=a(i-2)+a(i-1)Nextij=0:Sum=0DoWhileSum<=88j=j+1Sum=Sum+a(j)LoopEndSub该程序段运行后变量j的值为（）A．10B．9C．8D．88下列程序运行之后的变量Pos值是（）Dima(1to10)asintegerPos=-1Fori=1to10IFimod2=0Thena(i)=i*2Elsea(i)=iNextiFori=10to1step-1IFa(i)=12ThenPos=iNextiA．1B．2C．6下列VB程序的功效是：计算体现式1+31+32+33+……+39