Ver Mensaje Individual
  #2 (permalink)  
Antiguo 02/02/2009, 19:24
Avatar de seba123neo
seba123neo
 
Fecha de Ingreso: febrero-2007
Ubicación: Esperanza, Santa Fe
Mensajes: 1.046
Antigüedad: 17 años, 3 meses
Puntos: 19
Respuesta: ayuda con Textbox

Hola, simplemente con las propiedades del textbox lo haces..por ejemplo:

Código:
Sub Afuera()
    Text1.Text = "Texto de Prueba"
    Text1.Font.Name = "arial"
    Text1.Font.Italic = True
    Text1.Font.Bold = False
End Sub

Sub Adentro()
    Text1.Text = "Texto"
    Text1.Font.Name = "comic sans"
    Text1.Font.Bold = True
    Text1.Font.Italic = False
End Sub

Private Sub Text1_GotFocus()
    Call Adentro
End Sub

Private Sub Text1_LostFocus()
    Call Afuera
End Sub
tenes que tener 2 controles al menos en el formulario para que se ejecute el lostfocus...

saludos.
__________________
" Todos Somos Ignorantes; lo que pasa es que no todos ignoramos las mismas cosas " - Albert Einstein