Find Method in List Object
Find Object value and get
Private Structure Student
Dim Name As String
Dim RollNo As Integer
Sub New(Student As String, Rno As Integer)
' TODO: Complete member initialization
Name = Student
RollNo = Rno
End Sub
End Structure
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim L As New List(Of Student)
L.Add(New Student("Switin", 1))
L.Add(New Student("Jitesh", 2))
L.Add(New Student("Shrikant", 3))
L.Add(New Student("Ramesh", 4))
L.Add(New Student("Shiv", 5))
Dim X As Student = L.Find(Function(M As Student) M.RollNo = 2)
End Sub
Private Structure Student
Dim Name As String
Dim RollNo As Integer
Sub New(Student As String, Rno As Integer)
' TODO: Complete member initialization
Name = Student
RollNo = Rno
End Sub
End Structure
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim L As New List(Of Student)
L.Add(New Student("Switin", 1))
L.Add(New Student("Jitesh", 2))
L.Add(New Student("Shrikant", 3))
L.Add(New Student("Ramesh", 4))
L.Add(New Student("Shiv", 5))
Dim X As Student = L.Find(Function(M As Student) M.RollNo = 2)
End Sub
Comments
Post a Comment