將IF語句分配給窗體控件組合框

Question

我在工作表上有一個窗體控件組合框（名爲DropDown1）。我試圖分配一個if語句，但一直無法這樣做。

Sub DropDown1_Change() 

    If DropDown1.Value = "test" Then 
     Print (1) 
    Else 
     Print (2) 
    End If 

End Sub 

Answer 1

IF語句本身沒有錯。什麼是錯誤的是在分支發生後你在做什麼。

換句話說，沒有打印命令。您可以使用Debug.Print，或者您可以使用MsgBox。

下面是代碼應如何閱讀：

Private Sub DropDown1_Change() 
    If DropDown1.Value = "test" Then 
     Debug.Print 1 
    Else 
     Debug.Print 2 
    End If 
End Sub