Tema: Cmd Limpiar
Ver Mensaje Individual
  #4 (permalink)  
Antiguo 05/12/2005, 08:41
Avatar de lop7
lop7
 
Fecha de Ingreso: junio-2005
Ubicación: portuguesa (Venezuela)
Mensajes: 187
Antigüedad: 18 años, 11 meses
Puntos: 1
limpiar

hola...
bueno pana yo hago esto a los controles que yo quiero limpiar
le coloco en la propiedad tag=limpio esto en diseño y coloco este codigo en un modulo para llamarlo cuando lo necesite...solo tienes q validar q algunos controles no tienen la propiedad text y te daria un error solo tienes q pasar de parametro el nombre del form ok

Código:
Public Sub Limpiar(forma As Form)
Dim MiObjeto As Control

For Each MiObjeto In forma
   If MiObjeto.Tag = "limpio" Then
        MiObjeto.Text = ""
   End If
Next
End Sub
saludos...
nos vemos...
__________________
A quien dices un secreto le entregas tu libertad :si: