Hello,

just wondering if someone can help me - im using the following code to
iterate around a structure and get the name of each varaibale in the
structure. Basically i need to get the value of the item in the
structure as well as the name. Would anyone have any ideas on how to go
about this ???

  Dim i As Integer
            Dim myType As Type = oSAgreements.GetType 'Get the type of
the object
            Dim myField As FieldInfo() = myType.GetFields() 'Get the
fields from my() 'type'
            For i = 0 To myField.Length - 1
                System.Diagnostics.EventLog.WriteEntry("Test Value",
myField(i).name)
  Next i

Any help appreciated

Thanks

Colin Graham

Hi Colin,
  To extract the field name and the value out of the code you posted
you need to amend it as below.

Public Sub TestMe()
        Dim oSAgreements As New MyObject
        oSAgreements.Field1 = "Value1"
        oSAgreements.Field2 = "Value2"

        Dim myType As Type = oSAgreements.GetType
        For Each myField As Reflection.FieldInfo In myType.GetFields
            Console.WriteLine("FieldName: " & myField.Name & " = " &
myField.GetValue(oSAgreements))
        Next

End Sub

I'm curious however on what you're developing that would require this
type of code.

Kind Regards,
      Tony

csgraham74 wrote:
Show quoteHide quoteOnce you have the FieldInfo for the object, you can call it's GetValue
method.  myField(i).GetValue

Are optional parameters really an advisable thing to use ?
Handle Worked - can someone please double check
keypressed
Export array from vb.net to excel
How to find the position of the first dash in a string
File converting/sending help
Looking for a real working transparent picturebox
Ftp Client Help
(newbie -vb2005) going back to begin of file with StreamReader
printdialog problem