VB.net和Access數據庫的DateTimePicker範圍

Question

我是一個沮喪的Newb。我正在嘗試使用幾個datetimepickers來顯示DataGridView中的Access數據庫的日期範圍。這裏是代碼我使用：

Dim dtp1 As String = DateTimePicker1.Text 
Dim dtp2 As String = DateTimePicker2.Text 
Dim strCriteria, task As String 

Me.Refresh() 
If dtp1 = "" Then 
MsgBox("Please Enter The Date Range", vbInformation, "Date Range Required") 
Else 
strCriteria = "([Appt Date] >= #" & dtp1 & "# And [Appt Date] <= #" & dtp2 _ 
& "#)" 
task = "SELECT * FROM BDC1 WHERE (" & strCriteria & ") order by [Appt Date]" 

End If 

Answer 1

嘗試更改您的代碼：

 Dim dtp1 As String = DateTimePicker1.SelectedDate.Value.ToString("#yyyy/MM/dd#") 
     Dim dtp2 As String = DateTimePicker1.SelectedDate.Value.ToString("#yyyy/MM/dd#") 

     Dim con As SqlConnection ="Your connection string here"  
     task = "SELECT * FROM BDC1 WHERE [Appt Date] BETWEEN '" + dtp1 + "' AND '" + dtp2 + "' 
     order by [Appt Date]" 
     Dim da As SqlDataAdapter = New SqlDataAdapter(task , con) 
     dim dt as new datatable() 
     da.Fill(dt) 
     con.Close() 
     YourdatagridviewName.Datasource=dt