一VB的基本語(yǔ)句

1、v一一.VB的基本語(yǔ)句的基本語(yǔ)句1.賦值語(yǔ)句賦值語(yǔ)句 變量名=表達(dá)式 或 對(duì)象名.屬性名=表達(dá)式2.選擇語(yǔ)句（分支語(yǔ)句）選擇語(yǔ)句（分支語(yǔ)句）if(1)行if 語(yǔ)句 if 條件表達(dá)式 then 語(yǔ)句 if 條件表達(dá)式 then 語(yǔ)句1 else 語(yǔ)句2(2)塊if 語(yǔ)句 If 條件表達(dá)式 then 語(yǔ)句塊1 EndifIf 條件表達(dá)式 then 語(yǔ)句塊1Elseif 條件表達(dá)式2 then 語(yǔ)句塊2 .Else 語(yǔ)句塊0Endif If 條件表達(dá)式 then 語(yǔ)句塊1 Else 語(yǔ)句塊2 Endif 在印度有一個(gè)古老的傳說(shuō)：舍罕王打算獎(jiǎng)賞國(guó)際象棋的發(fā)明人宰相西薩班達(dá)依爾。國(guó)王問(wèn)他想要什么，他對(duì)國(guó)

2、王說(shuō)：“陛下，請(qǐng)您在這張棋盤(pán)的第1個(gè)小格里，賞給我1粒麥子，在第2個(gè)小格里給2粒，第3小格給4粒，以后每一小格都比前一小格加一倍。請(qǐng)您把這樣擺滿棋盤(pán)上所有的64格的麥粒，都賞給您的仆人吧!”國(guó)王覺(jué)得這要求太容易滿足了，就命令給他這些麥粒。當(dāng)人們把一袋一袋的麥子搬來(lái)開(kāi)始計(jì)數(shù)時(shí)，國(guó)王才發(fā)現(xiàn)：就是把全印度甚至全世界的麥粒全拿來(lái)，也滿足不了那位宰相的要求。那么，宰相要求得到的麥粒到底有多少呢? 故事背景 傳說(shuō)在很久以前，印度有個(gè)叫塞薩的人，為了傳說(shuō)在很久以前，印度有個(gè)叫塞薩的人，為了能使國(guó)王忘掉戰(zhàn)爭(zhēng)，精心設(shè)計(jì)了一種游戲（國(guó)際能使國(guó)王忘掉戰(zhàn)爭(zhēng)，精心設(shè)計(jì)了一種游戲（國(guó)際象棋）獻(xiàn)給國(guó)王。國(guó)王對(duì)這種游戲非常滿

3、意，決象棋）獻(xiàn)給國(guó)王。國(guó)王對(duì)這種游戲非常滿意，決定賞賜塞薩。國(guó)王問(wèn)塞薩需要什么，塞薩指著象定賞賜塞薩。國(guó)王問(wèn)塞薩需要什么，塞薩指著象棋盤(pán)上的小格子說(shuō)：棋盤(pán)上的小格子說(shuō)：“就按照棋盤(pán)上的格子數(shù)，就按照棋盤(pán)上的格子數(shù)，在第一個(gè)小格內(nèi)賞我在第一個(gè)小格內(nèi)賞我1粒麥子，在第二個(gè)小格內(nèi)賞粒麥子，在第二個(gè)小格內(nèi)賞我我2粒麥子，第三個(gè)小格內(nèi)賞粒麥子，第三個(gè)小格內(nèi)賞4粒，照此下去，每粒，照此下去，每一個(gè)小格內(nèi)的麥子都比前一個(gè)小格內(nèi)的麥子加一一個(gè)小格內(nèi)的麥子都比前一個(gè)小格內(nèi)的麥子加一倍。陛下，把這樣擺滿棋盤(pán)所有倍。陛下，把這樣擺滿棋盤(pán)所有64格的麥粒，都格的麥粒，都賞給我吧。賞給我吧?！眹?guó)王聽(tīng)后不加思索就滿口答應(yīng)

4、了塞國(guó)王聽(tīng)后不加思索就滿口答應(yīng)了塞薩的要求。薩的要求。 下面，請(qǐng)同學(xué)們幫這位國(guó)王算一算，他下面，請(qǐng)同學(xué)們幫這位國(guó)王算一算，他到底要賞給塞薩多少麥子？到底要賞給塞薩多少麥子？人工計(jì)算這個(gè)問(wèn)題會(huì)非常麻煩，即使用計(jì)人工計(jì)算這個(gè)問(wèn)題會(huì)非常麻煩，即使用計(jì)算器也不方便。算器也不方便。 我們能不能用計(jì)算機(jī)來(lái)解決這個(gè)問(wèn)題呢？我們能不能用計(jì)算機(jī)來(lái)解決這個(gè)問(wèn)題呢？計(jì)算機(jī)程序計(jì)算機(jī)程序2 + 2 + 2 + 2 + + 2123630以計(jì)算麥粒數(shù)目的程序?yàn)槔瑸榱撕?jiǎn)化程序，我以計(jì)算麥粒數(shù)目的程序?yàn)槔?，為了?jiǎn)化程序，我們先計(jì)算第們先計(jì)算第6464個(gè)格子中麥粒的數(shù)目。個(gè)格子中麥粒的數(shù)目。p1 = 1 p1 = 1 第第

5、1 1格格P2 = P1 P2 = P1 * * 2 2 第第2 2格格P3 = P2 P3 = P2 * * 2 2 第第3 3格格 P64 = P63 P64 = P63 * * 2 2 第第6464格格P = 1 P = 1 第第1 1格格P = P P = P * * 2 2 第第2 2格格P = P P = P * * 2 2 第第3 3格格 P = P P = P * * 2 2 第第6464格格簡(jiǎn)化簡(jiǎn)化6464行代碼行代碼P = 1For i=1 to 63 條件判斷條件判斷 P = P * 2Next i=i+1,下一次循環(huán)下一次循環(huán)4 4行代碼行代碼for 語(yǔ)句語(yǔ)句格式：格式

6、：for 循環(huán)變量循環(huán)變量=初值初值 to 終值終值 step 步長(zhǎng)步長(zhǎng) 語(yǔ)句塊（又稱循環(huán)體）語(yǔ)句塊（又稱循環(huán)體） next 循環(huán)變量循環(huán)變量 for循環(huán)語(yǔ)句的執(zhí)行過(guò)程是：首先把初值賦給循環(huán)變量循環(huán)語(yǔ)句的執(zhí)行過(guò)程是：首先把初值賦給循環(huán)變量 ，接著，接著判斷循環(huán)變量的值是否判斷循環(huán)變量的值是否超出超出終值，當(dāng)循環(huán)變量的值未超過(guò)終值時(shí)，終值，當(dāng)循環(huán)變量的值未超過(guò)終值時(shí)，就執(zhí)行一次循環(huán)體的語(yǔ)句塊，然后把循環(huán)變量的值加上步長(zhǎng)，再賦就執(zhí)行一次循環(huán)體的語(yǔ)句塊，然后把循環(huán)變量的值加上步長(zhǎng)，再賦給循環(huán)變量，重復(fù)上述過(guò)程，直至循環(huán)變量的值超過(guò)終值，就結(jié)束給循環(huán)變量，重復(fù)上述過(guò)程，直至循環(huán)變量的值超過(guò)終值，就結(jié)束

7、循環(huán)。循環(huán)。P=1For I=1 to 63 p=p*2Next I循環(huán)變量初值終值循環(huán)變量For 語(yǔ)句中循環(huán)次數(shù)：開(kāi)始循環(huán)變量賦初值循環(huán)變量未超出終值？Y執(zhí)行循環(huán)體循環(huán)變量循環(huán)變量+步長(zhǎng)結(jié)束N(終值-初值)/步長(zhǎng)+1步長(zhǎng)為正時(shí)步長(zhǎng)為負(fù)時(shí)例1、s=0 for I=1 to 5 s=s+I next I s=0 for I=5 to 1 step -1 s=s+I next I開(kāi)始循環(huán)變量賦初值循環(huán)變量=終值？Y執(zhí)行循環(huán)體循環(huán)變量循環(huán)變量+步長(zhǎng)結(jié)束N麥粒問(wèn)題算法分析(-)第i格第i格存放的麥粒數(shù)(設(shè)用p表示)1 123456424816P=1For I=2 to 64 p=p*2Next IPP

8、*2Text1.text=ptext1麥粒問(wèn)題算法分析(二)第i格第i格存放的麥粒數(shù)(設(shè)用p表示)從第1格到第i格總共需多少的麥粒數(shù)（設(shè)用s表示）111234564241+21+2+481+2+4+8161+2+4+8+16SS+PPP*2開(kāi)始當(dāng)前格子的麥粒數(shù)置初值：p1總共需要的麥粒數(shù)置初值：s1置初值：I2PP*2SS+Pii+1輸出p和s結(jié)束I=64?YNP：第：第i格存放的麥粒數(shù)格存放的麥粒數(shù)S:從第從第1格到第格到第i格總共需多少的麥粒數(shù)格總共需多少的麥粒數(shù) p = 1 For i=2 to 64 p=p*2 Next IText1.text=ps = 1s=s+pText2.tex

9、t=s6464個(gè)棋盤(pán)格子一共可以放個(gè)棋盤(pán)格子一共可以放1.84467440737096E+19粒麥子，約合粒麥子，約合50005000多億噸多億噸小麥。小麥。（我國(guó)（我國(guó)20072007年糧食總產(chǎn)年糧食總產(chǎn)量量1000010000億斤億斤）循環(huán)語(yǔ)句的提高與拓展-多重循環(huán) 輸出如下圖形：*For i = 1 To 5 For j = 1 To 5 Print *; Next j PrintNext i外循環(huán)內(nèi)循環(huán)提示：輸出可用提示：輸出可用print格式：格式：print “要輸出的字符要輸出的字符”或變量名或表達(dá)式或變量名或表達(dá)式 如果要在一行內(nèi)輸出，則后面要加如果要在一行內(nèi)輸出，則后面要加;

10、 print 后面什么都不加相當(dāng)于起到換行的作用。后面什么都不加相當(dāng)于起到換行的作用。* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *For i = 1 To 5 For j = 1 To 5 - i Print ; Next j For k = 1 To i Print *; Next k PrintNext iFor i = 1 To 5 For j = 1 To i Print *; Next j PrintNext i課后作業(yè)：以下的程序功能是求課后作業(yè)：以下的程序功能是求1+2+3+n, 現(xiàn)要求對(duì)現(xiàn)要求對(duì)給出的程序進(jìn)行修改，使之實(shí)現(xiàn)右邊式子