Would someone please check my function? [SOLVED]

[hothead]

Public Function ComparePlayerAnswer()
    Dim SelectedAnswer, Msg As String
    Dim IsCorrect As Boolean
    Dim NumTries As Integer
    NumTries = NumTries + 1
    If IsCorrect = True Then
        IsCorrect = False
    End If
    For i = 0 To frmQuestions.cmdChoice.Count - 1
        If frmQuestions.cmdChoice(i).Value = True Then
            SelectedAnswer = frmQuestions.cmdChoice(i).Caption
        End If
    Next i
    If SelectedAnswer = QuestionArray(CurrentQuestion).Answer Then
        Msg = "You are Correct."
        IsCorrect = True
        If NumTries = 1 Then
            Msg = Msg & "  5 picks on the game board have now been granted to you."
        Else
            Msg = Msg & "  1 pick on the game board has now been granted to you."
        End If
    Else
        MsgBox "Incorrect"
    End If
    If IsCorrect = True Then
        MsgBox Msg
    End If
End Function

For some reason, NumTries is resetting itself every time the program processes the function. As a result, it is displaying that it will give the player 5 picks on the game board when it should in fact only be giving 1.

[SLH]

Try making NumTries a global variable (or possible a static variable in that function).

[hothead]

I never thought about that. Static will keep the value no matter what.

But won't it keep the value forever? I guess I could use a static variable to accomodate how many times the function has been run, then reset NumTries when it changes. Or go like this:

If NumTries = NumTries + 3 Then NumTries = 1

I shall try this. Thanks for the help.

[hothead]

Thanks, your help worked out rather well.

[DiGiTaIErRoR]

Uhm...

If NumTries = NumTries + 3 Then NumTries = 1

Will always be false.

Just as x=x+3, 0=3, 1=4, etc.

[hothead]

Not if the variable is declared as Static. It will always keep its previous value. If the answer is wrong, it redoes the entire function from the beginning, so after a few times of redoing the function, keeping its value from the previous attempt, it will be true.

[DiGiTaIErRoR]

Originally posted by hothead
Not if the variable is declared as Static. It will always keep its previous value. If the answer is wrong, it redoes the entire function from the beginning, so after a few times of redoing the function, keeping its value from the previous attempt, it will be true.

Uhm...

Regardless...

Whatever NumTries equals, NumTries will never equal NumTries + 3.

Just as 0 doesn't equal 3.

3 <> 6, 7 <> 10, etc.

[hothead]

If you'll notice, I have a NumTries = NumTries + 1 at the beginning of the function.

A static variable will keep its previous setting. So if I set NumTries to 1 by default, it will increment this by 1 the next time around.

So....

Second time it'll be 2.

Third time it'll be 3.

See how it works?