以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于判断窗体日期框是否空值问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=195056)

--  作者:裴保民
--  发布时间:2025/2/18 12:51:00
--  关于判断窗体日期框是否空值问题
If e.Form.Controls("DateTimePicker2").value = "" Then
    e.Form.Controls("DateTimePicker2").value = e.Form.Controls("DateTimePicker1").value
ElseIf e.Form.Controls("DateTimePicker2").value.AddDays(90) > Date.Today Then
 e.Form.Controls("DateTimePicker2").value = e.Form.Controls("DateTimePicker2").value.AddDays(90) 
End If
那地方有问题为什么当e.Form.Controls("DateTimePicker2").value不为空值时运行就会出错

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_20250218_124806.png
图片点击可在新窗口打开查看


--  作者:有点蓝
--  发布时间:2025/2/18 13:47:00
--  
If e.Form.Controls("DateTimePicker2").text = "" Then

或者

If e.Form.Controls("DateTimePicker2").value = nothing Then
[此贴子已经被作者于2025/2/18 16:51:27编辑过]

--  作者:裴保民
--  发布时间:2025/2/18 16:47:00
--  
e.Form.Controls("DateTimePicker2")怎么没有textvalue 属性呀?


--  作者:有点蓝
--  发布时间:2025/2/18 16:51:00
--  
If e.Form.Controls("DateTimePicker2").text = "" Then
--  作者:裴保民
--  发布时间:2025/2/18 16:53:00
--  
我以前用的就是If e.Form.Controls("DateTimePicker2").text = "" Then
运行后出错 我试试
[此贴子已经被作者于2025/2/18 16:53:28编辑过]

--  作者:有点蓝
--  发布时间:2025/2/18 16:56:00
--  
我测试没有问题