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

VB基礎(chǔ)知識強(qiáng)化練習(xí)1求一元二次方程實(shí)數(shù)根的算法中，在方程不存在實(shí)數(shù)根的情況下，要求輸出“方程無TOC\o"1-5"\h\z實(shí)數(shù)根。這一要求主要體現(xiàn)了算法特征中的（）A、有窮性B.確定性c.有輸出D.可沒有輸入2在VB中，某對象的屬性窗口如圖3-8-1所示，該對象的名稱是（）A.CommandButtonB.Commandl.CCommand_lD.Caption3在VB中，某對象的屬性窗口如圖3-8-1所示，其中BackColor是（）A.對象名B.屬性名C.屬性值D.事件名4在VB中，在文本框Text3中顯示“密碼錯(cuò)誤！”，應(yīng)改變的屬性是（）A.FontB.TextC.WidthD.BackColor5!對于窗體對象Forml,執(zhí)行語句Forml.Caption="Height”后可能引起的變化是（）A.Forml對象的名稱改變B.Forml對象的高度改變C.Forml對象標(biāo)題欄中的文字改變D.Forml對象的背景色改變6在VB中，要在標(biāo)簽對象Lab上顯示文字“請輸入驗(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)TOC\o"1-5"\h\z.產(chǎn)生［1，6］范圍內(nèi)某一隨機(jī)整數(shù)的表達(dá)式是()A.Rnd:g6B.Rnd~6+1C.Int(Rnd*6)D.Int(Rnd*6+1).在VB中，若x=2.185,則表達(dá)式Int(x*10+0.5)/的值是()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.35C.”20+15”D."2015”.在VB中，與表達(dá)式Len(”-100”)+100的值相等的是()A.Str(100)+”4”B.Abs-(100)+4C.Val-(1”00”)+100D.Sqr(100)+1001.5在VB中，設(shè)x=5132,能得到其百位上數(shù)字“1”的表達(dá)式是()A.xMod100B.x\10Mod10C.x\100Mod10D.x\100Mod10016.在VB中，若x表示能被7整除的正整數(shù)，則下列表達(dá)式的值一定為真的是()A.x\7=0B.xMod7=0C.Int(x/7)=0D.7Modx=0.7已知a=10,b=20,c=30,下列表達(dá)式中值為True的是()A.a<cOrb>cB.a<bAndb>cC.Not(a<c)D.a+b>c.在VB中，若使用變量t存儲(chǔ)表達(dá)式x>y的值，則變量t的數(shù)據(jù)類型應(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程序的事件過程如下：PrivateSubCommandI_Click()DimaAsIntegera=Val(TextI.Text)a=28a+lTextI.Text=Str(a)EndSub程序運(yùn)行時(shí)，在文本框Textl中輸入1,連續(xù)兩次單擊命令按鈕Commandl后，文本框Textl中顯示的內(nèi)容是.下列VB程序段用來判斷某整數(shù)的正負(fù)情況：x=Val(TextI.Text)IfThenLabel1.Caption="負(fù)整數(shù)”ElseLabel1.Caption="非負(fù)整數(shù)”EndIf則程序劃線處應(yīng)填入()A.x<0A.x<0B.X<>0C.x>=0D.x<=0.已知a、b、c為某三條線段的長度，判斷這三條線段能否構(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沒有Endlf”的錯(cuò)誤信息D.出現(xiàn)“False”的錯(cuò)誤信息.下列VB程序段：DimaAsInteger,bAsIntegera=Val(Text1.Text)Ifa<=10Thenb=aA2Elseb=a*2EndIfText1.Text=Str(b)若要測試所有分支程序代碼是否正確.下列測試數(shù)據(jù)中最恰當(dāng)?shù)囊唤M是()A.9,10B.10,11C.11,12D.-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.33B.63C.46D.104.有如下VB程序：PrivateSubCommandlClick（）DimxAsInteger,iAsIntegerListl.ClearFori=lT05x=i*（i+2）ListI.AddltemStr（x）NextiEndSub該程序運(yùn)行后，單擊命令按鈕Commandl,在列表框Listl中顯示的數(shù)據(jù)個(gè)數(shù)是（）A.1B.2C.5D.10.有如下VB程序段：s=lFori=10ToStep-lS=s+i

Nexti若要使語句執(zhí)行5次，則循環(huán)變量i終值應(yīng)為（）A5B6C7D8.有如下VB程序段：S=0：i=lDoWhileS=s+ii=i+2Loop該程序段運(yùn)行后，變量s的值等于9,則程序中劃線處的語句是（）A.i<5B.i<=5c.i<=7D.i=9.某算法的部分程序代碼與其相對應(yīng)的流程圖分別表示如下：則代碼中①和②處應(yīng)填人的是（）PrivateSubCominandlClick()DimiAsIntegerDimsAsLongs=lNextiLabel1-Caption=Str(s)EndSubNextiA.①i=lT010B.①i=lT010②s=s*i②s=s+iC.①i1T010StepD2①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(1)=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程序來計(jì)算S=1A2+3A2+5A2+.