Help needed with my program

[VBLearner]

Hi
I am taking intermediate level VB.Net class. Currently, we are doing
the second review project which is quite big. It is a voting system
where we display the participants for Candiadets and measures by
reading from a flat file and after the user finsihes voting, we allow
the user to cast the vote by clicking a button which will display a
message saying that the vote had been counted for 2 sendonds before
program closing. The button click event for casting vote should update
the vote counts in the arrays and then writit to the flt file.

Btw, the instuctor is not helpful at all + I am not talking this class
for a grade. I am register as Credit/No Credit. Anyway, we have a form
with Previous Screen button, Next screen button, and Cancel and start
over button + 4 panels:

- Candidate panels with Title label that indicate position such as
President and then on te second line, teh vote number alllowed +
participants info displayed in labels alongside the blank labels where
user can click to enter X. We are supposed to allow user to click on
either labels to vote. When maximum vote is reached, user cannot click
on another label on that page unless first removed the vote selected.
Also, if maximum vote allowed is 1, if the user select to vote after
already seclecting avote, the program should slect the latest vote on
that page and clear the rest. Note that user can go to previous screen,
except on the first page, and change the vote.

- Measure panels with title as in Candidate + Yes and No labels with a
label that describes the measure. here, user can choose to vote Yes or
No and we have to count both. Note that user can go to previous screen,
and change the vote. On the last page, the Next Screen button will take
to the panel that displays the button to cast the vote which will
update the vote count and write to flat file.

- Cast Vote pabel that has one button that allows to cast vote

- Vote Counted panel that displays teh message that the vote has been
counted

I have finished loading the form with data from the arryas that were
loaded with data from flat file using substring function. My form can
display all pages correctctly with button "Previous Screen" and button
"Next Screen" working properly as far as taking the user to previous an
dnext pages. So far, the "cast vote" button on 3rd panel has no code
except bringing up the 4th panel as it should.

Currently, I am working on allowing the user to enter vote. I am trying
to display X when the user enters vote for candidate pages. As I said,
the instructor is not helpful at all - he is more concern about us
following his format so that he can grade easily. I know that I have to
use sender object to accept the click event of the labels for the
candidates. Can anyone give me some sample code to accomplish this? If
you want to look at the code I have for this, here it is:

Private Sub lblCandidateX_C lick(ByVal sender As Object, _
ByVal e As System.EventArg s) Handles _
lblCandidateX1. Click, _
lblCandidateX2. Click, _
lblCandidateX3. Click, _
lblCandidateX4. Click, _
lblCandidateDes cription5.Click , _
lblCandidateDes cription6.Click , _
lblCandidateDes cription7.Click , _
lblCandidateDes cription8.Click , _
lblCandidateDes cription1.Click , _
lblCandidateDes cription2.Click , _
lblCandidateDes cription3.Click , _
lblCandidateDes cription4.Click , _
lblCandidateDes cription5.Click , _
lblCandidateDes cription6.Click , _
lblCandidateDes cription7.Click , _
lblCandidateDes cription8.Click
' Handles label click events for all pages in candidate panel but I
am only wokring on the first page of the candiadet panel

' mstrVotesAllowe d is the array that hold data from flat file
' mconVotesAllowe dLength is used in substring to get data
formstrVotesAll owed
' mobjVoteArray is an object array holds the labels control names for
labels for X
'mobjCandidateA rray an object array holds the labels control names for
labels for Candidate info

Dim pintCounter As Integer = 0
For pintCounter = 1 To 8
If (mstrVotesAllow ed(mintCurrentI ndex) = mconVotesAllowe dLength _
And (sender.Name = mobjVoteArray(p intCounter).Nam e) Or _
sender.Name = mobjCandidateAr ray(pintCounter ).Name) Then
mobjVoteArray(p intCounter).Tex t = "X"
mintYesVote(pin tCounter) = 1
Else
mobjVoteArray(p intCounter).Tex t = ""
mintYesVote(pin tCounter) = 0
End If
Next End Sub