以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于判断语句顺序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=108020)
--  作者：裴保民
--  发布时间：2017/10/14 13:57:00
--  关于判断语句顺序

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 条件"有一个条件满足时执行该语句块

 
--  作者：2900819580
--  发布时间：2017/10/14 14:08:00
--  

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
--  作者：有点蓝
--  发布时间：2017/10/14 14:36:00
--  
1楼没有问题，就是你描述的用法。

确定你描述的用法是你想要的用法？
--  作者：裴保民
--  发布时间：2017/10/14 15:47:00
--  

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

 

 

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

 

 

 

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

 

不判断条件：xgjinzhihangjianyidong = False 

[此贴子已经被作者于2017/10/14 16:17:51编辑过]
--  作者：有点蓝
--  发布时间：2017/10/14 16:17:00
--  
肯定有判断
--  作者：裴保民
--  发布时间：2017/10/14 16:18:00
--  

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

 

 

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

 

[此贴子已经被作者于2017/10/14 16:23:14编辑过]
--  作者：有点蓝
--  发布时间：2017/10/14 16:26:00
--  
xgjinzhihangjianyidong变量的值自己改过了吧，第一次能够判断不可能第二次不判断的，只是条件不符合而已