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
博客园 © 2004-2026 浙公网安备 33010602011771号 浙ICP备2021040463号-3