Basic - Texto capital

 
Vista:

Texto capital

Publicado por lrcvs (17 intervenciones) el 15/09/2008 00:11:00
'Programa para poner la primera letra de un texto en mayusculas
'... y el resto en minusculas.

'a$ = Es el texto a modificar
'b$ = Es el texto modificado

a$ = "kjiuJHBlkbbhjhhjuHJgJJKhgjJhBj"

b$ = UCASE$(LEFT$(a$, 1)) + LCASE$(MID$(a$, 2, LEN(a$) - 1))

'Aqui lo presentamos ya terminado
PRINT b$

'lrcvs 14.09.08
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder