i already tried something like this and got an ArgumentOutOfRangeException error. got this error with your code too

Quote Originally Posted by gnaver
this works but is a little ugly code...

Code:
   Private Sub combo_change(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboFullTime.SelectedIndexChanged, cboPartTime.SelectedIndexChanged
        If CType(sender, ComboBox).Name = "cboFullTime" Then
            Select Case cboFullTime.SelectedIndex
                Case 0
                    cboPartTime.SelectedIndex = 1
                Case 1
                    cboPartTime.SelectedIndex = 0
            End Select
        Else
            Select Case cboPartTime.SelectedIndex
                Case 0
                    cboFullTime.SelectedIndex = 1
                Case 1
                    cboFullTime.SelectedIndex = 0
            End Select
        End If
    End Sub
dont know if this was what you wanted ?