Если это всего лишь один раз, вам, вероятно, будет проще использовать словарь, но вы можете сделать это с помощью Reflection, если вы предпочитаете сохранить структуру.
В этом небольшом фрагменте кода перечислены все элементы структуры для вас в StringBuilder
.
Dim sbOutput As New System.Text.StringBuilder
Dim t As Type = GetType(xyz)
For Each p As System.Reflection.FieldInfo In t.GetFields()
sbOutput.AppendLine(p.Name)
Next