VB語言基礎(chǔ)（二）（課件）-高考信息技術(shù)一輪復(fù)習(xí)考點(diǎn)掃描（浙江專用）

專題十七VB語言基礎(chǔ)（二）PART01語句作用是把賦值號(hào)(等號(hào))右邊表達(dá)式的計(jì)算結(jié)果存儲(chǔ)到賦值號(hào)左邊的變量或某個(gè)特定的對(duì)象屬性中變量名＝表達(dá)式對(duì)象名．屬性名＝表達(dá)式對(duì)象名．屬性名＝屬性值例：a＝1＋2*3

a=b

Tex.Text=Str(a+b)

lab.Caption=“你好”

k=Val(Text2.Text)賦值語句也稱“分支結(jié)構(gòu)語句”或“條件判斷語句”，用來表示選擇(條件)控制結(jié)構(gòu)，使得程序在執(zhí)行過程中，根據(jù)不同的判斷結(jié)構(gòu)，選擇執(zhí)行不同的處理。行if語句

If條件表達(dá)式Then語句If條件表達(dá)式Then語句1

Else語句2

選擇語句If條件表達(dá)式1Then

語句塊1ElseIf條件表達(dá)式2Then

語句塊2……ElseIf

條件表達(dá)式nThen

語句塊nElse

語句塊0EndIfIf

條件表達(dá)式Then

語句1Else

語句2EndifIf

條件表達(dá)式Then

語句Endif塊if語句循環(huán)語句是程序中實(shí)現(xiàn)重復(fù)控制的方法之一，常用的循環(huán)語句有For語句和Do語句。For循環(huán)語句：通過次數(shù)控制循環(huán)的計(jì)算過程。For語句主要用于循環(huán)次數(shù)已知的情況，因此，也被稱為計(jì)數(shù)循環(huán)。For語句一般格式如下：For循環(huán)變量＝初值To終值Step步長(zhǎng)循環(huán)體語句塊Next循環(huán)變量循環(huán)語句通過條件控制循環(huán)的計(jì)算過程。常用格式如下：

Do

While條件表達(dá)式循環(huán)體語句塊

Loop一般情況下，F(xiàn)or語句都可以用Do語句來代替，而且在某些情況下，如果事先不知道循環(huán)應(yīng)該執(zhí)行的次數(shù)，但我們知道在什么條件下需要循環(huán)，則不能用For語句而必須用Do語句。因此，Do語句的適用面比For語句要廣。Do循環(huán)語句小積累小積累注釋是以（‘）開頭的一串文字，可出現(xiàn)在程序中需要進(jìn)行說明的位置上。注釋的作用僅僅是為了增加程序的可讀性，對(duì)程序執(zhí)行效果沒有任何影響。注釋語句輸入Inputbox()文本框輸出Msgbox()文本框標(biāo)簽列表框x=val(Text1.Text)Text1.Text=str(x)Label1.caption=sList1.Additemstr(x)輸入輸出語句PART02運(yùn)行中常見的幾種錯(cuò)誤要求對(duì)象除數(shù)為零數(shù)據(jù)溢出下標(biāo)越界類型不匹配未找到方法或數(shù)據(jù)成員子程序或函數(shù)未定義參數(shù)不可選無效的過程調(diào)用或參數(shù)語法錯(cuò)誤PART03典例分析（2017金麗衢十二校卷，2分）以下VB代碼運(yùn)行后，在文本框Text1中輸入1，則語句Ifk<=9Then執(zhí)行的次數(shù)為（）PrivateSubText1_Change() DimkAsInteger,iAsInteger k=Val(Text1.Text) Fori=1To3 Ifk<=9Thenk=k+i Nexti Text1.Text=Str(k)EndSubA.3 B.5 C.6 D.9D1PrivateSubCommand1_Click()

DimxAsInteger,iAsInteger Dima(1To10)AsInteger Fori=3To10Step2 a(i)=Int(Rnd()*40)-20 ′① x=Sqr(a(i)) ′② List1AdditemStr(x) ′③ Nexti Lable1.Caption=Str(Sum) ′④EndSub該程序多條語句出現(xiàn)錯(cuò)誤，其中錯(cuò)誤彈窗對(duì)應(yīng)的序號(hào)錯(cuò)誤的是（

）（2018改編，2分）某VB程序在界面設(shè)計(jì)時(shí)窗體上所有的對(duì)象都使用默認(rèn)對(duì)象名稱，其中過程代碼如下：AC.③B.②A.①D.④2（2018改編，2分）有如下VB程序段：bianliang_a=3:bianliang_b=4Label1.Caption=“bianliang_a*bianliang_b”該程序段運(yùn)行之后，標(biāo)簽Label1將顯示()A.3*4

B.12C.bianliang_a*bianliang_b

D.3*4=12C3小提示（2018改編，2分）下列程序段中，可以實(shí)現(xiàn)交換變量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=yC小提示在程序設(shè)計(jì)中兩個(gè)任意類型的變量交換值的方式，需要引入第三方變量進(jìn)行，但若是數(shù)值型變量，則下列語句也可以實(shí)現(xiàn)變量值的交換：a=a+b:b=a-b:a=a-b。4（2017.11浙江選考，2分）有如下VB程序段：n=0Fori=1ToLen(Text1.Text)c=Mid(Text1.Text,i,1)Ifc>=“0”Andc<=“9”Thenm=1Elsem=2a(m)=a(m)+1Ifa(m)=1Thenn=n+1Nexti數(shù)組a各元素的初始值都為0,文本框Textl的內(nèi)容為“Happy2017”。執(zhí)行程序后，變量n的值為（）A.1 B.2 C.4 D.9B5（2018改編，2分）有如下程序段：PrivateSubForm_Click()DimcAsIntegerDimdAsIntegerc=4d=Val(InputBox(“請(qǐng)輸入一個(gè)數(shù)”)DoWhiled>0Ifd>cThe