从datetimepicker发送查询问题 [英] Problem to send query from datetimepicker
本文介绍了从datetimepicker发送查询问题的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我正在使用访问数据库.我试图让查询从datetimepicker中选择一个日期.但是我什么也没得到.从组合框使用相同的查询,我得到了所需的行.请帮帮我.
我的代码在这里:
I am using access database. I tried to make query selecting a date from datetimepicker. But I didn''t get any row. From combobox using the same query I got the desired row. Please help me.
My code is here:
Public Class Form1
Dim con As New OleDb.OleDbConnection
Dim da, da1 As OleDb.OleDbDataAdapter
Dim ds, ds1 As New DataSet
Dim s As New connect.Class1
Dim i, j As Integer
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
con.ConnectionString = s.a1
con.Open()
da1 = New OleDb.OleDbDataAdapter("Select Dat from Sale", con)
da1.Fill(ds1, "Tab")
i = ds1.Tables("Tab").Rows.Count
For j = 0 To i - 1
ComboBox3.Items.Add(ds1.Tables("Tab").Rows(j).Item(0))
Next
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked = True Then
Dim cmb As String
cmb = Trim(ComboBox3.Text)
''cmb = DateTimePicker1.Text
ds.Clear()
''da = New OleDb.OleDbDataAdapter("Select * from Sale where Dat=''" & cmb & "''", con)
da = New OleDb.OleDbDataAdapter("Select * from Sale where Dat=''" & cmb & "''", con)
da.Fill(ds, "Tab")
con.Close()
DataGridView1.DataSource = ds.Tables("Tab").DefaultView
DataGridView1.Show()
End If
End Sub
End Class
Namespace connect
Public Class Class1
Public a1 As String = "Provider=microsoft.jet.oledb.4.0;data source=D:\CDshop.mdb"
End Class
End Namespace
推荐答案
尝试设置相关的日期格式
Try setting the relevant date format
cmb = DateTimePicker1.Value.ToString("yyyy-MM-dd") 'Replace the format(yyyy-MM-dd) with what you have in access database
这篇关于从datetimepicker发送查询问题的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文