Hello, how's it going? Me...I am very frustrated. I have been working on this for a few hours and unfortunately I am at a stand still. I am making an airline reservation form and have "hit a brick wall" This code used database programming and unfortunately I am not able to get a list of passengers in my reservationsListBox.
I am also unable to choose a flight number - it defaults to flight number 250. Please bear with me, I am new to this but I would love to learn from anyone that is able to lend a hand.
I really appreciate you taking the time to read this.
Have a great Day!!Darci
CODE
Public Class AirlineReservationForm
' Private Sub FlightsBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
' Me.Validate()
' Me.FlightsBindingSource.EndEdit()
' Me.FlightsTableAdapter.Update(Me.ReservationsDataSet.Flights)
' End Sub
' Private Sub FlightsBindingNavigatorSaveItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlightsBindingNavigatorSaveItem.Click
' Me.Validate()
' Me.FlightsBindingSource.EndEdit()
' Me.FlightsTableAdapter.Update(Me.ReservationsDataSet.Flights)
' End Sub
Private Sub AirlineReservationForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'ReservationsDataSet.Reservations' table. You can move, or remove it, as needed.
Me.ReservationsTableAdapter.Fill(Me.ReservationsDataSet.Reservations)
'TODO: This line of code loads data into the 'ReservationsDataSet.Flights' table. You can move, or remove it, as needed.
Me.FlightsTableAdapter.Fill(Me.ReservationsDataSet.Flights)
End Sub
Private Sub flightNumberComboBox_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles flightNumberComboBox.SelectedIndexChanged
'display flight numbers in combo box...not sure of the following code
'flightNumberComboBox.DataSource = flightNumber
'If flightNumber <> flightNumber Then
FlightsTableAdapter.Fill(ReservationsDataSet.Flights) ', flightNumberComboBox.Text)
' Else
ReservationsTableAdapter.Fill(ReservationsDataSet.Reservations)
' End If
' flightNumberComboBox.Text = " "
End Sub
Private Sub DepartureCityTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DepartureCityTextBox.TextChanged
End Sub
End Class
Thank you very much.
30 Jul, 2008 - 04:43 PM
| 