here is my code:
I get no errors or anything.... What is the problem?Code:Private Sub tmrHighScore_Timer() Dim quads For quads = 1 To i If playerscore < scorenum(quads) Then FontSize = 10 Print scorenum(quads) & "" ElseIf playerscore > scorenum(quads) And overdo = True Then scorenum(quads) = playerscore FontSize = 20 Print scorenum(quads) & "" overdo = False ElseIf overdo = False Then FontSize = 10 Print scorenum(quads) & "" End If Next quads End Sub




Reply With Quote