Subscript out of range?

[timster0]

I get RTE 9 and it highlights this line in Sub SendChars:

Code:

Packet = Packet & SEP_CHAR & Trim$(Player(index).Char(i).Name) & SEP_CHAR & Trim$(Class(Player(index).Char(i).Class).Name) & SEP_CHAR & Player(index).Char(i).Level & SEP_CHAR & Trim$(Player(index).Char(i).Guild) & SEP_CHAR & Player(index).Char(i).Guildaccess