vb list boxes

• • Reply

  19 years ago

  by Veronica

  Veronica

  , United States

  Joined 19 years ago

  I am using vb code to populate two list boxes with data from a database.  One listbox is for student ID's and the other is for student grades.  How do I code the list boxes so that when I select a student ID, I get the grades for that particular student?

  Report abuse
• • Reply

  19 years ago

  by James Crowley

  James Crowley

  London, United Kingdom

  Joined 20 years ago

  Try something like this:
  

  Code:

  Private Sub cboStudents_Click()
    'clear other combo
    cboGrades.Clear
    'get the records
    Set oRS = cConn.Execute ("SELECT TheGrade FROM Grades WHERE StudentName='" & cboStudents.Text & "'"
    Do While oRS.EOF = False
        cboGrades.Add oRS("TheGrade")
    Loop
    Set oRS = Nothing
  End Sub

  Report abuse