Visual Basic - mayus en el primer caracter de una cadena

alguien puede decirme como se le hace para poner la primera letra de una palabra en mayusculas ??
por ejemplo, si tengo en un textbox "valores de una cadena"
necesito que se convierta a "Valores De Una Cadena"
muchas gracias desde ya !

Programa!!!!!

Es decir.

cadena = Ucase(Mid(cadena,1,1)) & Mid(cadena,2, len(cadena))

Puede que tengas que cambiar los indices pero por ahi va la cosa.

VB trae una funcion build-in para eso que es:
StrConv() y como se conversion le pones vbProperCase
ej:
s = StrConv(s, vbProperCase)

muchas gracias por su ayuda !