Visual Basic - Listar nombres

Hola... el profesor me mando a hacer un programa en el cual se tiene un vector con nombres de personas y que con un boton, el usuario busque el nombre. Si pone las primeras letras por ejemplo "Jo" que aparezcan todos los nombres que empiecen con "Jo"... si alguien me puede ayudar a hacerlo muchas gracias. Flopi

ponte a trabajar, so vago! y no pidas a los demas que hagan tus deberes.

Supongamos que tu vector se llame Nombres de 1 a 20
y en Text1.text tienes las primeras letras

I = 1
do while I < 20
If left(Nombres(i), 2) = text1.text then
list1.additem, Nombres(i)
end if
I = I +1
loop