VB单选题(第4章).doc

243以下()程序段可以实施X、Y变量值的变换.A)Y=X:X=YB)Z=X:Y=Z:X=YC)Z=X:X=Y:Y=ZD)Z=X:W=Y:Y=Z:X=Y答案C244以下声明语句中错误的是().A)Const var1=123B)Dim var2=ABCC)DefInt a-zD)Static var3 As Integer答案B245在窗体Form1的Click事件过程中有以下语句:Label1.Caption=Visual Basic若本语句执行之前,标签控件的Caption属性为默认值,则标签控件的Name属性和Caption属性在执行本语句之前的值分别为().A)Label、LabelB)Label1、Visual BasicC)Label1、Label1D)Caption、Label答案C246在一个语句行内写多条语句时,语句之间应该用()分隔.A)逗号B)分号C)顿号D)冒号答案D247执行下面的程序段后,x的值为().x=5 For i=1 To 20 Step 2 x=x+i5 Next i A)21B)22C)23D)24答案A248循环结构For I%= -1 to 17 Step 2 共执行()次.A)5B)6C)8D)9答案D249由For k=10 to 0 step 3:next k循环语句控制的循环次数是().A)12B)0C)-11D)-10答案B250由For k=35 to 0 step 3:next k循环语句控制的循环次数是().A)0B)12C)-11D)-10答案A251下列多分支选择结构的Case语句,写法错误的是().A)Case 1,5,7,9B)Case 8 To 12C)Case Is bc 后,窗体上显示的是().A)TrueB)FalseC)1D)出错信息答案B260语句PRINTINT(-13.2)=;INT(-13.2)的输出结果为().A)INT(-13.2)=-13.2B)INT(-13.2)=13.2C)INT(-13.2)=-13D)INT(-13.2)=-14答案D261设a=6,则执行x=IIf(a5,-1,0)后,x的值为().A)5B)6C)0D)-1答案D262下列对变量的定义中,不能定义A为变体变量的是().A)DIM A AS DOUBLEB)DIM A AS VARIANTC)DIM AD)DIM A,B AS DOUBLE答案A263以下的vb 常量中非法的是().A)Good LuckB)PIC).0015D)16.3412答案B264MSGBOX函数中有4个参数,其中必须写明的参数是().A)指定对话框中显示按钮的数目B)设置对话框标题C)提示信息D)所有参数都是可选的答案C265下列赋值语句正确的是().A)Text1.text=Text.text+Text2.textB)T=Text1.Name+Text2.NameC)Text1.Caption=Text1.Caption+Text2.CaptionD)Text1.Enable=Text1.Enable+Text2.Enable答案A266通过代码在运行时设置属性的语法格式为_.A)对象名=属性 .新值B)对象名.属性=新值C)对象名.新值=属性 .新值D)对象名.属性=属性 .新值答案B267下列程序段的运行结果. Private Sub Form_Click() Dim Msg Hide Msg=选择确定按钮 MsgBox Msg Show End SubA)隐藏窗体,按确定按钮使窗体重现B)隐藏窗体C)显示窗体,按确定按钮使窗体隐藏D)显示窗体答案A268运行下面程序后,在窗体中显示的是_. Private Sub Form_Click() a$=*: b$=$ For k=1 To 3 x$=String$(Len(a$)+k,b$) Print x$; Next k Print End SubA)* * *B)*$*$*$C)1*$2*$3*$D)$答案D269以下程序的循环次数是_. Private Sub Command1_Click() For j=8 To 35 Step 3 Print j; Next j End SubA)10B)9C)27D)8答案A270设x=4,y=6,则以下不能在窗体上显示出A=10的语句是A)Print A=x+yB)PrintA=;x+yC)Print A=+Str(x+y)D)PrintA=&x+y答案A271下来程序段执行结果为 x = 5y = -6if not x 0 then x = y 3Else y = x + 3endifprint x - y;y - x A)-3 3B)5 -9C)3 -3D)-6 5答案A272当输入4时,以下程序的输出结果是_. Private Sub Command1_Click() x=InputBox(x) If x215 Then y=x2+1 Print y End SubA)4B)17C)18D)25答案B273InputBox函数的返回值的类型为_.A)数值B)字符串C)逻辑值D)日期值答案B274以下_不能作为VB中的变量名.A)Abx45B)P1234C)89TasFFD)xy答案C275执行下面程序段后,变量c$的值为_ _. a$= Visual Basic Programming b$= Quick c$=b$ & Ucase(Mid$(a$,7,6) & Right$(a$,12)A)Visual BASIC ProgrammingB)Quick Basic ProgrammingC)QUICK Basic ProgrammingD)Quick BASIC Programming答案D276执行下面程序段后,变量a的值为_. For I=1 To 3 For j=1 To I For k=j To 3 a=a+1 Next k Next j Next IA)3B)9C)14D)21答案C277以下程序的输出结果是_. Private Sub Command1_Click() a=100 Do s=s+a a=a+1 Loop Until a100 print a End SubA)100B)120C)201D)101答案D278下面程序运行时,内层循环的循环总次数是 . For m = 1 To 3 For n = 0 To m 1 Next n Next mA)4B)5C)6D)7答案C279以下合法的一组Visual Basic用户标识符是A)Sum 和 8abcB)Const 和 DoWhileC)a#x 和 PiD)ForLoop 和 Total答案D280在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Static x As Integer Cls y = y + 2 x = x + 2 Print x, yEnd Sub程序运行后,连续四次单击Command1按钮后,窗体上显示的是 A)8 8B)8 2C)2 8D)2 2答案B281下面程序段输出的结果是Private Sub Command1_Click() x = 8 For i = 0 To 20 Step 5x = x + iNext Print X=; xEnd SubA)X=210B)X=218C)X=50D)X=58答案D282设有如下变量声明Dim TestDate As Date为变量TestDate正确赋值的表达方式是A)TestDate=#1/1/2008#B)TestDate=#1/1/2008#C)TestDate=date(1/1/2008)D)TestDate=Format(m/d/yy,1/1/2008)答案A283设有如下程序:Private Sub Command1_Click() Dim sum As Double,x As Double sum = 0 n = 0 For i = 1 To 5 x = n / i n = n + 1 sum = sum + x NextEnd Sub该程序通过For循环计算一个表达式的值,这个表达式是A)1+1/2+2/3+3/4+4/5B)1+1/2+2/3+3/4C)1/2+2/3+3/4+4/5D)1+1/2+1/3+1/4+1/5答案C284在一个语句内写多条语句时,用来分隔每条语句的符号是().A),B):C)、D);答案B285一句语句要在下一行继续写,续行符是().A)+B)-C)_D)答案C286VB提供了结构化程序设计的3种基本结构,这3种基本结构是A)递归结构,选择结构,循环结构B)选择结构,过程结构,顺序结构C)过程结构,输入、输出结构,转向结构D)选择结构,循环结构,顺序结构答案D287下面正确的赋值语句是A)x+y=30B)y=*r*rC)y=x+30D)3y=x答案C288为了给x,y,z这3个变量赋初值3,下面正确的赋值语句是A)x=3:y=3:z=3B)x=3,y=3,z=3C)x=y=z=3D)xyz=3答案A289赋值语句:b=12+MID(1234,3,2)执行后,b变量中的值是A)12334B)123C)34D)46答案D290下面程序段: Dim m m=Int(Rnd()+1)+5Select Case m Case 6 Print优秀Case 5Print良好Case 4Print通过Case ElsePrint不通过End Select显示的结果是A)优秀B)良好C)通过D)不通过答案A291以下正确的ForNext结构是A)For x = 5 Step 10Next xB)For x=3 To -3 Step -3Next x C)For x=1 To 10start: Next x If i=10 Then GoTo startD)For x=3 To 10 Step 3Next m答案B292下列循环能正常结束循环的是A)i=5Doi=i+1Loop Until i0B)i=1Doi=i+2Loop Until i=10C)i=10Doi=i+1Loop Until I0D)i=6Doi=i-2Loop Until I=1答案C293下面程序段：For I=3 To 1 Step -1Print Spc(5-i)；For j=1 To 2*I-1Print *；Next jPrintNext i的运行结果为A)图1B)图2C)图3D)图4答案D294下列程序：Private Sub Textl _Change()Print Textl；End Sub当在文本框输入1234这4个字符时，窗体上显示的是A)1234B)1234C)1121231234D)1121231234答案C295不能分别正确显示1!、2!、3!、4!值的程序段是A)For I=1 To 4N=1For j=1 To I N=n*jNext jPrint nNext iB)For I=1 To 4For j=1 To in=1n=n*jNext jPrint nNext iC)n=1For j=1 To 4 n=n*jPrint nNext jD)n=1j=1Do While j=4 n=n*jPrint nj=j+1Loop答案B296下面程序段：Dim yIf y Then Print y+1 Else Print y+2运行后，显示的结果是A)2B)0C)-1D)显示出错信息答案A297语句If x=1 Then y=1,下列说法正确的是A)x=1和y=1均为赋值语句B)x=1和y=1均为关系表达式C)x=1为关系表达式,y=1为赋值语句D)x=1为赋值语句, y=1为关系表达式答案C298下面语句print Format(32548.5,000,000.00)输出结果是：A)32548.5B)32，548.5C)032，548.50D)32，548.50答案C299执行了下面的程序： Sub Form_Click()For i=1 To 6 List1.AddItem iNextFor i=1 To 3 List1.RemoveItem iNextEnd Sub列表框中的数据项为A)1,5,6B)2,4,6C)4,5,6D)1,3,5答案D300执行以下程序段后，变量c的值为() a=Visual Basic Programing:b=Quickc=b & UCase(Mid(a,7,6) & Right(a,11)A)Visual BASIC ProgramingB)Quick Basic ProgramingC)QUICK Basic ProgramingD)Quick BASIC Programing答案D301以下语句的输出结果是() 。Print Format (32548.5,000,000.00) A)32548.5B)32,548.5C)032,548.50D)32,548.50答案C302执行以下程序段后,变量c的值为()a=Visual Basic Programing : b=Quick c=b