Динамические данные - Сделать дружественные имена столбцов в VB?

Question

Как отрегулировать ответ для this question

для VB.NET вместо C#?

Я следил за направляющими, но не смог понять это. Я использую linq-to-entity и .net 4.0.

Answer 1

Только ответ в VB.Net?

Imports System.ComponentModel 
Imports System.ComponentModel.DataAnnotations 

<MetadataType(GetType(MovieMetaData))> 
Partial Public Class Movie 


End Class 

Public Class MovieMetaData 

    <Required> 
    Public Property Title As Object 

    <Required> 
    <StringLength(5)> 
    Public Property Director As Object 

    <DisplayName("Date Released")> 
    <Required> 
    Public Property DateReleased As Object 

End Class 

(не проверено)