office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access 利用NOT设置条件语句

2017-12-26 16:16:00
tmtony8
原创
5704

在vba中,我们用If...Then...else...End If结构来判断条件是符合哪一种情况

这里介绍一个Not语法的技巧。在逻辑结构中,只有TRUE和FALSE的情况,直接使用not 来切换条件。


如图,在窗体中添加一个按钮。设置文本字体是否下划线和倾斜。


一般情况下,我们是先判断当前字体的窗体,再做相应的设置的。

这里我们用Not直接判断当前字体的样式,非真即假。如下代码

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



再按一下效果图:

    分享