ratiquinho 1 Postado 22 de Fevereiro 2014 Denunciar Compartilhar Postado 22 de Fevereiro 2014 E ai galera =D Bom no tópico que fiz ensinando como fazer uma Roleta em VB.NET ( tendo conhecimento em Adobe Flash para fazer a animação da Roleta ). Resolvi ensinar hoje a "SUPER BONUS" ! Mais o que é a "SUPER BONUS" ? Bom a "SUPER BONUS" funcionará assim... cada ficha jogada na Roleta irá aumentar 1 ficha na "SUPER BONUS", Se você ganhar na "SUPER BONUS" não irá adicionar nenhuma ficha o valor em cima será posto em sua ID automaticamente. e o ID será posto como o "ULTIMO GANHADOR DA SUPER BONUS" e o valor será "ZERADO". Tópico da Roleta caso ninguém tenha visto ainda : http://www.webcheats.com.br/forum/delphi-vb/2338318-aprenda-fazer-sua-roleta-de-jogo-vb-net.html Desta vez não irei por Download do Projeto pois é apenas um complemento. O que vamos Usar ? É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Abrindo o Filezilla para criar algumas pastas. - Abra o Filezilla - Forneça os Dados corretos do Servidor - Abra a pasta www - Abra a pasta do seu servidor - Crie as seguintes pastas abaixo : Pasta 1 : Super-Bonus Pasta 2 : Download Ficará assim : Super-Bonus/Download/ - Abra o Notepad++ e coloque o valor "0" e salve este arquivo como "Valor.php" - Jogue este Arquivo "Valor.php" na pasta "Super-Bonus" pelo Filezilla - Abra o Notepad++ e coloque o texto "Nenhum Vencedor" e salve este arquivo como "Ganhador.php" - Jogue este Arquivo "Ganhador.php" na pasta "Super-Bonus" pelo Filezilla - Abra o Notepad++ e coloque o texto em branco e salve este arquivo como "Arquivo.dll" - Jogue este Arquivo "Arquivo.dll" na pasta "/Super-Bonus/Download/" pelo Filezilla [ Parte do Servidor Configurado PODE FECHAR O FILEZILLA ] Iremos Criar 3 pastas. C:\RATIQUINHO\SB\ C:\RATIQUINHO\FSB\ C:\RATIQUINHO\SBNICK\ No seu Form1 onde fica o Login adicione o seguinte código no FORM : É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Importe os seguintes componentes na sua Form2 da Roleta É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Na sua Class adicione : É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se No seu Form ( onde tem a roleta adicione este código ) É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se No Seu Timer1 que é o nosso "Atualizar SB" adicione o código abaixo : É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Caso você tenha visto na ultima aula que dei te ensinando a fazer a Roleta existe um Private Sub chamado "Enviar_Email()" Caso não lembre como ele era irei postar abaixo o código de como ficará. É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Perceberam que agora eu adicionei +1 Private Sub ? então devemos cria-lo ficará assim : É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Perceberam que adicione mais 1 Private Sub ? "Entregar_Fichas()" ? iremos cria-lo ficará assim : É necessário se cadastrar para acessar o conteúdo. Entre ou Cadastre-se Espero que vocês tenham gostado =D Créditos : Eu ( ratiquinho ) por fazer o sistema. Riquetti ( Pois quando comecei no VB ele me ajudou 2008 se não me engano ) Rique ( Ele me ajudo pakas quando Riquetti sumiu. ) Não tem coisa melhor que se aprofundar em Visual Basic ! =D Dúvidas sobre meus projetos ? dúvidas em algo ? Add Skype ! [email protected] ᅠᅠTroféus e Medalhasᅠᅠ Link para o comentário Compartilhar em outros sites Mais opções de compartilhamento...
Posts Recomendados