資源描述：
《七、語句與控制流》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、七、語句與控制流注釋語句在VB中用“'”和Rem來標識一條注釋語句。在VB中的注釋語句會自動變成綠色。結(jié)束語句End暫停語句Stop賦值語句Let格式：[Let]名稱=表達式卸載對象語句在VB中在結(jié)束應(yīng)用程序而從內(nèi)存中卸載窗體或卸載某些控件用Unload語句。格式：Unload對象名順序語句順序語句即按照順序依次執(zhí)行的語句。如：賦值語句、聲明變量語句和打印方法等。條件語句條件語句用于根據(jù)條件產(chǎn)生執(zhí)行相應(yīng)的語句。1)If…語句If…語句有三種格式：單分支格式，即：If條件Then[語句塊]EndIf也可改用：If條件Then語句[:語句]
2、雙分支格式，即：If條件Then[語句塊][Else語句塊]EndIf多分支格式，即：If條件Then[語句塊][ElseIf條件Then[語句塊][Else語句塊]EndIf例22：設(shè)計一個程序，某運動隊規(guī)定運動員12分鐘跑評定成績（2900米以上為“及格”，3020米以上為“中等”，3120米以上為“良好”，3200米以上為“優(yōu)秀”）。程序的界面有一個文本框、二個標簽框和三個命令按鈕。在文本框內(nèi)輸入運動員12分鐘跑的距離，再鼠標點擊“確定”按鈕，就可得到成績評定的結(jié)果。點擊“清除”按鈕，就可清除輸入的距離和成績評定的數(shù)據(jù)。在屬性窗口
3、分別設(shè)置如表：對象屬性設(shè)置Form1(窗體)Caption例22(名稱)Form1text1(文本框1)(名稱)Txt1textLabel1(標簽框1)(名稱)Lab1Caption12分鐘跑的距離（米）：Label2(標簽框2)(名稱)Lab2Caption成績評定：Command1(命令按鈕1)(名稱)Cmd1Caption確定Command2(命令按鈕2)(名稱)Cmd2Caption清除Command3(命令按鈕3)(名稱)Cmd3Caption退出在代碼窗口完成如下：PrivateSubCmd1_Click()s=Val(Tx
4、t1.Text)t1="成績評定："Ifs<2900Thent2="不及格"Ifs>=2900Thent2="及格"Ifs>=3020Thent2="中等"Ifs>=3120Thent2="良好"EndIfIfs>=3200Thent2="優(yōu)秀"Lab2.Caption=t1+t2EndSubPrivateSubCmd2_Click()Txt1.Text=""Lab2.Caption="成績評定："EndSubPrivateSubCmd3_Click()EndEndSub其中Cmd1_Click()過程可改為：PrivateSubCmd
5、1_Click()s=Val(Txt1.Text)t1="成績評定："Ifs<2900Thent2="不及格"EndIfIfs>=2900Ands<3020Thent2="及格"EndIfIfs>=3020Ands<3120Thent2="中等"EndIfIfs>=3120Ands<3200Thent2="良好"EndIfIfs>=3200Thent2="優(yōu)秀"EndIfLab2.Caption=t1+t2EndSub也可改為：PrivateSubCmd1_Click()s=Val(Txt1.Text)t1="成績評定："Ifs<290
6、0Thent2="不及格"Elset2="及格"Ifs>=3020Thent2="中等"Ifs>=3120Thent2="良好"Ifs>=3200Thent2="優(yōu)秀"EndIfLab2.Caption=t1+t2EndSub也可改為：PrivateSubCmd1_Click()s=Val(Txt1.Text)t1="成績評定："Ifs<2900Thent2="不及格"ElseIfs>=2900Ands<3020Thent2="及格"ElseIfs>=3020Ands<3120Thent2="中等"ElseIfs>=3120Ands<3
7、200Thent2="良好"Elset2="優(yōu)秀"EndIfLab2.Caption=t1+t2EndSub例23：設(shè)計一個程序，顯示例16的一首詩“海門”時為一行一行的顯示。設(shè)計窗體有一個文本框和兩個命令按鈕。運行時，當點擊“顯示”命令按鈕，在文本框內(nèi)出現(xiàn)詩名，“顯示”命令按鈕變?yōu)椤袄^續(xù)”命令按鈕，“結(jié)束”命令按鈕隱含了。當點擊“繼續(xù)”命令按鈕，在文本框內(nèi)就逐行出現(xiàn)詩句，直到全部顯示完。詩句全部顯示完時，“繼續(xù)”命令按鈕隱含了，“結(jié)束”命令按鈕就顯出來。在屬性窗口分別設(shè)置如表：對象屬性設(shè)置Form1(窗體)Caption例23(名稱)
8、Form1text1(文本框1)(名稱)Txt1MultiLineTruetextCommand1(命令按鈕1)(名稱)Cmd1Caption顯示Command2(命令按鈕2)(名稱)Cmd2Caption
