2.3程序的基本結構

2.3程序的根本結構.順序結構是最簡單的程序結構，它是由假設干個依次執(zhí)行的處理步驟組成的。如圖，A語句和B語句是依次執(zhí)行的，只有在執(zhí)行完A語句后，才能接著執(zhí)行B語句。

順序結構.題目：輸入兩個數(shù)，然后交換這兩個數(shù)，再輸出它們交換后的結果?！?〕分析問題。要交換兩個數(shù)，要利用幾個變量來保存數(shù)據？順序結構.〔2〕分析程序的執(zhí)行步驟，畫出流程圖。第一步：輸入兩個變量A、B的值。第二步：利用第三個變量C來進行交換，交換的過程如下：C=AA=BB=C第三步：輸出交換后A、B的值。順序結構.〔3〕講解程序的編寫。PrivateSubcommand1_Click〔〕A=InputBox〔"輸入第一個數(shù)A："〕B=InputBox〔"輸入第二個數(shù)B："〕C=AA=BB=CPrint"交換后A=";A,"交換后B=";BEndSub順序結構.順序結構的特點：1.執(zhí)行過程是按順序從第一條語句執(zhí)行到最后一條語句。2.在程序運行的過程中，順序結構程序中的任何一條語句都要運行一次，而且也只能運行一次。順序結構.在處理實際問題時，只有順序結構是不夠的，經常會遇到一些條件的判斷，流程根據條件是否成立有不同的流向。如以下圖所示，程序根據給定的條件P是否成立而選擇執(zhí)行A操作或B操作這種先根據條件做出判斷，再決定執(zhí)行哪一種操作的結構稱為分支結構，也稱為選擇結構。選擇結構.應用舉例：判斷輸入的一個正整數(shù)，是偶數(shù)還是奇數(shù)。題目：輸入一個正整數(shù)，判斷它是偶數(shù)還是奇數(shù)。〔1〕分析問題。提示要判斷一個正整數(shù)是偶數(shù)還是奇數(shù)，判斷的條件是什么？選擇結構.〔2〕分析程序的執(zhí)行步驟，畫出流程圖。第一步：輸入一個正整數(shù)N；第二步：判斷N是否能被2整除，即判斷條件Nmod2==0是否成立；第三步：假設判斷條件成立，那么輸出該正整數(shù)是偶數(shù)，否那么輸出該正整數(shù)是奇數(shù)選擇結構.〔3〕講解程序的編寫。PrivateSubcommand1_Click〔〕N=InputBox〔"輸入一個正整數(shù)："〕If(Nmod2=0)ThenPrintN;"是偶數(shù)。"ElsePrintN;"是奇數(shù)。"EndIfEndSub選擇結構.小結分支結構的特點。①分支結構是根據不同的條件判斷來決定程序執(zhí)行走向的結構。②在程序運行的過程中，在分支結構內，無論P條件是否成立，只能執(zhí)行A操作或B操作之一，不可能既執(zhí)行A操作又執(zhí)行B操作，也不可能A操作和B操作都不執(zhí)行。選擇結構.格式1(單分支結構):IF<表達式>Then語句塊EndIf例：有兩個數(shù)x和y，比較它們的大小，假設x小于y,那么交換x和y值，使得x大于y。Privatesubform_click()x=inputbox(“請輸入x〞)y=inputbox(“請輸入y〞)Ifx<yThent=xx=yy=tEndifprint“x〞;x,〞y〞;yEndsub

.格式2(雙分支結構):IF<表達式>Then<語句塊1>Else<語句塊2>EndIf例：輸出x、y兩個數(shù)中值較大的一個。Privatesubform_click()x=inputbox(“請輸入x〞)y=inputbox(“請輸入y〞)Ifx>yThenprintxelseprintyendifEndsub.格式3(雙分支結構):IF條件1Then語句塊1ElseIf條件2Then語句塊2……[Else語句塊n+1]EndIf程序運行到ElseIf語句時，依次判斷條件，如果找到一個滿足的條件，那么執(zhí)行它下面的語句塊，然后跳到EndIf，執(zhí)行后面的程序。如果列出的條件都不滿足，那么執(zhí)行Else語句后面的語句塊；如果列出的條件都不滿足，又沒有Else子句，那么直接跳過EndIf,不執(zhí)行任何語句塊。.例題分析：輸入一學生的成績，評定其等級。方法是：90－100分為“優(yōu)秀〞，80－90分為“良好〞，70－79分為“中等〞，60－69分為“及格〞，60分以下為“不及格〞。PrivateSubForm_click()Dimxassinglex=inputbox(“請輸入要評估的成績〞)Ifx>=90ThenPrint“優(yōu)秀〞ElseIfx>=80ThenPrint“良好〞ElseIfx>=70ThenPrint“中等〞ElseIfx>=60ThenPrint“及格〞Elseprint“不及格〞EndIfEndsub.練習題：1.分析下面一段VB程序，該程序運行后y的值是〔〕x=3IFx>3Theny=x*xElsey=2*xEndifA.2B.3C.9D.6.有時在解決一些問題時，經常需要重復執(zhí)行一些操作，如計算1＋2＋3＋…+100的和，我們可以利用循環(huán)結構控制程序按照一定的條件或者次數(shù)重復執(zhí)行。需要重復執(zhí)行同一操作的結構稱為循環(huán)結構，即從某處開始，按照一定條件反復執(zhí)行某一處理步驟，反復執(zhí)行的處理步驟稱為循環(huán)體。循環(huán)結構.循環(huán)結構For……Next的語句格式為：for循環(huán)變量=初值to終值[step步長值][循環(huán)體]next[循環(huán)變量]注：當“step步長值〞為1時，此項可省略。.應用舉例：累加求和。題目：計算1＋2＋3＋…+10的和?！?〕分析問題。提示進行累加運算，可先設累加變量的值為0，還要準確理解循環(huán)次數(shù)，防止出現(xiàn)多一次循環(huán)或少一次循環(huán)的情況。循環(huán)結構.〔2〕分析程序的執(zhí)行步驟，畫出流程圖。第一步：使累加變量S的值為0；第二步：循環(huán)變量I的初值為1，終值為10，步長值為1；第三步：判斷循環(huán)條件I>10是否成立，成立，那么輸出累加變量S的值，否那么S=S+I，I=I+1，重復第三步。循環(huán)結構.〔3〕講解程序的編寫。PrivateSubcommand1_Click〔〕S=0ForI=1To10Step1S=S+INextIPrint"1+2+3+…+10的和是“;SEndSub循環(huán)結構.1.完善程序。編程計算1+4+7+10+…+100的值。

Dims,iAsIntegers=0Fori=____To_____

s=s+iNextiPrints2.完善程序。

編程計算1+4+7+10+…+100的值。

Dims,iAsIntegers=0i=1DoWhile_____

s=s+i

i=_____LoopPrints1100step3i<=100i+3.小結循環(huán)結構的特點:①循環(huán)結構中通常都有一個起循環(huán)計數(shù)作用的變量，這個變量的取值一般都包含在執(zhí)行或終止循環(huán)的條件中。②循環(huán)結構主要用在一些有規(guī)律的重復計算的算法中，例如累加求和、累乘求積等問題。循環(huán)結構.小結順序、分支和循環(huán)三種程序根本控制結構的共同特點：①三種結構都是只有一個入口，一個出口。②三種結構內都不存在死循環(huán)，即無終止的循環(huán)，像以下圖的結構中就存