String em Objeto(label)

['''''''''''''' 0]

/*VB6*/

 

Tenho 42 LABEL no meu form.

Quero fazer com que elas fiquem: ENABLED = FALSE, somente quando tal botão seja pressionado;

Gostaria de usar um FOR para isso:

 

Dim lab as String
Dim i as integer

for i = 1 to 42
lab = "nome_" & i
lab.Enabled = false
next

 

Algo como no código acima.

Porem, como podem perceber, o código acima é inutil.

Lab é uma STRING e não o nome da LABEL.

Pesquisei muito, mais não consegui faze-lo funcionar.

 

Ajudem D:

 

Desde já agradeço!

[KhaosDoctor 242]

Use um for each:

 

For each lbl as object in me.controls

if typeof lbl is Label Then

lbl.enabled = false

end if

next