Set value of structure by index

[jswota]

Hi,

Let's say i have this...

Private Structure str_User
  Dim Info1 As String
  Dim Info2 As String
  Dim Info3 As String
  Dim Info4 As String
  Dim Info5 As String
End Structure

Private Sub FillUserInfo()
  Dim my_User As str_User

  With my_User
    .Info1 = 1
    .Info2 = 2
    .Info3 = 3
    .Info4 = 4
    .Info5 = 5
  End With
End Sub

Is it possible to set the values in a loop like this...

Private Sub FillUserInfo()
  Dim my_User As str_User

  For i As Integer = 1 to 5
    my_User(***Use i to specify position in structure***) = i
  Next
End Sub

Thanks,
Joel