В коде, где вы создаете выпадающие списки, добавьте:
''// You already have this code...
Dim oDropDown as New DropDown
''// Whatever other declarations you need...
AddHandler oDropDown.SelectedIndexChanged, _
AddressOf oDropDown_SelectedIndexChanged
Обычно вы добавляете раскрывающийся список в свой проект из панели инструментов и можете использовать раскрывающееся меню в разделе «Кодовое представление» для выбора события SelectedIndexChanged. Мы должны сделать это вручную в этом случае, поэтому создайте вашу подпрограмму:
Public Sub oDropDown_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
''// Do whatever you need to do here
''// I sometimes do this to make code manipulation easier:
Dim _sender as DropDown = CType(sender, DropDown)
End Sub
Надеюсь, это поможет!