Comment faire pour ouvrir et fermer un cdrom sur un meme boutton
DebvbJ
Messages postés
54
Date d'inscription
mercredi 19 juin 2002
Statut
Membre
Dernière intervention
14 février 2003
-
24 nov. 2002 à 20:59
cs_PrX Messages postés 91 Date d'inscription lundi 16 septembre 2002 Statut Membre Dernière intervention 2 novembre 2005 - 25 nov. 2002 à 12:13
cs_PrX Messages postés 91 Date d'inscription lundi 16 septembre 2002 Statut Membre Dernière intervention 2 novembre 2005 - 25 nov. 2002 à 12:13
A voir également:
- Comment faire pour ouvrir et fermer un cdrom sur un meme boutton
- Tag ip ouvrir une session - Forum PHP
- Ouvrir une session windows d'un pc sur le reseau local - Forum Visual Basic 6
- Vba ouvrir un fichier excel sans l'afficher ✓ - Forum Visual Basic 6
- Comment ouvrir un fichier tar gz - Forum Visual Basic
- Fermer un formulaire vba ✓ - Forum Visual Basic 6
1 réponse
cs_PrX
Messages postés
91
Date d'inscription
lundi 16 septembre 2002
Statut
Membre
Dernière intervention
2 novembre 2005
25 nov. 2002 à 12:13
25 nov. 2002 à 12:13
Slt,
Ma réponse va te paraître idiote...
Dim EtatPorte as Booléan
Private Sub Form_Load()
EtatPorte = 0 'quelque soit l'état initial réel
...
End Sub
Private Sub btnOpenCD_Click()
Select Case EtatPorte
Case 0 : EtatPorte = 1: 'Ouvrir Porte :Exit Sub
Case 1 : EtatPorte = 0: 'Fermer Porte : Exit Sub
End Select
End Sub
PrX, :) Beginner (to Initiate) but not Out of Order
Ma réponse va te paraître idiote...
Dim EtatPorte as Booléan
Private Sub Form_Load()
EtatPorte = 0 'quelque soit l'état initial réel
...
End Sub
Private Sub btnOpenCD_Click()
Select Case EtatPorte
Case 0 : EtatPorte = 1: 'Ouvrir Porte :Exit Sub
Case 1 : EtatPorte = 0: 'Fermer Porte : Exit Sub
End Select
End Sub
PrX, :) Beginner (to Initiate) but not Out of Order
