VB基礎(chǔ)知識(shí)強(qiáng)化練習(xí)

VB基礎(chǔ)知識(shí)強(qiáng)化練習(xí)1求一元二次方程實(shí)數(shù)根的算法中，在方程不存在實(shí)數(shù)根的情況下，要求輸出“方程無(wú)實(shí)數(shù)根。這一要求主要體現(xiàn)了算法特征中的（）A、有窮性B.確定性c.有輸出 D.可沒(méi)有輸入2在VB中，某對(duì)象的屬性窗口如圖2在VB中，某對(duì)象的屬性窗口如圖3-8-1所示，該對(duì)象的名稱(chēng)是（）按分類(lèi)序？I院詼西J一口ftHBUOOOCF嬴a二T④￥聲里—一寶字母序Its就）A.CommandButtonB.CommandlC.Command_lD.Caption3在VB中，某對(duì)象的屬性窗口如圖3-8-1所示，其中BackColor是（ ）A.對(duì)象名 B.屬性名C.屬性值 D.事件名4在VB中，在文本框Text3中顯示“密碼錯(cuò)誤！”，應(yīng)改變的屬性是（）A.FontB.TextC.WidthD.BackColor5!對(duì)于窗體對(duì)象Forml,執(zhí)行語(yǔ)句Forml.Caption="Height”后可能引起的變化是（ ）A.Forml對(duì)象的名稱(chēng)改變 B.Forml對(duì)象的高度改變C.Forml對(duì)象標(biāo)題欄中的文字改變 D.Forml對(duì)象的背景色改變6在VB中，要在標(biāo)簽對(duì)象Lab上顯示文字“請(qǐng)輸入驗(yàn)證碼：”，應(yīng)改變的屬性是（）A.FontB.CaptionC.WidthD.Height7在VB中，下列方法能獲得Textl文本框中內(nèi)容的是（）A.a=Textl.textB.Textl.text=aC.b=TextI.FontD.Textl.Fontb.在VB中，下列函數(shù)的值屬于字符串常量的是()A.Val("10") B.Len("10") C.Str(10) D.Sqr(10).產(chǎn)生［1,6］范圍內(nèi)某一隨機(jī)整數(shù)的表達(dá)式是()A.Rnd:g6B.Rnd?6+1 C.Int(Rnd*6)D.Int(Rnd*6+1).在VB中，若x=2.185,則表達(dá)式Int(x*10+0.5)/10的值是( )A.2B.2.1C.2.2D.23.下列VB運(yùn)算符中，屬于算術(shù)運(yùn)算符的是()A.>B.=C.ModD.Or.下列屬于正確VB表達(dá)式的是()A.a+2*|b-c| B.b2+1C.2x-lD.vO+a.t.在VB中，表達(dá)式“20“+”15”的值是()A-”35” B.35 C.”20+15" D.“2015”.在VB中，與表達(dá)式Len(“-100“)+100的值相等的是()A.Str(100)+“4" B.Abs(-100)+4C.Val(”-100”)+100 D.Sqr(100)+100.在VB中，設(shè)x=5132,能得到其百位上數(shù)字“1”的表達(dá)式是()A.xMod100 B.x\10Mod10 C.x\100Mod10 D.x\100Mod100.在VB中，若x表示能被7整除的正整數(shù)，則下列表達(dá)式的值一定為真的是()A.x\7=0 B.xMod7=0 C.Int(x/7)=0D.7Modx=0.已知a=10,b=20,c=30,下列表達(dá)式中值為T(mén)rue的是( )A.a<cOrb>c B.a<bAndb>cC.Not(a<c)D.a+b>c.在VB中，若使用變量t存儲(chǔ)表達(dá)式x>y的值，則變量t的數(shù)據(jù)類(lèi)型應(yīng)定義為()A.StringB.IntegerC.SingleD.Boolean.下列VB程序運(yùn)行時(shí)，在文本框Textl中輸人數(shù)據(jù)5,在文本框Text2中輸人數(shù)據(jù)8,單擊命令按鈕Commandl后，文本框Textl中顯示的內(nèi)容是―，文本框Text2中顯示的內(nèi)容是。PrivateSubCommandl_Click()

DimaAsInteger,bAsIntegera=Val(TextI.Text)b=Val(Text2.Text)a=a*bb=a/ba=a/bTextI.Text=Str(a)Text2.Text=Str(b)EndSub20。某VB程序的事件過(guò)程如下：PrivateSubCommandI_Click()DimaAsIntegera=Val(TextI.Text)a=28a+lTextI.Text=Str(a)EndSub程序運(yùn)行時(shí)，在文本框Textl中輸入1,連續(xù)兩次單擊命令按鈕Commandl后，文本框Textl中顯示的內(nèi)容是.下列VB程序段用來(lái)判斷某整數(shù)的正負(fù)情況：x=Val(TextI.Text)If__ThenLabel1.Caption="負(fù)整數(shù)"ElseLabel1.Caption="非負(fù)整數(shù)”EndIf則程序劃線(xiàn)處應(yīng)填入()x<0X<>0C.x<0X<>0C.x>=0D.x<=0.已知a、b、c為某三條線(xiàn)段的長(zhǎng)度，判斷這三條線(xiàn)段能否構(gòu)成一個(gè)三角形的VB程序代碼如下：PrivateSubCommandl_click()a=10:b=4 :c=5Ifa+b>cAndb+c>aAndc+a>bThenTextI.Text="YESElseText2.Text="NO"EndSub運(yùn)行程序，單擊命令按鈕Commandl后，結(jié)果是()A.文本框Textl中顯示“YES” B.文本框Text2中顯示“NO”C.出現(xiàn)“塊If沒(méi)有Endlf”的錯(cuò)誤信息 D.出現(xiàn)“False”的錯(cuò)誤信息.下列VB程序段：DimaAsInteger,bAsIntegera=Val(Text1.Text)Ifa<=10Thenb=aA2Elseb=a*2EndIfText1.Text=Str(b)若要測(cè)試所有分支程序代碼是否正確.下列測(cè)試數(shù)據(jù)中最恰當(dāng)?shù)囊唤M是()A.9,10 B.10,11 C.11,12 D.-10,10.有如下VB程序段：s=0Fori=lT05s=s+lNexti該程序段執(zhí)行后，i和s的值分別為（）A.12B.55C.65D.66.有如下VB程序段：k=l：s=0DoWhilek<=3s=s+kk=k+lLoop該程序段執(zhí)行后，變量k和s的值分別是（）A.33 B.63C.46D.104.有如下VB程序：PrivateSubCommandlClickQDimxAsInteger,iAsIntegerListl.ClearFori=lT05x=i*（i+2）ListI.AddltemStr（x）NextiEndSub該程序運(yùn)行后，單擊命令按鈕Commandl,在列表框Listl中顯示的數(shù)據(jù)個(gè)數(shù)是（）A.1B.2C.5 D.10.有如下VB程序段：s=lFori=10ToStep-lS=s+i

Nexti若要使語(yǔ)句執(zhí)行5次，則循環(huán)變量i終值應(yīng)為（）A5B6C7D8.有如下VB程序段：S=0：i=lDoWhileS=s+ii=i+2Loop該程序段運(yùn)行后，變量s的值等于9,則程序中劃線(xiàn)處的語(yǔ)句是（）A.i<5 B.i<=5 c.i<=7 D.i=9.某算法的部分程序代碼與其相對(duì)應(yīng)的流程圖分別表示如下：則代碼中①和②處應(yīng)填人的是（）掠程圖PrivateSubCommand<Click0掠程圖DimiAsIntegerDimsAsLongs=lFor(T)一②一Nexti .Labell.Caption=Str(s)EndSubA.①i=lT010 B.①i=lT010②s=s*i②s=s+iC.①i1T010Step2 D.①i=lToIOStep2②s=s+I②s=s*i

.有如下VB程序段：s=0Fori=1T010s=s+iMod2NextiLabel1.Caption=Str(s)該程序段運(yùn)行后，在標(biāo)簽Labell上顯示的是。.有如下VB程序：PrivateSubCommand1_Click()Dima(1T05)AsInteger,iAsIntegera⑴=1a(2)=lFori=3T05a(i)=2*a(i-l)+a(i-2)NextiTextl.Text=Str(a(5))EndSub該程序運(yùn)行后，單擊命令按鈕Commandl后，文本框Textl中顯示的內(nèi)容是.小明用如下VB程序來(lái)計(jì)算S=1A2+3A