主题：关于DTPicker和access日期输入的问题！
viviwang
[专家分：0] 发布于 2011-09-23 23:11:00
怎样才能让DTPicker输入到access的日期不重复，每次重复时给予提醒？
If CDate(DTPicker1.Value) = Adodc1.Recordset("日期") Then
MsgBox "您选择的日期重复，请重新选择日期", vbOKCancel, "错误提示"
Else
Text2.Text = DTP.Value
Adodc1.Recordset.AddNew
Adodc1.Recordset("日期").Value = CDate(DTPicker1.Value)
Adodc1.Recordset.Update
Adodc1.Refresh
End If
最后更新于：2011-09-24 23:32:00
回复列表 （共1个回复）
沙发
acterbuyy [专家分：0] 发布于 2011-10-31 17:14:00
[url=http://www.cheapreplicawatche.co.uk/best-replica-uboat-watches-99.html]U-Boat Watches[/url]
[url=http://www.chanelhandbagsale.net/]Chanel Handbags[/url]
[url=http://www.chanelhandbagsale.net/]Replica Chanel[/url]
[url=http://www.chanelhandbagsale.net/]Chanel Replicas[/url]
[url=http://www.chanelhandbagsale.net/]Chanel on Sales[/url]
[url=http://www.cheapreplicawatche.co.uk/]replica watches[/url]
[url=http://www.cheapreplicawatche.co.uk/]replica watches UK[/url]
[url=http://www.cheapreplicawatche.co.uk/]Fake watches[/url]
[url=http://www.cheapreplicawatche.co.uk/]Rolex Replica[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-bell-ross-watches-349.html]Bell & Ross Watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-breitling-watches-312.html]Breitling Watches[/url]
[url=http://www.replicahause.org.uk]Replica Watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-omega-watches-170.html]Omega Watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-panerai-watches-292.html]Panerai Watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-patek-philippe-watches-415.html]Patek Philippe Watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-rolex-watches-143.html]Rolex watches[/url]
[url=http://www.cheapreplicawatche.co.uk/best-replica-tag-heuer-watches-166.html]Tag Heuer Watches[/url]
我来回复
您所在位置：