以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于判断语句顺序  (http://foxtable.net/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变量的值自己改过了吧,第一次能够判断不可能第二次不判断的,只是条件不符合而已