VB.Net ต้องการดักไม่ให้ผู้ใช้เลือกวันใน DateTimePicker แก้ไขตรงไหนค่ะ

sqlBring = "INSERT INTO I_Borrow (ID_W,DataCheck_W) "
                sqlBring &= " VALUES('" & LastID_W & "',"
                sqlBring &= "'" & dtbCheck.Value & "',"
               

                'บันทึกข้อมูล ในดาต้ากิจที่กำหนดไว้
                tmpID_P = lsvProductsList.Items(i).SubItems(0).Text
                tmpName_P = lsvProductsList.Items(i).SubItems(1).Text
                tmpNumber_W = CInt(lsvProductsList.Items(i).SubItems(2).Text)
                tmpNumber_approval = CInt(lsvProductsList.Items(i).SubItems(3).Text)

                sqlBring &= "'" & tmpID_P & "',"
                sqlBring &= "'" & tmpName_P & "',"
                sqlBring &= tmpNumber_approval & ","
                sqlBring &= tmpNumber_W & ")"

Private Sub dtbCheck_ValueChanged
If DateDiff(DatePicker.Text, Now) < 0 Then
            MessageBox.Show("ไม่สามารถเลือกวันย้อนหลังได้ !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End If 
End Sub