
16/12/2014, 14:43
|
 | | | Fecha de Ingreso: julio-2006 Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 18 años, 9 meses Puntos: 29 | |
Respuesta: Agregar variable a nombre de caja de texto Es facil. Controls contiene todos los controles que hayas insertado en el formulario actual (Me).
Igual puedes usar "Form1.Controls".
El otro coge los 4 caracteres de la izquierda del nombre del control al que apunta la variable "ElControl" para ver si empieza con "Text".
Podria aclararlo mejor asi:
Dim ElControl As Control ' creamos una variable de tipo Control
For Each ElControl In Me.Controls ' cada Control que hay en el formulario lo vamos asignando a la variable ElControl para manipularlo
If Left$(ElControl.Name, 4) = "Text" Then ' si los 4 caracteres de la izquierda del nombre del Control son "Text"...
ElControl.Text = "0" ' ....es que es un textbox y le ponemos el valor "0"
End If
Next ElControl ' y pasamos al siguiente control
Saludos
__________________ No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza!
Última edición por pkj; 16/12/2014 a las 14:51 |