我想设置生日提醒功能,结果写出来后,发现 如果我的日期格式只显示 几号的时候,这个代码有用,但是当我日期格式是 1988-2-11 的时候,提示出错:Cannot perform '=' operation on System.DateTime and System.String.
Dim dt As String = Date.Today.Day
Dim dr As DataRow = DataTables("汇众汽修客户管理系统").Find("生日 = '" & dt & "'")
If dr IsNot Nothing Then
MessageBox.Show("有客户生日了,赶快祝福客户吧!","重要提醒",MessageBoxButtons.OK,MessageBoxIcon.Information)
Tables("汇众汽修客户管理系统").Filter = "生日 = '" & dt & "'"
MainTable = Tables("汇众汽修客户管理系统")
End If
这是我的代码。。。求指教。。。在线急等