Conversión y restauración de texto VB

Función Ucase y función Lcase

Ucase("string"): convierte todas las letras minúsculas de la cadena a mayúsculas, y la cadena final será todas letras mayúsculas.

Lcase("string"): convierte todas las letras mayúsculas de la cadena a minúsculas y la cadena final son todas letras minúsculas. Nota: Debido a que tiene la función de restauración, debe guardar la cadena original antes de la conversión. Ejemplo: Primero defina la variable Private Sub Form_Load()

dim savetextEnd Sub Convertir a mayúsculas: inserte el código en el evento de clic del botón en mayúsculas si savetext="" luego savetext=text1.textend iftext1.text=Ucase( text1.text) a minúsculas: inserte el código en el evento de clic del botón en minúsculas si savetext="" luego savetext=text1.textend iftext1.text=Lcase(text1.text) Restaurar: inserte el código en el evento de clic del botón restaurado text1.text= guardartextguardartext=""