搜索
1VisualBasic语言基础一、单选题1．在一行内写多条语句时，每个语句之间用________来分隔。A），B）：C）、D）；2．下面________是合法的变量名。A）X_yxB）123abcC）integerD）X-Y3．下面________是不合法的整常数。A）100B）&O100C）&H100D）%1004．下面________是合法的字符常数。A）ABC$B）ABCC）'ABC'D）ABC5．下面________是合法的单精度型变量。A）num!B）sum%C）xint$D）mm#6．下面________是不合法的单精度常数。A）100!B）100.0C）1E+2D）100.0D+27．表达式16/4-2^5*8/4MOD5\2的值为________。A）14B）4C）20D）28．数学表达式3≤x＜10在VB中的逻辑表达式为________。A）3=x10B）3=xANDx10C）x=3ORx10D）3=xAND109．与数学表达式ab/3cd对应，不正确的VB表达式为________。A）a*b/(3*c*D）B）a/3*b/c/dC）a*b/3/c/dD）a*b/3*c*d10.RND函数不可能是下列________值。A）1B）0C）0.123D）0.0000511.Int(198.55*100+0.5)/100的值为________。A）198B）199.6C）198.55D）20012.Int(198.555*100+0.5)/100的值为_______。A）198B）199.6C）198.56D）20013.PrintDateAdd(m，1，#1/30/2000#)语句显示的结果为________。A）00-2-29B）00-2-28C）00-2-30D）00-1-3114.表达式DateDiff(y，1，#12/30/1999#，#1/13/2000#)的结果为________。A）1B）11C）14D）9915.表达式Len（123程序设计ABC）的值是________。A）10B）14C）20D）1716.表达式LenB（123程序设计ABC）的值是________。A）10B）14C）20D）1717.下面正确的赋值语句是________。A）x+y=30B）y=p*r*rC）y=x+30D）3y=x18.为了给x，y，z三个变量赋初值1，下面正确的赋值语句是________。A）x=1:y=1:z=1B）x=1,y=1,z=1C）x=y=z=1D）xyz=119.赋值语句：a=123+MID(123456,3,2)执行后，a变量的值是是________。A）“1234”B）123C）12334D）15720.赋值语句：a=123&MID(123456,3,2)执行后，a变量的值是是________。A）“12334”B）123C）12334D）15721.表达式12000+123&100的结果为________。A）12000123100B）出错C）12123100D）1222322.表达式String(3,ABCDED)的值为________。A）CB）ABCC）ABCD）AAA23.表达式InStr(3,EFABCDEFG,EF)的值为________。A）1B）7C）2D）“EF”24.以下合法的VisualBasic标识符是______。A）ForLoopB）ConstC）6abcD）b#x25.VisualBasic中的数值可以用十六进制或八进制表示，十六进制数以&H开头，八进制数以______开头。A）$OB）&OC）$ED）&E26.设有如下声明：DimXAsInteger如果Sgn（X）的值为-1，则X的值是______。A）整数B）大于0的整数C）等于0的整数D）小于0的数27.产生[5，46]之间随机整数VB表达式是______。A）Int(Rnd(1)*42)+6B）Int(Rnd(1)*42)+5C）Int(Rnd(1))+41D）Int(Rnd(1)*41)+528.设a=VisualBasic,下面使b=Basic的语句是_______。A）b=Left$(a,8,5)B）b=Right$(a,5,5)C）b=Mid$(a,8,5)D）b=InStr(a,8)29.表达式Int(-17.8)+Sgn(17.8)的值是______。A）18B）-17C）-18D）-1630.表达式Val(.123E2CD)的值是______。A）123B）0C）12.3D）123E2CD31．设a=5，b=10，则执行c=int((b-A）*Rnd+A）+1后，c值的范围为______。A）5～10B）6～9C）6～10D）5～932.设有如下变量声明DimTestDateASDate能为变量TestDate正确赋值的是______。A）TestDate=#1/1/2007#B）TestDate=#1/1/2007#C）TestDate=date(1/1/2007)D）Testdate=Format(m/d/yy,1/1/2007)33.在窗体中添加一个命令按钮，并编写如下程序：PrivateSubCommand1_Click()a%=2/3b%=32/9Printa%,b%EndSub运行下列程序，输出结果为______。2A）04B）03C）13D）1434.以下关系表达式中，其值为False的是______。A）ABCAbCB）thetheyC）VISUAL=UCase(Visual)D）IntegerInt35.若N=365，下述的语句中______显示的值是33。A）Printn-Int(n/100)*100B）PrintInt(n/10)-Int(n/100)*10C）PrintInt(n/10)-Int(n/100)D）PrintInt(n-Int(n/10)*10)/1036.表达式2*3^2+2*8/4+3^2的值为______。A）64B）31C）49D）2237.表达式Str(Len(1234))+Str(5.9)的值为______。A）45.9B）45.9C）12345.9D）12345.938.语句Print5/4*6\5Mod2的输出结果是______。A）0B）1C）2D）339.表达式2+3*4^5+Sin(x+1)/2中最先进行的运算是______。A）4^5B）3*4C）x+1D）Sin()40.表达式A%*B&-D#\3.0+F!的结果是______。A）整型B）长整型C）单精度型D）双精度型41.如果x是一个正实数，对x的第3位小数四舍五入的表达式是______。A）0.01*Int(x+0.005)B）0.01*Int(100*(x+0.005))C）0.01*Int(100*(x+0.05)D）0.01*Int(x+0.05)42.表达式Int(8*Sqr(36*(10^(-2))*10+0.5))/10的值是______A）1B）16C）1.6D）0.1643.若N=235，下述的语句中______显示的值为3。A）PRINTN-INT（N/100）*100B）PRINTINT（N/10）-INT（N/100）*10C）PRINTINT（N/10）-INT（N/100）D）PRINTINT（N-INT（N/10））/1044.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()a$=VisualBasicPrintString(3,a$)EndSub程序运行后，单击命令按钮，在窗体上显示的内容是______。A）VVVB）VisC）sicD）ll45.函数String(n,str)的功能是______。A）把数值型数据转换为字符串B）返回由n个字符组成的字符串C）从字符串中取出n个字符D）从字符串中第n个字符的位置开始取子字符串46.以下程序段在立即窗口中输出______。A=yourB=snameC=iscrPrintRight(A,3)Picture1.PrintMid(B,2,4)Debug.PrintLeft(C,2)A）nameB）ourC）isD）ournameis47.设a=MicrosoftVisualBasic，则以下使变量的b值为VisualBasic的语句是______。A）b=Left(a,10)B）b=Mid(a,10)C）b=Right(a,10)D）b=Mid(a,11,10)48.设a=10,b=5,c=1,执行语句Printabc后，窗体上显示的是______。A）TrueB）FalseC）1D）出错信息49.设x=4，y=6，则以下不能在窗体上显示出A=10的语句是______。A）PrintA=x+yB）PrintA=;x+yC）PrintA=+Str(x+y)D）PrintA=&x十y50.下面表达式中,______的运算结果与其他三个不同。A）Exp(-3.5)B）Int(-3.5)+0.5C）-Abs(-3.5)D）Sgn(-3.5)-2.551.设a=5,b=4,c=3,d=2，下列表达式的值是_______32*bOra=cAndbcOrcdA）1B）TrueC）FalseD）252.设a=MicrosoftVisualBasic,则以下使变量b的值为VisualBasic的语句是_______。A）b=Left(a,10)B）b=Mid(a,10)C）b=Right(a,10)D）b=Mid(a,11,10)53.假定有如下的窗体事件过程：PrivateSubForm_Click()a$=MicrosoftVisualBasicb$=Right(a$,5)c=Mid(a$,1,9)MsgBoxa$,34,b$EndSub程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是_______。A）MicrosoftVisualB）MicrosoftC）BasicD）3454.在窗体上画一个文本框，然后编写如下事件过程：PrivateSubForm_Click()x=InputBox(请输入一个整数)Printx+Text1.TextEndSub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容是_______。A）123B）456C）579D）12345655.可以同时删除字符串前导和尾部空白的函数是_______。A）LtrimB）RtrimC）TrimD）Mid56.\、/、Mod、*四个算术运算符中，优先级别最低的是_______。3A）\B）/C）ModD）*57.在VisualBasic中，日期／时间型常量要用_______括起来A）B）#C）*D）{}58.设a%=20,b$=”30”,则下列输出结果是”2030”的语句是_______。A）Printstr(A）B）Print“a”+bC）Printa+bD）Printa&b59.下列关于变体数据类型的叙述中正确的是_______。A）变体是一种没有类型的数据B）给变体变量赋某一种类型数值后，就不能再赋给另一种类型数值C）一个变量没有定义就赋值，该变量即为变体类型D）变体的空值就表示该变体值为060.表达式Fix(-32.68)+Int(-23.02)的值为_______。A）-55B）-56C）-57D）–5861.在VB中，若要强制变量必须先定义才能使用，应该用_______语句说明。A）PublicConstB）OptionExplicitC）Type数据类型名D）DefDbl62执行以下程序段后，变量c$的值为_______。a$=VisualBasicProgramingb$=Quickc$=b$&UCase(Mid$(a$,7,6))&Right$(a$,11)A）VisualBASICProgramingB）QuickBas