Duda sobre usar objetos
Publicado por Jorge (56 intervenciones) el 07/09/2011 18:07:07
Hola a todos, buen día...
Tengo esta duda:
Quiero hacer una clase para usarla con los textbox, para que cada vez que el textbox obtenga el foco se cambie de color, se seleccione el texto, permita numeros o letras, se use el "enter" ademas del "tab" para pasar a otro objeto y cosas asi...
Bueno eso ya está, pero para q funcione, en el form_load() asigno los objetos por cada textbox q haya en el form, entonces.... ¿Esto puede saturar la aplicación?
la cosa va algo asi:
Tengo esta duda:
Quiero hacer una clase para usarla con los textbox, para que cada vez que el textbox obtenga el foco se cambie de color, se seleccione el texto, permita numeros o letras, se use el "enter" ademas del "tab" para pasar a otro objeto y cosas asi...
Bueno eso ya está, pero para q funcione, en el form_load() asigno los objetos por cada textbox q haya en el form, entonces.... ¿Esto puede saturar la aplicación?
la cosa va algo asi:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub Form_Load()
Set Objtxt1 = New ClaseTextBoxConFormato Set Objtxt2 = New ClaseTextBoxConFormato Set Objtxt3 = New ClaseTextBoxConFormato' ...
Set Objtxtn = New ClaseTextBoxConFormato Objtxt1.Iniciar Text1 Objtxt2.Iniciar Text1 Objtxt3.Iniciar Text1' ...
Objtxtn.Iniciar Text1 Objtxt1.EsNumerico Objtxt1.SigEnter Text2 Objtxt2.SigEnter Text3' ... etc
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set Objtxt1 = Nothing Set Objtxt2 = Nothing Set Objtxt3 = Nothing' ...
Set Objtxtn = NothingEnd Sub
Valora esta pregunta
0