すみません。どなたかご存知の方はいらっしゃらないでしょうか？

VB6.0でDetailセクションに配置されたLabelコントロールの名称が
"Label1"〜"Label5"である場合に、それらのプロパティをまとめて
変更する方法は、どのようにすればよろしいでしょうか？

たとえば.NETでは、以下のようになるかと思います。
========================================================
Private Sub Detail_Format(ByVal sender As Object, ByVal e As System.EventArgs) Handles Detail.Format

　Dim i As Integer
　For i = 1 To 5
　　CType(Me.Detail.Controls("Label" + i.ToString()), Label).Text = "AAA"
　　CType(Me.Detail.Controls("Label" + i.ToString()), Label).Top _
　　　　　　　　　　　　　　　　　　　　　　= System.Drawing.Color.Blue
　Next i
End Sub
========================================================

これをVB6.0で表記するにはどのようにすればよろしいのでしょうか？
宜しくお願いします。