private void Test()
{
List<Employee> x = new List<Employee>();
x.Add(new Employee {
titleName = "นาย",
Name = "สุนทร อักษรเชิดชู้",
Date = "1980-01-27",
dep = "เทคโนโลยีสารสนเทศ",
pos = "โปรแกรมเมอร์",
salary = 65000
});
//...
//...
//...
x.Add(new Employee {
titleName = "นาย",
Name = "วิศรุต ภูวนันตานนท์",
Date = "1990-11-03",
dep = "วิจัยและพัฒนา",
pos = "หัวหน้างานวิจัย",
salary = 6000
});
//...
//...
MsgBox(x[0].titleName);
//นาย
MsgBox(x[0].Name);
//สุนทร อักษรเชิดชู้
MsgBox(x[4].titleName);
//นาย
MsgBox(x[4].Name);
//วิศรุต ภูวนันตานนท์
}
public class Employee
{
public string titleName { get; set; }
public string Name { get; set; }
public DateTime Date { get; set; }
public string dep { get; set; }
public string pos { get; set; }
public double salary { get; set; }
}
Date :
2013-03-11 17:05:16
By :
ผ่านมา
No. 4
Guest
Code (VB.NET)
Private Sub Test()
Dim x As New List(Of Employee)
x.Add(New Employee With {.titleName = "นาย", .Name = "สุนทร อักษรเชิดชู้", .Date = "1980-01-27", .dep = "เทคโนโลยีสารสนเทศ", .pos = "โปรแกรมเมอร์", .salary = 65000})
'...
'...
'...
x.Add(New Employee With {.titleName = "นาย", .Name = "วิศรุต ภูวนันตานนท์", .Date = "1990-11-03", .dep = "วิจัยและพัฒนา", .pos = "หัวหน้างานวิจัย", .salary = 6000})
'...
'...
MsgBox(x(0).titleName) 'นาย
MsgBox(x(0).Name) 'สุนทร อักษรเชิดชู้
MsgBox(x(4).titleName) 'นาย
MsgBox(x(4).Name) 'วิศรุต ภูวนันตานนท์
End Sub
Public Class Employee
Public Property titleName As String
Public Property Name As String
Public Property [Date] As DateTime
Public Property dep As String
Public Property pos As String
Public Property salary As Double
End Class