此主题相关图片如下:qq截图20141008084001.png
如图,窗口内定义了两个日期输入框。。。属性是date
表内有一个工资更新日期,也是date属性。
我想执行如下代码:
Dim dat1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim dat2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")
If dat1.Value > dat2.Value Then
MessageBox.Show("【起始日期】不可以大于【截止日期】,请重新输入!","提示",MessageBoxButtons.OK,MessageBoxIcon.Warning)
Else
Tables("薪资管理_Table").Filter = "[工资更新日期] > " & dat1.Value & " and [工资更新日期] < " & dat2.Value
End If
出现如下错误提示:
此主题相关图片如下:qq截图20141008084022.png
为什么呢?