je souhaite utiliser une variable (nombre entier =E0 2=20
d=E9cimales) entr=E9e par un utilisateur (dans une boite de=20
dialogue de type edit box) pour filtrer des donn=E9es avec=20
un crit=E8re ">=3D" =E0 cette=20
variable
comment r=E9cup=E9rer cette variable ?
quelle est la syntaxe pour filtrer le crit=E8re ">=3D" =E0=20
cette variable ?
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
François Picalausa
"francois" a écrit dans le message de news:01dc01c3bbe2$fd634410$
je souhaite utiliser une variable (nombre entier à 2 décimales) entrée par un utilisateur (dans une boite de dialogue de type edit box) pour filtrer des données avec un critère ">=" à cette variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à cette variable ?
Bonjour/soir,
Tu peux essayer ceci: Sub MaSub On error goto BadVal
Dim ValeurEntrée As Double ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à filtrer For i = 0 to nombre_de_données If Donnée(i) >= ValeurEntrée Then Combo1.AddItem Donnée(i) 'Combo1, une combobox qui reçoit les éléments valides End If Next i
BadVal: If Err.Number <> 0 Then Msgbox "Une erreur s'est produite! Vérifiez que vous avec entré un nombre correct!" End If End Sub
"francois" <anonymous@discussions.microsoft.com> a écrit dans le
message de news:01dc01c3bbe2$fd634410$a001280a@phx.gbl
je souhaite utiliser une variable (nombre entier à 2
décimales) entrée par un utilisateur (dans une boite de
dialogue de type edit box) pour filtrer des données avec
un critère ">=" à cette
variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à
cette variable ?
Bonjour/soir,
Tu peux essayer ceci:
Sub MaSub
On error goto BadVal
Dim ValeurEntrée As Double
ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à filtrer
For i = 0 to nombre_de_données
If Donnée(i) >= ValeurEntrée Then
Combo1.AddItem Donnée(i) 'Combo1, une combobox qui reçoit les
éléments valides
End If
Next i
BadVal:
If Err.Number <> 0 Then
Msgbox "Une erreur s'est produite! Vérifiez que vous avec entré un
nombre correct!"
End If
End Sub
"francois" a écrit dans le message de news:01dc01c3bbe2$fd634410$
je souhaite utiliser une variable (nombre entier à 2 décimales) entrée par un utilisateur (dans une boite de dialogue de type edit box) pour filtrer des données avec un critère ">=" à cette variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à cette variable ?
Bonjour/soir,
Tu peux essayer ceci: Sub MaSub On error goto BadVal
Dim ValeurEntrée As Double ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à filtrer For i = 0 to nombre_de_données If Donnée(i) >= ValeurEntrée Then Combo1.AddItem Donnée(i) 'Combo1, une combobox qui reçoit les éléments valides End If Next i
BadVal: If Err.Number <> 0 Then Msgbox "Une erreur s'est produite! Vérifiez que vous avec entré un nombre correct!" End If End Sub
je souhaite utiliser une variable (nombre entier à 2 décimales) entrée par un utilisateur (dans une boite de dialogue de type edit box) pour filtrer des données
avec
un critère ">=" à cette variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à cette variable ?
Bonjour/soir,
Tu peux essayer ceci: Sub MaSub On error goto BadVal
Dim ValeurEntrée As Double ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à
filtrer
For i = 0 to nombre_de_données If Donnée(i) >= ValeurEntrée Then Combo1.AddItem Donnée(i) 'Combo1, une
combobox qui reçoit les
éléments valides End If Next i
BadVal: If Err.Number <> 0 Then Msgbox "Une erreur s'est produite! Vérifiez que
-----Message d'origine-----
"francois" <anonymous@discussions.microsoft.com> a écrit
dans le
message de news:01dc01c3bbe2$fd634410$a001280a@phx.gbl
je souhaite utiliser une variable (nombre entier à 2
décimales) entrée par un utilisateur (dans une boite de
dialogue de type edit box) pour filtrer des données
avec
un critère ">=" à cette
variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à
cette variable ?
Bonjour/soir,
Tu peux essayer ceci:
Sub MaSub
On error goto BadVal
Dim ValeurEntrée As Double
ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à
filtrer
For i = 0 to nombre_de_données
If Donnée(i) >= ValeurEntrée Then
Combo1.AddItem Donnée(i) 'Combo1, une
combobox qui reçoit les
éléments valides
End If
Next i
BadVal:
If Err.Number <> 0 Then
Msgbox "Une erreur s'est produite! Vérifiez que
je souhaite utiliser une variable (nombre entier à 2 décimales) entrée par un utilisateur (dans une boite de dialogue de type edit box) pour filtrer des données
avec
un critère ">=" à cette variable
comment récupérer cette variable ?
quelle est la syntaxe pour filtrer le critère ">=" à cette variable ?
Bonjour/soir,
Tu peux essayer ceci: Sub MaSub On error goto BadVal
Dim ValeurEntrée As Double ValeurEntrée = CDbl(MaTextBox.Text)
'Données() : un tableau contenant les données à
filtrer
For i = 0 to nombre_de_données If Donnée(i) >= ValeurEntrée Then Combo1.AddItem Donnée(i) 'Combo1, une
combobox qui reçoit les
éléments valides End If Next i
BadVal: If Err.Number <> 0 Then Msgbox "Une erreur s'est produite! Vérifiez que
