**I am trying to add a public class to add make AddMemberObject work
Please help!
My code:
*********
If statusCode = "A" Then
memberList.Add(AddMemberObject.GetMemberName, AddMemberObject)
lstMemberNames.Items.Clear()
For i = 0 To memberList.Count - 1
tempMemberAdd = memberList.GetByIndex(i)
lstMemberNames.Items.Add(tempMemberAdd.GetMemberName)
Next
statusCode = ""
End If
If statusCode = "AddCancel" Then
lstMemberNames.Items.Clear()
For i = 0 To memberList.Count - 1
tempMemberAdd = memberList.GetByIndex(i)
lstMemberNames.Items.Add(tempMemberAdd.GetMemberName)
Next
statusCode = ""
End If
If statusCode = "EditCancel" Then
memberList.Add(AddMemberObject.GetMemberName, AddMemberObject)
lstMemberNames.Items.Clear()
For i = 0 To memberList.Count - 1
tempMemberAdd = memberList.GetByIndex(i)
lstMemberNames.Items.Add(tempMemberAdd.GetMemberName)
Next
statusCode = ""
End If
If statusCode = "E" Then
memberList.Add(AddMemberObject.GetMemberName, AddMemberObject)
lstMemberNames.Items.Clear()
For i = 0 To memberList.Count - 1
tempMemberAdd = memberList.GetByIndex(i)
lstMemberNames.Items.Add(tempMemberAdd.GetMemberName)
Next
statusCode = ""
End If
If statusCode = "R" Then
lstMemberNames.Items.Clear()
For i = 0 To memberList.Count - 1
tempMemberAdd = memberList.GetByIndex(i)
lstMemberNames.Items.Add(tempMemberAdd.GetMemberName)
Next
statusCode = ""
End If
End If
lblMemberCount.Text = memberList.Count
End Sub
Public Class Member
***Code
Thank you,
Isabel