'Este exemplo mostra como detectar quando um item é
'selecionado no ComboBox. Aqui nós usamos o evento
'SelectedIndexChanged para detectar alterações na
'propriedade SelectedIndex (que representa o índice
'selecionado) do ComboBox.

Public Class Form1
  Private Sub Form1_Load(ByVal sender As System.Object, _
       ByVal e As System.EventArgs) Handles MyBase.Load
    'adiciona itens no combo
    ComboBox1.Items.Add("Visual Basic")
    ComboBox1.Items.Add("C#")
    ComboBox1.Items.Add("Java")
    ComboBox1.Items.Add("Delphi")
    ComboBox1.Items.Add("JavaScript")
  End Sub

  Private Sub ComboBox1_SelectedIndexChanged(ByVal sender _
       As System.Object, ByVal e As System.EventArgs) Handles _
       ComboBox1.SelectedIndexChanged
    Dim indice As Integer = ComboBox1.SelectedIndex
    MsgBox("O índice selecionado agora é: " & indice)
  End Sub
End Class

Informe o ano: 2024
O ano informado é bissexto.