Something

    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