Tema: caja de texto
Ver Mensaje Individual
  #10 (permalink)  
Antiguo 13/12/2003, 19:21
Avatar de bleid
bleid
 
Fecha de Ingreso: noviembre-2002
Mensajes: 340
Antigüedad: 22 años
Puntos: 0
Pues no supe como correrlos me marcaba error en el set

Private fz As Form_ControlPos

Private Sub Form_Load()

Set fz = New Form_ControlPos

With fz
Call .Init(Me)
Call .AddProportional(Text1)
Call .AddProportional(Command1)
End With

End Sub