Office中国论坛/Access中国论坛

标题: [求助]那位好心人帮我改下程序,谢谢! [打印本页]

作者: cenqd 时间: 2006-6-29 08:34
标题: [求助]那位好心人帮我改下程序,谢谢!
就只有一个表,一个窗体,我想在窗体中输入发货日期,然后点查找,窗体中的数据就跳到该日期的第一笔记录．

文本的数据类型我可以做到这样，但是日期型的数据就出错，提示数据类型不匹配，谁帮我改改好吗？

[attach]18779[/attach]

作者: 一点通 时间: 2006-6-29 16:16
请参考一下这些例子

http://www.office-cn.net/forum.php?mod=viewthread&tid=9226

作者: cenqd 时间: 2006-7-1 05:21
这个例子以前我也下过,可能自己太菜,感觉还是和我的情况有点不同,哭.

谁花少许时间帮我改下好吗?谢谢了.

高手是一点就通..我是菜鸟,怎么点怎么不通,请不要见怪.

作者: lanchong 时间: 2006-7-1 06:03
Private Sub find1_Click()
Dim rst As DAO.Recordset
Set rst = Me.Recordset
rst.FindFirst "发货日期= #" & Format(Me.Text52, "yyyy-mm-dd") & "#"
If rst.NoMatch Then MsgBox "记录未找到!"
End Sub

作者: cenqd 时间: 2006-7-1 13:04

以下是引用cenqd在2006-6-30 21:21:00的发言：

这个例子以前我也下过,可能自己太菜,感觉还是和我的情况有点不同,哭.

谁花少许时间帮我改下好吗?谢谢了.

高手是一点就通..我是菜鸟,怎么点怎么不通,请不要见怪.

谢谢你,OK啦....

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)