'Este exemplo mostra como classificar os itens de um
'ComboBox em ordem alfabética.

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 Button1_Click(ByVal sender As System.Object, _
       ByVal e As System.EventArgs) Handles Button1.Click
    'classifica os itens do ComboBox em ordem alfabética
    ComboBox1.Sorted = True
  End Sub
End Class

Informe um número inteiro: 16
O número informado foi: 16
O antecessor é 15
O sucessor é: 17