Vb.net 预订房间（在两个日期之间搜索）

我正在尝试搜索数据库以查找DateTimePicker中选择的日期（也是中间日期），然后从组合框中删除这些项目。但是，没有错误，只是选择后数据仍在组合框中

  Dim date1 As DateTime = dtpDateIn.Value()
    Dim date2 As DateTime = dtpDateOut.Value()
    Dim da As OleDbDataAdapter = New OleDbDataAdapter
    Dim BookingFound As String = False 
    MyConn = New OleDbConnection 

    MyConn.ConnectionString = connString 

    MyConn.Open() 

    str1 = ("Select * from BookingInformation where [Date In] >= '" & date1 & "' AND [Date Out] <= '" & date2 & "'") 

    Dim cmd1 As OleDbCommand = New OleDbCommand(str1, MyConn) 
    dr = cmd1.ExecuteReader 

    While dr.Read() 
        BookingFound = True 

        strDateOut = dr("Date Out").ToString 
        strDateIn = dr("Date In").ToString 
        strRoomNumber = dr("Room Number").ToString 

        CmbRooms.Items.Remove(strRoomNumber)
    End While
    MyConn.Close() 

Dim date1 As DateTime=dtpDateIn.Value（）
Dim date2 As DateTime=dtpDateOut.Value（）
作为OleDbDataAdapter的Dim da=新OleDbDataAdapter
Dim BookingFound As String=False
MyConn=新的OLEDB连接
MyConn.ConnectionString=connString
MyConn.Open（）
str1=（“从BookingInformation中选择*，其中[Date In]>=”&date1&“和[Date Out]这是学习如何使用调试器的好机会。从断点开始，然后从那里开始。顺便说一句，你不应该使用字符串来进行SQL查询。始终使用参数。你可能还想从这些日期中减去时间。请阅读并记下你最好集中在一个问题上，而不是多次提问。这是学习如何使用调试器的绝佳机会。从断点开始，然后从那里开始。顺便说一句，您不应该使用字符串进行SQL查询。始终使用参数。您可能还希望从这些日期中减去时间。请阅读并记下您最好集中在一个问题上，而不是多次提问s