Visual Basic - Ayuda con cadena de texto

Hola como andan?? quisiera que si alguien puede me diga como hacer para pasar "buenos aires" a "Buenos Aires". Es decir poner la primera letra mayuscula de cada palabra. Yo las guarde todas en minuscula para hacer las validaciones, pero necesito hacer listados y quiero que esten con la primera letra en mayuscula. Bueno espero que no sea complicado para ustedes asi me pueden ayudar. Muchas Gracias desde ya.
Hernan.

Fijate con esto:

x="buenos aires"
y=Split(x," ")
s=""
for i=lbound(y) to ubound(y):s=s+ucase(left(y(i),1))+mid(y(i),2)+" ":next i

Hola ceci, gracias por la ayuda, pero me podes explicar maso menos como funciona eso?? gracias. Hernan

Con la función Split separo la cadena por los espacios, lo obtengo en un vector que recorro y con la función Mid obtengo el primer caracter, lo transformo a mayúsculas con UCase y coloco el resto que está en minúsculas.