Getting Database Data To Show In Textboxes?

Alright it's been awhile since I messed with this project, so here goes. It's an appointment scheduler and everything works except two things: I can't edit existing appointments and it only records the current time, not the timeslot I click on.

If I try to edit an existing appointment it doesn't get the row data, just shows me blank text boxes. I assume I have to have those text boxes read the info from the database, but I don't know how to do that.

This is how it looks:

So, you double click a time slot and it looks like the second window. You can right click on an existing appointment to edit it, but when you do that all the text boxes remain blank like you're inserting a new one.

What code would I use to read whatever row's data I am trying to edit and insert it back into the boxes?

Here is the code I use to add new rows to the DB:

Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click
Dim NR As TestAppointmentDataBaseDataSet.AppointmentRow

[Code].....