Lee
Saludos
Cita de: Novlucker en 26 Septiembre 2009, 20:42 PM
Recuerda poner la propiedad de Multiline como True
Saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: Novlucker en 26 Septiembre 2009, 20:42 PM
Recuerda poner la propiedad de Multiline como True
CitarA ver si entiendes xDNo
Private Sub Command1_Click()
Text1.text = "Ejemplo" & vbnewline & "Elhacker.net"
End Sub
do
texto = InputBox("Escribe un texto","Ejemplo para nov xD","Escribe casa")
if texto <> "casa" then
frase = "Vivo en una "&texto
msgbox frase
else
msgbox "Vivo en una casa"
end if
loop
do
texto = InputBox("Escribe un texto","Ejemplo para nov xD","Escribe casa")
if texto <> "casa" then
frase = "Vivo en una "&texto
msgbox frase
end if
loop
if condicion <> correcta
'codigo que se te ocurra