vba if語句為判斷語句。根據條件的值,可使用 If...Then...Else 語句運行指定的語句或一個語句塊。If...Then...Else 語句可根據需要嵌套多級。
但是,為了代碼的可讀性,建議使用其余的語句,比如 Select Case 語句而不使用多層嵌套的vba中的 If...Then...Else 語句。
vba if語句用法解釋:
當條件為 True 時,若只要執行一個語句,則可以使用單行的 If...Then...Else 語法。
使用 If...Then...Else 語句可以定義兩個可執行的語句塊:其中一個塊會在條件為True 時執行;而另一個塊會在條件為 False 時執行。
vba if語句執行流程如下:
vba if語句實例剖析
vba if語句練習題以論壇的練習題《VBA IF語句答題練習》來加以解釋。
此題共兩段代碼:第一段:
Sub 隨機數()
[a1].Value = Int(Rnd * 20)
[c1].Value = Int(Rnd * 20)
End Sub
解釋:A1、C1單元格的值為隨時生成的20以內的整數。Rnd是VBA中的隨機函數,也可以使用excel工作表中的公式來取代上一段代碼,如下:
Sub 隨機數()
Range("A1,c1").Formula = "=Int(Rand() * 20)"
End Sub
第二段:
Sub 答題()
If [e1].Value = "" Then
MsgBox "還沒有輸入答案"
Else
End If
If [e1].Value = [a1].Value + [c1].Value Then
MsgBox "答對了,你真棒!"
Else
MsgBox "答錯了,繼續努力!"
End If
Call 隨機數
End Sub
代碼解釋:第一個IF語句:如果E1單元格為空,提示消息框:還沒有輸入答案。
第二個IF語句:如果E1的值等于A1+C1,提示消息框:答對了,你真棒!,否則返回答錯了,繼續努力。最后用call關鍵字調用第一段代碼。
核心關注:拓步ERP系統平臺是覆蓋了眾多的業務領域、行業應用,蘊涵了豐富的ERP管理思想,集成了ERP軟件業務管理理念,功能涉及供應鏈、成本、制造、CRM、HR等眾多業務領域的管理,全面涵蓋了企業關注ERP管理系統的核心領域,是眾多中小企業信息化建設首選的ERP管理軟件信賴品牌。
轉載請注明出處:拓步ERP資訊網http://m.hanmeixuan.com/
本文標題:vba if語句解釋和實例