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.

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

3 participantes

Ir para baixo

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem Empty Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

Mensagem por yugimoto Seg 09 Set 2013, 13:15

Bom galera, após eu ter feito o tutorial do lendario de Transformação por imagen : http://www.mmorpgbr.com/t755-all-transformacao-por-imagem.

Quando fui Compilar no VB6 na parte:

Case "tssj4"
 
Da parte:
Case "tssj4"
If GetPlayerClass(Index) = 1 Then
If GetPlayerLevel(Index) >= 900 Then
If GetPlayerSprite(Index) = 5 Then
Call SetPlayerSprite(Index, 5)
Call SetPlayerstr(Index, GetPlayerstr(Index) * 5)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) * 5)
Call SetPlayerSPEED(Index, GetPlayerSPEED(Index) * 5)
Call SetPlayerMAGI(Index, GetPlayerMAGI(Index) * 5)
Call SetPlayerMP(Index, GetPlayerMP(Index) * 5)
Call PlayerMsg(Index, "Você se transformou!", BrightBlue)
Call BattleMsg(Index, "Super Saiyajin 4!", Yellow, 0)
Call SendPlayerData(Index)
Else


 Deu o seguinte erro : 

Compile error:
Case without select case

Ajudem ae, Agradeço desde ja Sad
yugimoto
yugimoto
Membro Junior
Membro Junior

Mensagens : 84

Ir para o topo Ir para baixo

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem Empty Re: Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

Mensagem por Eduardo Ter 10 Set 2013, 10:17

Mande uma imagem do erro , só assim poderemos nos aprofundar melhor.
Eduardo
Eduardo
Membro Veterano
Membro Veterano

Mensagens : 1178

Ir para o topo Ir para baixo

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem Empty Re: Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

Mensagem por Soulty Ter 10 Set 2013, 10:37

Simples amigo, o codigo começa com um select case mas não encerra o mesmo...o Erro deve ser derivado dos metodos restantes.

está faltando finalizar todos os If, o Else, e o case.

Simples a correção:
Código:
Case "tssj4"
    if getplayerclass(index) = 1 then
        if GetplayerLevel(index) => 900 Then
          if getplayersprite(index) = 5 then
              SetPlayerSprite index,5
              SetPlayerStr index, GetPLayerStr(index) *5
              SetPlayerDef Index, GetPlayerDef(index) *5
              SetPlayerSpeed index, getPlayerSpeed(index) *5
              SetPlayerMagi Index, GetPlayerMagi(index) *5
              SendPlayerData Index
              Playermsg Index "Você se transformou!",White
          End if
      End if
    End if
Exit sub               
Soulty
Soulty
Membro Sênior
Membro Sênior

Mensagens : 281

http://www.nextspirit.xpg.com.br

Ir para o topo Ir para baixo

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem Empty Re: Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

Mensagem por yugimoto Ter 10 Set 2013, 20:03

N entedi bem, mas tds as modificações q fiz aki para colocar End if e Exit subs deram falha vo coloca meu codigo aki pra vc ve e me falar:

Linha de Código:
yugimoto
yugimoto
Membro Junior
Membro Junior

Mensagens : 84

Ir para o topo Ir para baixo

Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem Empty Re: Ajuda com erro na compilação do VB6 do yuyotial de trans por imagem

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


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