Я пытаюсь создать набор данных на основе свойств объекта. Например, у меня есть экземпляр класса Person со свойствами, включая ID, Forename, Surname, DOB и т. д. Используя отражение, я добавляю столбцы в новый набор данных на основе свойств объекта:
For Each pi As PropertyInfo In person.GetType().GetProperties()
Dim column As New DataColumn(pi.Name, pi.PropertyType)
table.Columns.Add(column)
Next
Моя проблема в том, что некоторые из этих свойств являются типами, допускающими значение NULL, которые не поддерживаются наборами данных. Есть ли способ извлечь базовый тип системы из типа, допускающего значение NULL?
Спасибо.





Я предполагаю, что проблема заключается в том, чтобы определить, допускает ли свойство значение NULL или нет. В C# вы делаете это с помощью этого кода:
if (type.IsGenericType && type.GetGenericTypeDefinition() == typeof(Nullable<>))
... но я не уверен, что эквивалент этого последнего предложения в VB.NET.
Как ни странно, это на самом деле неправильный перевод на VB. Ознакомьтесь с моим ответом.
Да, Nullable и Nullable<> - это два разных типа.
@Mendelt Siebenga: вы можете вызвать GetType для свойства value только в том случае, если для переменной не задано значение null; в противном случае вы получите исключение.
Что вы хотите сделать, так это использовать свойство «GetValueOrDefault» и вызвать для него GetType, поскольку вам гарантировано, что оно не будет нулевым. Пример:
Dim i As Nullable(Of Integer) = Nothing
Dim t As Type = i.GetValueOrDefault().GetType()
Вы также можете использовать метод GetGenericParameters() для этого типа. myNullableObject.GetType().GetGenericParameters()[0] должен предоставить вам тип, допускающий значение NULL (например, Guid, Int32 и т. д.)
Вот ваш ответ на VB. Это может быть излишним для ваших целей, но также может быть полезно некоторым другим людям.
Во-первых, вот код, чтобы узнать, имеете ли вы дело с типом, допускающим значение NULL:
Private Function IsNullableType(ByVal myType As Type) As Boolean
Return (myType.IsGenericType) AndAlso (myType.GetGenericTypeDefinition() Is GetType(Nullable(Of )))
End Function
Обратите внимание на необычный синтаксис GetType. Это необходимо. Просто выполнение GetType (Nullable), как предложил один из комментаторов, для меня не сработало.
Итак, вооружившись этим, вы можете сделать что-то вроде этого ... Здесь, в инструменте ORM, я пытаюсь получить значения в общий тип, который может быть или не иметь значение Nullable:
If (Not value Is Nothing) AndAlso IsNullableType(GetType(T)) Then
Dim UnderlyingType As Type = Nullable.GetUnderlyingType(GetType(T))
Me.InnerValue = Convert.ChangeType(value, UnderlyingType)
Else
Me.InnerValue = value
End If
Обратите внимание, что я проверяю Nothing в первой строке, потому что Convert.ChangeType подавится этим ... Возможно, у вас нет этой проблемы, но моя ситуация чрезвычайно открыта.
Надеюсь, если я не отвечу на ваш вопрос напрямую, вы сможете каннибализировать это и доставить туда, куда вам нужно, - но я только что реализовал это несколько минут назад, и все мои тесты проходят.
Все, что он просил, - это базовый тип, поэтому все, что вам нужно, это Nullable.GetUnderlyingType.
Я подозреваю, что в конечном итоге ему понадобится большая часть этого. :)
Отличный пост, спас мою задницу!
Очень рад это слышать.
Nullable.GetUnderylingType(myType)
вернет базовый тип или значение NULL, если это не тип, допускающий значение NULL.
Отлично, спасибо! в C# мне не удалось заставить ... is typeof(Nullable<>) скомпилировать (я выясню почему позже), так что это полностью спасло мой лоб от повторяющихся взаимодействий голова / стол. Также проще, чем другие решения.
if (type.IsGenericType AndAlso type.GetGenericTypeDefinition Is GetType (Nullable))