以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请指正  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189739)

--  作者:nxqtxwz
--  发布时间:2023/12/22 10:54:00
--  请指正
这两行代码怎么写才正确呢,请老师指教。

If e.Row.IsNull("DateTimePicker1") Then    判断这个控件不是否为空值
 
e.Row("NumericComboBox12") = Date.Today.Year - e.Row("DateTimePicker1").Year - 1   代码写在控件事件中


--  作者:有点蓝
--  发布时间:2023/12/22 11:24:00
--  
1、
If tables("DateTimePicker1这个控件绑定的表的名称").current.IsNull("DateTimePicker1这个控件绑定的列的名称") Then 
如果没有绑定
if e.form.controls("DateTimePicker1").text = ""

2、
tables("NumericComboBox12这个控件绑定的表的名称").current("NumericComboBox12这个控件绑定的列的名称")  = Date.Today.Year - tables("DateTimePicker1这个控件绑定的表的名称").current("DateTimePicker1这个控件绑定的列的名称").Year - 1
如果没有绑定
e.form.controls("NumericComboBox12").value = Date.Today.Year -  - e.form.controls("DateTimePicker1").Year - 1

--  作者:nxqtxwz
--  发布时间:2023/12/22 12:00:00
--  

[此贴子已经被作者于2023/12/24 18:20:11编辑过]

--  作者:有点蓝
--  发布时间:2023/12/22 13:34:00
--  
e.form.controls("DateTimePicker1").value.Year
--  作者:nxqtxwz
--  发布时间:2023/12/22 14:02:00
--  

[此贴子已经被作者于2023/12/24 18:20:37编辑过]

--  作者:有点蓝
--  发布时间:2023/12/22 14:10:00
--  
If e.form.controls("DateTimePicker1").text = "" Then


--  作者:nxqtxwz
--  发布时间:2023/12/22 14:47:00
--  
If e.form.controls("DateTimePicker1").text = "" Then

这样写也不行,不出错了,好象没有进入高级教师和一级教师这两个条件中,结果一直是0

--  作者:有点蓝
--  发布时间:2023/12/22 14:48:00
--  
日期控件没有值,或者没有选高级教师和一级教师这两个条件
--  作者:nxqtxwz
--  发布时间:2023/12/22 14:58:00
--  


[此贴子已经被作者于2023/12/24 18:21:10编辑过]

--  作者:有点蓝
--  发布时间:2023/12/22 15:01:00
--  
日期控件没有值