Vb6 visualbasic6中的溢出

我有一个游戏服务器，错误溢出问题6

调试：

If Spell(spellnum).END > 0 Then
    TempPlayer(Index).END = GetPlayerStat(Index, Endurance)
    SetPlayerStat Index, Endurance, GetPlayerStat(Index, Endurance) + Spell(spellnum).END
    SendStats Index
End If

调试突出显示：

    TempPlayer(Index).END = GetPlayerStat(Index, Endurance)

---

您的在线报税表是什么：

GetPlayerStat（索引，耐久性）

您可以检查退货类型和分配？通常，当我遇到溢出问题时，我会尝试在“integer”或“single”类型的变量中输入一个像“long”（高值）这样的数字