Access 利用NOT設(shè)置條件語句

在vba中，我們用If...Then...else...End If結(jié)構(gòu)來判斷條件是符合哪一種情況

這里介紹一個Not語法的技巧。在邏輯結(jié)構(gòu)中，只有TRUE和FALSE的情況，直接使用not 來切換條件。

如圖，在窗體中添加一個按鈕。設(shè)置文本字體是否下劃線和傾斜。

一般情況下，我們是先判斷當(dāng)前字體的窗體，再做相應(yīng)的設(shè)置的。

這里我們用Not直接判斷當(dāng)前字體的樣式，非真即假。如下代碼

Private Sub Command2_Click()
    
    Me.Label7.FontUnderline = Not Me.Label7.FontUnderline
    Me.Label7.FontItalic = Not Me.Label7.FontItalic
      
End Sub

再按一下效果圖：