Blazera 8.60
blazera.net
SOBRE O BLAZERA
Um fresh start em um servidor 8.6 clássico, com real map, focado na experiência raiz do Tibia. | Classic Real Map • Fresh Start • Client 8.6 • Old School Gameplay • Active Community
Inicia em:
--
Participar
Histórico de Curtidas
-
Guy Death deu reputação a ADMDestroyer em [Gesior] Colocando itens à venda no ShopPara colocar itens/pacc a venda voce precisa acessar a conta do admin que normalmente é acc: 1 e a senha que voce criou na instalação do site,quando logar va na parte de shop do site la vai ter |shop admin| clique e irá aparecer 3 opções
ADD SHOP OFFER- para adicionar um item ao shop
Confirmação
Colocando Dias de Premium Account a venda
Confirmação
Colocando RedSkull remove a venda
Confirmação
Colocando Desban a venda
Confirmação
Colocando ChangeName a venda
Confirmação
VIEW SHOP OFFER (EDIT/DELETE)-para ver os itens à venda e editá-los
Editando as ofertas
Deletando as ofertas
ADD POINTS-para adicionar pontos à conta de um player
Confirmação
Créditos 100% ADM Destroyer (eu)
Caso vá postar o tutorial em outro forum coloque os devidos créditos
-
Guy Death deu reputação a Mek Fiuchem em [VB.Net] Messagebox on FormClosingFala galera do TibiaKing! , Hoje irei fazer um tutorial de como criar um Messagebox on Formclosing.
Para começar a criar seu aplicativo, siga os passos abaixo:
1°Inicie o Visual Basic 2008.
2° Criar um novo Visual Basic project de File-> Project> New.
3° Botão direito do mouse no formulário e escolha Propriedades e clique no electrizity(Events) - ícone que apresenta eventos.
Figura A: O painel de propriedades e eventos de formulário.
4. Escolha FormClosing dos eventos propriedades do formulário (clique 2x rapidamente).
Adicione o seguinte código:
Dim result As DialogResult = MessageBox.Show("Voce Realmente quer sair ?", "Confirmar", MessageBoxButtons.YesNo, MessageBoxIcon.Warning) If result = DialogResult.No Then e.Cancel = True End If ou Seja ficaria assim Public Class Form1 Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing Dim result As DialogResult = MessageBox.Show("Voce Realmente quer sair ?", "Confirmar", MessageBoxButtons.YesNo, MessageBoxIcon.Warning) If result = DialogResult.No Then e.Cancel = True End If End Sub End Class
Para depurar seu aplicativo pressione F5 do seu teclado.
Como podemos ver na imagem abaixo, ele realmente funciona.
Este código irá perguntar ao usuário se ele(a) quer sair do programa.