MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

erro ao compila

Ir para baixo

erro ao compila Empty erro ao compila

Mensagem por vamosconquistar Seg 30 maio 2011, 16:46

Private Sub Form_Load()
Dim I As Long
Dim Ending As String
For I = 1 To 3
If I = 1 Then Ending = ".gif"
If I = 2 Then Ending = ".jpg"
If I = 3 Then Ending = ".png"

If FileExist("GUI\medium" & Ending) Then frmNewChar.Picture = LoadPicture(App.Path & "\GUI\medium" & Ending)
Next I
Picsprites.Picture = LoadPicture(App.Path & "\GFX\sprites.bmp")
End Sub
vamosconquistar
vamosconquistar
Novato
Novato

Mensagens : 28

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos