'Este exemplo mostra como selecionar um item da ListBox
'via código

Public Class Form1
  Private Sub Button1_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button1.Click

    'seleciona o terceiro item da lista
    ListBox1.SetSelected(2, True)

  End Sub

  Private Sub Form1_Load(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles MyBase.Load
    'Adiciona quatro itens à lista
    ListBox1.Items.Add("Goiânia")
    ListBox1.Items.Add("São Paulo")
    ListBox1.Items.Add("Cuiabá")
    ListBox1.Items.Add("Rio de Janeiro")
  End Sub
End Class

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