【正文】
f End Sub 分支結(jié)構(gòu)程序例題二 Dim x As Integer x = InputBox(“請(qǐng)你輸入一個(gè)正整數(shù) , 輸入一個(gè)正整數(shù) ) If x 0 Then Print 你真聰明! Else Print “ 你動(dòng)動(dòng)腦筋啦,連什么是正整數(shù)都不懂! End If 條件語(yǔ)句的格式 If <條件> then 語(yǔ)句塊1 Else 語(yǔ)句塊2 End if 說(shuō)明:如果條件成立 (true),則執(zhí)行語(yǔ)句塊1; 否則,執(zhí)行語(yǔ)句塊2; 條件的設(shè)置必須根據(jù)具體的問(wèn)題而立。 條件成立 語(yǔ)句塊1 語(yǔ)句塊2 條件語(yǔ)句的下一語(yǔ)句 否 是