A voir également:
- Un liste de choix sous access en Visual Basic
- Liste déroulante de choix excel - Guide
- Visual basic - Télécharger - Langages
- Microsoft 365 basic - Accueil - Microsoft Office
- Liste déroulante en cascade - Guide
- Microsoft visual c++ runtime - Guide
4 réponses
darwin42
Messages postés
262
Date d'inscription
mercredi 15 janvier 2003
Statut
Membre
Dernière intervention
21 juillet 2008
67
16 avril 2005 à 18:40
16 avril 2005 à 18:40
salut,
tu as essayé avec la méthode ".text" si elle existe pour ce controle ?
tu as essayé avec la méthode ".text" si elle existe pour ce controle ?
Salut darwin42,
ui j'ai éssayé mais elle n'existe pas apparemment. N'étant que débutant en Visual Basic, j'ai du mal à m'y retrouver. du coup elle existe peut être mais je l'utilises mal.
Merci pour le coup de main, et si tu as d'autres idées, je te remercie
ui j'ai éssayé mais elle n'existe pas apparemment. N'étant que débutant en Visual Basic, j'ai du mal à m'y retrouver. du coup elle existe peut être mais je l'utilises mal.
Merci pour le coup de main, et si tu as d'autres idées, je te remercie
random
Messages postés
1612
Date d'inscription
vendredi 26 novembre 2004
Statut
Membre
Dernière intervention
30 mars 2006
155
18 avril 2005 à 15:06
18 avril 2005 à 15:06
utilises un cadre il y a un assistant bien fait
il te renverra la valeur de la cache cochée
il te renverra la valeur de la cache cochée
je suis désolé il existe voila un petit programme ecrit sous access 2000 dans un formulaire j'ai crée 2 options et un bouton commande.
voila le code:
Private Sub Commande19_Click()
If Option15.Value = True Then
If Option17.Value = True Then
MsgBox ("option 15 et option17 ok")
Else
MsgBox ("option 15 ok")
End If
Else
If Option17.Value = True Then
MsgBox ("option 17 ok")
Else
MsgBox ("rien")
End If
End If
End Sub
voila le code:
Private Sub Commande19_Click()
If Option15.Value = True Then
If Option17.Value = True Then
MsgBox ("option 15 et option17 ok")
Else
MsgBox ("option 15 ok")
End If
Else
If Option17.Value = True Then
MsgBox ("option 17 ok")
Else
MsgBox ("rien")
End If
End If
End Sub