Welcome to the new platform of Programmer's Heaven! We apologize for the inconvenience caused, if you visited us from a broken link of the previous version. The main reason to move to a new platform is to provide more effective and collaborative experience to you all. Please feel free to experience the new platform and use its exciting features. Contact us for any issue that you need to get clarified. We are more than happy to help you.
[b][red]This message was edited by aaronjones3593 at 2007-2-27 3:17:27[/red][/b][hr]
Got another problem now.
I don't know what's wrong with me I used to be able to program fine lol.
Dim iContinue As Integer
Dim BallotAddCount As Integer
Dim NewBallotCount As Integer
BallotAddCount = 0
Do While iContinue = vbYes
NewBallotCount = NumberOfBallots + BallotAddCount + 1
[red]ReDim Preserve VoteArray(NewBallotCount, NumberOfCandidates)[/red]
BallotAddCount = BallotAddCount + 1
iContinue = MsgBox("You have added " & BallotAddCount & " ballots." & vbNewLine & _
"Would you like to add more?", vbYesNo + vbApplicationModal, _
"Add Another Ballot: Yes or No?")
NumberOfBallots = 10
NumberOfCandidates = 4 [Got from inputbox]
Array was already VoteArray(NumberOfBallots, NumberOfCandidates)
[I'm coding a transferrable vote system]
ReDim Preserve blahblah don't wanna do it
[Subscript out of range]
btw I'm using Option Base 1
And the subscript IS IN RANGE
[I checked with the locals window]
-( Aaron )-
"Pain doesn't hurt, if it's all you've ever felt."
0 · ·