cambiar de tamaño un user control en VB6

Jz38 · #1 (**permalink**) 14/06/2004, 14:42

Me gustaria saber si hay alguna forma de hacer que dando uno o dos parametros a un user control lo pueda colocar en un formulario al tamaño que yo quiera ,esto es todos los controles textbox,etc.. se escalen de forma automática.Gracias.

Kelpie · #2 (**permalink**) 15/06/2004, 08:28

No se alo que te refieres con user control, pero quizás esto es lo que buscas:

Repasa todos los controles del formulario y hazles lo que quieras (contando con que el formulario se llama form1):

Código:

  dim este as control
  for each este in form1.controls
    este.width=1.5*este.width  'Hacerlo más grande
    if typeof este is textBox then
      este.fontsize=12  'A los textbox poner letra de 12
    end if
   next  'este

Espero que te sirva...

Jz38 · #3 (**permalink**) 15/06/2004, 12:55

Muchas Gracias. No se me había ocurrido.

RootK · #4 (**permalink**) 15/06/2004, 13:07

Cita:

No se alo que te refieres con user control,

Creo que se refiere a un user control de .Net

O no.?

Jz38 · #5 (**permalink**) 15/06/2004, 16:11

No gracias, me refería al VB6.La respuesta anterior me puede valer.
Gracias de todos modos