07-11-2006, 10:46 PM
When I did this I got the "subscript out of range" error and it brought me to this
Code:
Sub SetPlayerSTR(ByVal Index As Long, ByVal STR As Long)
Player(Index).STR = STR
End Sub