Is this a web apps? You don't need to use the fillschema method becuase fill method already get the schema of the table.
VB Code:
  1. Sub BindData()
  2.     Dim strSelect as String
  3.         strSelect="SELECT * FROM booking WHERE Date=" & myDate
  4.         objBookingDA= New OleDBDataAdapter(strSelect,objConnection)
  5.         objBookingCB= New OleDBCommandBuilder(objBookingDA)
  6.         objBookingDA.Fill(objDataSet,"Bookings")
  7.         dlstBookings.DataSource=objDataSet.Tables("Bookings")
  8.         dlstBookings.DataBind
  9. End Sub

Question: When do you call the sub binddata? After you add a rows or before?
I guess you add first a row to the datatable before calling the sub binddata.