Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic comment faire

comment faire

5 réponses
Avatar
Jean claude
Bonjour a tous

deux probl=E8mes :
1- j'ai un groupe boutonOption, comment r=E9cup=E9rer la=20
valeur true ou false du bouton click=E9

2- comment mettre un format de saisie __ __ __ __ sur une=20
TextBox

Merci de vos r=E9ponses
Cordialement
Jean claude
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
le_troll
Bonjour,

Pour le groupe de boutons, comme ça:

Sub Command1_Click(Index As Integer)
MsgBox Index ' index = n° du bouton enfoncé...
End Sub
----------------------

Heu, à toi de voir, mais les Mask de saisie c'est beurk! Vaut mieux laisser
une saisies en partie libre et tester ensuite...


--
Merci, @+, bye, Joe
troll75 AROBASE iFrance POINT com
------------------------------------------
Le_Troll, éleveur de Trolls depuis César, qui disait:
Avec une hache, celui qui tient le manche a toujours raison !


"Jean claude" a écrit dans le message de
news:1ca901c49a51$64c706d0$
Bonjour a tous

deux problèmes :
1- j'ai un groupe boutonOption, comment récupérer la
valeur true ou false du bouton clické

2- comment mettre un format de saisie __ __ __ __ sur une
TextBox

Merci de vos réponses
Cordialement
Jean claude
Avatar
Zoury
Salut Jean-Claude! :O)

1- j'ai un groupe boutonOption, comment récupérer la
valeur true ou false du bouton clické



un truc simple est de placer les boutons du groupe (ils doivent être dans un
groupe de contrôle) dans un Frame. Lorsque que l'événement Click d'un bouton
est déclenché, il suffit de placer la valeur de l'index dans le tag du Frame
contenant les boutons, tu pourras ainsi obtenir la sélection très
simplement..
'***
Private Sub Option1_Click(Index as Integer)
Frame1.Tag = Index
End Sub
'***

2- comment mettre un format de saisie __ __ __ __ sur une
TextBox



1. Tu peux utiliser le contrôle MaskEdit .. mais comme l'a dit Joe il n'est
pas toujours évident d'obtenir ce que l'on veux en plus de réagir
étrangement dans certaines circonstances...
2. Tu peux regarder du côté des expressions régulières... Tu dois ajouter la
référence Microsoft VBScript Regular Expression X.X (ici j'ai 1.0 et 5.5).

Visual Basic Scripting Edition - Regular Expression (RegExp) Object
http://msdn.microsoft.com/library/en-us/script56/html/vsobjregexp.asp

3. Tu peux implémenter l'algorithme toi-même dans les événements Key_XXX...

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
Le français se refait une beauté, parlons en :
http://www.orthographe-recommandee.info/
Avatar
jean claude
Salut Zoury

Merci pour ta reponse, le 1 problème est réglé et je vais
essayer de régler le second comme tu me le propose, si
cela me pose problème je reviendrais te solliciter

Cordialement
JCM
-----Message d'origine-----
Salut Jean-Claude! :O)

1- j'ai un groupe boutonOption, comment récupérer la
valeur true ou false du bouton clické



un truc simple est de placer les boutons du groupe (ils


doivent être dans un
groupe de contrôle) dans un Frame. Lorsque que


l'événement Click d'un bouton
est déclenché, il suffit de placer la valeur de l'index


dans le tag du Frame
contenant les boutons, tu pourras ainsi obtenir la


sélection très
simplement..
'***
Private Sub Option1_Click(Index as Integer)
Frame1.Tag = Index
End Sub
'***

2- comment mettre un format de saisie __ __ __ __ sur




une
TextBox



1. Tu peux utiliser le contrôle MaskEdit .. mais comme


l'a dit Joe il n'est
pas toujours évident d'obtenir ce que l'on veux en plus


de réagir
étrangement dans certaines circonstances...
2. Tu peux regarder du côté des expressions régulières...


Tu dois ajouter la
référence Microsoft VBScript Regular Expression X.X (ici


j'ai 1.0 et 5.5).

Visual Basic Scripting Edition - Regular Expression


(RegExp) Object
http://msdn.microsoft.com/library/en-


us/script56/html/vsobjregexp.asp

3. Tu peux implémenter l'algorithme toi-même dans les


événements Key_XXX...

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
Le français se refait une beauté, parlons en :
http://www.orthographe-recommandee.info/


.



Avatar
jean claude
Re salut Zoury

pour mon second problème, je fais ce que tu m'as
conseillé, mais je ne vois pas comment adapter ce code :

Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches ' Creation variable.
Set regEx = New RegExp ' Creation d'une expression
régulière.
regEx.Pattern = patrn ' Set pattern.
regEx.IgnoreCase = True ' Set case insensitivity.
regEx.Global = True ' Set global applicability.
Set Matches = regEx.Execute(strng) ' Execute search.
For Each Match In Matches ' Iterate Matches
collection.
RetStr = RetStr & "Match found at position "
RetStr = RetStr & Match.FirstIndex & ". Match Value
is '"
RetStr = RetStr & Match.Value & "'." & vbCrLf
RetStr = vbCrLf
Next
RegExpTest = RetStr
End Function

Private Sub Form_Load()
MsgBox (RegExpTest("is.", "IS1 is2 IS3 is4"))
End Sub

pour avoir un masque de saisie : __ __ __ __ __ dans une
textbox

merci de ta réponse
cordialement
Jean claude
-----Message d'origine-----
Salut Jean-Claude! :O)

1- j'ai un groupe boutonOption, comment récupérer la
valeur true ou false du bouton clické



un truc simple est de placer les boutons du groupe (ils


doivent être dans un
groupe de contrôle) dans un Frame. Lorsque que


l'événement Click d'un bouton
est déclenché, il suffit de placer la valeur de l'index


dans le tag du Frame
contenant les boutons, tu pourras ainsi obtenir la


sélection très
simplement..
'***
Private Sub Option1_Click(Index as Integer)
Frame1.Tag = Index
End Sub
'***

2- comment mettre un format de saisie __ __ __ __ sur




une
TextBox



1. Tu peux utiliser le contrôle MaskEdit .. mais comme


l'a dit Joe il n'est
pas toujours évident d'obtenir ce que l'on veux en plus


de réagir
étrangement dans certaines circonstances...
2. Tu peux regarder du côté des expressions régulières...


Tu dois ajouter la
référence Microsoft VBScript Regular Expression X.X (ici


j'ai 1.0 et 5.5).

Visual Basic Scripting Edition - Regular Expression


(RegExp) Object
http://msdn.microsoft.com/library/en-


us/script56/html/vsobjregexp.asp

3. Tu peux implémenter l'algorithme toi-même dans les


événements Key_XXX...

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
Le français se refait une beauté, parlons en :
http://www.orthographe-recommandee.info/


.



Avatar
Zoury
salut jean-claude! :O)

je me suis mal exprimé.. les expressions régulières (et tu peux aussi
employer la méthode Like de VB) devront être utiliser en combinaison avec
les événements Key_XXX... ils ne consistue pas un masque de saisie à part
entière, mais aident plutôt à s'en fabriquer un..

je n'ai malheuresement pas de temps pour l'instant, je tenterai de te faire
un exemple le plus tôt possible (Si tu n'y parviens pas avant..) :O)
tu trouverais peut-être des exemples déjà conçues sur le web..

bonne chance!

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
Le français se refait une beauté, parlons en :
http://www.orthographe-recommandee.info/