Backup Oficial de SeguridadBlanca.Org

viernes, 31 de julio de 2009

Programación: Un poco de Visual Basic 6.0

vamos a hacer un programita que te ponga letras en mayusculas o en minusculas segun lo que querramos, agregamos un command, un checkbox y un textbox:

en primer lugar declaramos las variables:

Dim a As String, b As String

luego muy facil

preguntamos si el checkbox está activado:

If Check1.Value = 1 Then

si eso es verdadero vamos a convertir todo en mayusculas

b = LCase(Text1.Text)

y lo mostramos

MsgBox b

de lo contrario

Else

es decir si el checkbox no está seleccionado

a = UCase(Text1.Text)

mostramos

MsgBox a

Consluye:

End If



Ahora el codigo completo será algo como:

Dim a As String, b As String

If Check1.Value = 1 Then
b = LCase(Text1.Text)
MsgBox x
Else
a = UCase(Text1.Text)
MsgBox a
End If



Ahora ya ustedes pueden agregar variantes con radio buttons o incluso poniendole un input segun su conocimiento.


Saludos
Dr.White

No hay comentarios:

Publicar un comentario