Index is Zero ``` Dim i as long ``` sWidth have no value ``` Dim sWidth as long ``` Note: This is not an error but, you only render the HP Graphics on code, the MP and EXP are text based on your code If you have no programming experience.. better wait for somebody to tell you how to fix it, i'm kinda lazy to check it out I'm just pointing out the mistake