Bloquer sur visual basic: gérer plusieurs boutons
Résolu/Fermé
Hedtonik
Messages postés
4
Date d'inscription
jeudi 1 janvier 2015
Statut
Membre
Dernière intervention
1 janvier 2015
-
1 janv. 2015 à 14:57
Hedtonik Messages postés 4 Date d'inscription jeudi 1 janvier 2015 Statut Membre Dernière intervention 1 janvier 2015 - 1 janv. 2015 à 22:23
Hedtonik Messages postés 4 Date d'inscription jeudi 1 janvier 2015 Statut Membre Dernière intervention 1 janvier 2015 - 1 janv. 2015 à 22:23
A voir également:
- Bloquer sur visual basic: gérer plusieurs boutons
- Visual basic download - Télécharger - Langages
- Bloquer sur messenger - Guide
- Gerer mes mots de passe - Guide
- Différence entre bloquer et supprimer sur whatsapp ✓ - Forum Snapchat
- Bloquer un ami sur Messenger : comment ne pas être contacté - Guide
2 réponses
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
1 janv. 2015 à 17:08
1 janv. 2015 à 17:08
Bonjour,
Avec une variable booleenne, comme ceci:
Avec une variable booleenne, comme ceci:
Dim start As Boolean bouton attaque_clic() start = true 'si le bouton attaque est appuyer alors faire le calcul If start = true Then 'faire quelque chose Else 'autre chose End If
Hedtonik
Messages postés
4
Date d'inscription
jeudi 1 janvier 2015
Statut
Membre
Dernière intervention
1 janvier 2015
1 janv. 2015 à 22:11
1 janv. 2015 à 22:11


Modifié par Hedtonik le 1/01/2015 à 22:10
1 janv. 2015 à 22:23
'générer aléatoirement atk, def et vitesse de l'ennemi puis les afficher atke = Int((20 * Rnd()) + 1) * 3 def = Int((20 * Rnd()) + 1) * 3 vite = Int((20 * Rnd()) + 1) * 3 Statennemi.Text = ("Attaque : " & atke & vbCrLf & "Défense : " & defe & vbCrLf & "Vitesse : " & vite) End Sub Private Sub Attaque_Click(sender As Object, e As EventArgs) Handles Attaque.Click Dim attaque As Boolean attaque = True 'si le bouton attaque est appuyer alors faire le calcul If attaque = True Then MsgBox("attaque pret") Else 'autre chose End If End Sub