assign a variable using reflection

[Nigel Findlater]

Hallo,

I am trying to assign a variable using reflection, Does
anyone know how this is done?

Any suggestions would be appriciated..

Nigel...

This is what I have so far:

Structure TestStruct
Dim A As Integer
Dim B As Double
Dim C As Double
End Structure

Public Test As TestStruct

Public Sub TestSub(ByRef Row As Object)
Dim i As Integer
Dim fields() As FieldInfo
fields = Row.GetType.GetFields
For i = 0 To fields.Length - 1
MessageBox.Show("Field = " + fields(i).Name)
REM I would like to set element A to 1 here
Next
End Sub

TestSub(Test)
MessageBox.Show(Test.A.ToString)