反射根据每一列的列名获取List 中的列值

Dim type As Type = vCRCommunication.GetType

Dim [property] As PropertyInfo = type.GetProperty("Orderno")

If [property] Is Nothing Then

Else
Dim o As Object = [property].GetValue(vCRCommunication, Nothing)
End If