مشکل برای ایجاد آرایه

[محمد آشتیانی]

        Dim sampleArray =

                {

                    New With {.Id = 1, .Name = "Ali", .Type = "Admin"},

                    New With {.Id = 2, .Name = "Amir", .Type = "User"},

                    New With {.Id = 3, .Name = "Reza", .Type = "User"}

                }