主题：关于判断语句顺序

If e.OldRange.RowSel <> e.NewRange.RowSel And  jinzhihangjianyidong = False  Or  xgjinzhihangjianyidong = False   then

语句....

end if

 

怎样实现当"e.OldRange.RowSel <> e.NewRange.RowSel And  jinzhihangjianyidong = False  条件" 或"xgjinzhihangjianyidong = False 条件"有一个条件满足时执行该语句块

 

If e.OldRange.RowSel <> e.NewRange.RowSel And  ( jinzhihangjianyidong = False  Or  xgjinzhihangjianyidong = False )  then

 

试试括号。

 

Dim s As String = "SDFASFDSAFSA"
If s.Contains("FA") And (s.Contains("E") Or s.Contains("S")) Then
MessageBox.Show("A")
End If

1楼没有问题，就是你描述的用法。

我是在表的BeforeSelChange事件中写的代码,当打开程序时第一次运行没问题能判断条件：xgjinzhihangjianyidong = False  第二次再执行时就不判断了，怎么处理呢？

 

 

怎么第一个条件能判断，第二个条件不判断呢？

 

 

 

只判断条件：e.OldRange.RowSel <> e.NewRange.RowSel And  jinzhihangjianyidong = False 

 

不判断条件：xgjinzhihangjianyidong = False 

肯定有判断

我是在表的BeforeSelChange事件中写的代码,当打开程序时第一次运行没问题能判断条件：xgjinzhihangjianyidong = False  第二次再执行时就不判断了，

 

 

必须关闭程序再次启动后才能断条件：xgjinzhihangjianyidong = False呢，是怎么回事呢？怎么处理呢？

 

xgjinzhihangjianyidong变量的值自己改过了吧，第一次能够判断不可能第二次不判断的，只是条件不符合而已