string variable as object name problem

[IanJG]

Hi
Am i missing something
The label names are comp1label, comp2label, etc
The msgbox gives the correct name but applying the caption does not?
thanks for you help

Private Sub refreshbutton1_Click()
Dim i As Integer
Dim qL As String

For i = 1 To 9
qL = "comp" & (i) & "label"
MsgBox qL
With qL
.Caption = "hope for success"
End With
Next i
end sub

 

[VoG]

Try

With Label(qL)

 

[RoryA]

You can't use a string as an object. If the controls are on a userform you can use:

With Me.Controls(qL)

 

[IanJG]

You can't use a string as an object. If the controls are on a userform you can use:

With Me.Controls(qL)

Thanks RoryA thanks perfect, thanks Vog that code is helpful to, thanks