Y que tal un pequeño arregloa lo que hizo nuestro amigo seba123neo???
Algo así???:
Código:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
With (ComboBox1.Items)
.Add("sebastián")
.Add("Eduardo")
.Add("Jose")
End With
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
'MsgBox(Strings.Left(ComboBox1.Text, 1))
ComboBox1.Text = Strings.Left(ComboBox1.SelectedItem, 1)
End Sub
End Class Espero te sirva... saludos...

__________________
Atentamente, Juan Ríos Pizarro...
Saludos desde Chile...
PD: Perdí mi mascota... buaaaaaaaa.... al menos encontré una nueva