Private Sub cmbConfirmationNum_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbConfirmationNum.SelectedIndexChanged Dim mjrReservation As CReservation = CType(reader.Deserialize(input), CReservation) If cmbConfirmationNum.SelectedIndex = mjrReservation.ConfirmationNumber Then txtGuestName.Text = mjrReservation.GuestName txtGuestPhone.Text = mjrReservation.Phone txtNumberGuests.Text = mjrReservation.NumberOfGuests txtRoomAssigned.Text = mjrReservation.RoomAssigned txtDailyRate.Text = mjrReservation.DailyRate calAriving.Text = mjrReservation.DateArriving calDeparting.Text = mjrReservation.DateDeparting txtConNum.Text = mjrReservation.ConfirmationNumber End If End Sub