vb calender日历控件双击日期如何从数据库中取出当日数据？？

其实天狠蓝发布于 2013-03-28 10:25， 2015 次点击

Private Sub Calendar1_DblClick()
sql = "select conten from files where date='" & Date & "'"
Dim rs As New ADODB.Recordset
rs.Open sql, conn
Text1.Text = rs(0)
End Sub

这么写date显示的就是当日日期，怎么办呢？

4 回复

其实天狠蓝2013-03-28 10:44

新手求帮助啊，，，，

xbj_hyml2013-03-28 15:01

Private Sub Calendar1_DblClick()
    dim tempStr as String
    tempStr=Date & " %"
    sql = "select conten from files where date like '" & tempStr & "'"
    Dim rs As New ADODB.Recordset
    rs.Open sql, conn
    Text1.Text = rs(0)
End Sub
----取出一天的数据，是这个意思嘛？

其实天狠蓝2013-03-28 16:52

是取出一天的数据，但还是没实现啊

只有本站会员才能查看附件，请登录

wxflw2013-04-05 15:49

=后面好像错了吧？