VB选择判断题题库答案

A、2B、3C、4D、58、以下叙述中正确的是（Aa$="54321":b$="abcde"16、下面（DA、99B、3618D、6327，则文本框中显示的内容为（D）A、Txt1.MultiLine=TrueTxt1.ScrollBars=3序代码是（B）A、PrivateSubListl_Click()D、0C、PrivateSubCommand1_C1ick()3.45.8IfiModj=0Thenx=6y=3t=xx=yy=xs=0s=s+ii=i+11.12.23.34.45.56.67.78.89.9A、12B、123C、345D、45B、0i=i+1A、0123B、1234C、0132d=0c=6d=d-cC.callp(10,20)D.p(10,20)a=2b=0b=b+1c=c+2f=a+b+ca=a+bb=aa=a*b19.下列程序的运行结果是（CC."text(.text)||(*.text)"D."text(.text)(*.text)"14.窗体设计器的作用是（A，则文本框中显示的内容为（D）7.窗体的MouseDown事件过程Form_MouseDown(ButtSingleAsInteger,ShiftAsPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsB、kKx=1A、form1C、model2D、model2A、PrivateSubDir1_Change()C、PrivateSubDir1_Change()程序段是（C）执行的操作是（C）TypeBooksC、PrivateSubCommand1_Click()D、PrivateSubCommand1_Click()(A).cls(B).frm(C).bas(D).rec(A)x!(B)x#DimS1AsString*5(A)VBTest(A)x_y(B)x-y(A)x!(B)x#(B)Public(C)Static(D)Private(A)Integer(B)String(C)Variant(D)Single(A)1(B)True(C)False(B)2/3(A)*(B)^(C)/表达式2=3<1的是（）。(A)0(B)1(D)False(A)0<x<10(B)x>0Andx<10(C)x>0Orx<10(D)x>0:x<10(A)x(B)x(C)x(D)x(B)Instr(C)Left(D)Rtrim(A)0(B)4(A)Str(B)Val当x=0时，函数IIf(x>0,1,IIf(x<0,-1,0))的返回值是（）。(A)0(B)1(C)-1(A)0(A)Left()(B)Trim()(C)Ltrim()(D)LeftTrim()(A)x=1:y=2(B)?x;y;(C)?x,y,(D)x=1;y=2(A)-(B)+(C)；(B)Picture1.Cls(B)Form1.Print(A)True(B)FalsePrintx+y(A)Caption(D)BorderStyle(A)Label1.Visible=0(B)Label1.Visible==1(C)Label1.Visible=True(D)Label1.Visible=False(A)Justify(B)Font(C)Alignment(A)AutoSize属性为True(B)AutoSize属性为False(C)Stretch属性为True(D)Stretch属性为False(A)AutoSize属性为True(B)AutoSize属性为False(C)Stretch属性为True(D)Stretch属性为False(A)1(B)0(D)False(A)Check1.Value=1(B)Check1.Value=2(C)Check1.Style=1(D)Check1.Style=0(A)Option1.Value=0(B)Option1.Value=True(C)Option1.Value=1(D)Option1.Value=False(A)Value(C)Caption(D)Selected(A)Value(C)Visible(C)组合框(B)List1.listCount(A)Cls(B)Clear(A)List(B)ListIndex(B)Interval(A)Slide(B)Scroll(B)Scroll(D)RefreshPrivateSubText1_KeyPress(KeyAsciiAsInteger)DimbAsStringb=Chr(KeyAscii)KeyAscii=Asc(UCase(b))(A)0(A)Ifx<yThenMin=xElseMin=y(B)Min=IIf(x<y，x，y)(C)Min=x:Ify<=xThenMin=y(D)Ify<=xThenMin=y:Min=xx=3:y=5:z=9x=x+yy=x-yIfx-y>z-xThenz=x+yIfx+y>z-yThenx=z+yPrintx,y,z(A)3Form=1To3a=1a=2a=3Printa,(A)3339(B)3216(C)1113(D)1236a=80:b=50:c=30Ifa<bOrb>cThenb=cIfb=cAnda<cThena=a-30Ifa=bAndb>cThenc=a+bPrinta,b,cn=5:x=1:i=1x=x*ii=i+1LoopWhilei<nx=0Fori=1To4Forj=1Toix=x+1Nextj,i(A)6(B)9s=1Fori=1To3Forj=0Toi-1s=s+s*jNextjNextI(A)1(B)2(D)1212m=0Fori=1To3Forj=1Toim=m+jNextj,i(A)3(B)3Form=1To3Forn=1To6Step2n=n+1Printn(A)3(B)6Dima(3,-2To1,5)Dima(3,-2To1,5)PrivateSubF