Comment remplir un combo
Résolu17 réponses
Utilisateur anonyme
29 janv. 2013 à 13:14
29 janv. 2013 à 13:14
Bonjour,
Avant de coder une classe, et comme l'a si bien dit Zermelo que je salue, il faut définir ses propriétés, ses méthodes, ses fonctions, ses événements, si elle doit hériter d'une autre classe, si elle doit implémenter quelque chose etc...
Tu noteras que le moindre formulaire est une classe à part entière qui hérite de Form. Elle comporte ses propriétés, ses méthodes, ses ....
Enfin, tu peux consulter les nombreuses sources disponibles sur ce site pour te faire une idée.
Voici un exemple d'une petite classe toute simple avec :
- une déclaration de variable (c'est un peu la mémoire de la classe)
- le constructeur (New) (auquel on peut fournir des paramètres ou pas)
- une méthode
- une fonction
- une propriété
Maintenant voici un code qui montre comment s'en servir :
j'aimerais bien savoir faire une classe
Avant de coder une classe, et comme l'a si bien dit Zermelo que je salue, il faut définir ses propriétés, ses méthodes, ses fonctions, ses événements, si elle doit hériter d'une autre classe, si elle doit implémenter quelque chose etc...
Tu noteras que le moindre formulaire est une classe à part entière qui hérite de Form. Elle comporte ses propriétés, ses méthodes, ses ....
Enfin, tu peux consulter les nombreuses sources disponibles sur ce site pour te faire une idée.
Voici un exemple d'une petite classe toute simple avec :
- une déclaration de variable (c'est un peu la mémoire de la classe)
- le constructeur (New) (auquel on peut fournir des paramètres ou pas)
- une méthode
- une fonction
- une propriété
Public Class MaClasse
'déclaration
Dim _Prenom As String
'constructeur
Sub New(ByVal Prenom As String)
_Prenom = Prenom
End Sub
'méthode
Sub Affiche()
MessageBox.Show("Bonjour je suis " & _Prenom)
End Sub
'fonction
Function Cherche(ByVal Lettre As String) As Boolean
Return _Prenom.Contains(Lettre)
End Function
'propriété
ReadOnly Property Count As Integer
Get
Return _Prenom.Length
End Get
End Property
End Class
Maintenant voici un code qui montre comment s'en servir :
'J'instancie ma classe
Dim MonInstance1 As MaClasse = New MaClasse("bubu")
Dim MonInstance2 As MaClasse = New MaClasse("mimine")
'Pour mes deux instances, j'invoque la méthode Affiche
MonInstance1.Affiche()
MonInstance2.Affiche()
'j'utilise une fonction sur mon instance n° 1 (celle-ci renvoie vrai ou faux)
If MonInstance1.Cherche("u") Then
MessageBox.Show("Le prénom que contient mon instance N°1 de MaClasse contient un u.")
End If
'je lis une propriété de l'instance n°2 de ma classe
MessageBox.Show("La longueur du prénom que contient mon instance N°2 de MaClasse fait " & MonInstance2.Count.ToString)
Utilisateur anonyme
28 janv. 2013 à 20:37
28 janv. 2013 à 20:37
Bonjour,
En supposant que tu aies un combobox du nom de combobox1 que tu veux remplir avec ceci :
Public sTMoisRep() As String = {"Vendémiaire", "Brumaire", "Frimaire", "Nivôse", _
"Pluviôse", "Ventôse", "Germinal", "Floréal", "Prairial", _
"Messidor", "Thermidor", "Fructidor"}
En supposant que tu aies un combobox du nom de combobox1 que tu veux remplir avec ceci :
Public sTMoisRep() As String = {"Vendémiaire", "Brumaire", "Frimaire", "Nivôse", _
"Pluviôse", "Ventôse", "Germinal", "Floréal", "Prairial", _
"Messidor", "Thermidor", "Fructidor"}
sub emplircombo()
for i as integer =0 to sTMoisRep.length-1
combobox1.items.add(sTMoisRep(i))
next
'pour sélectionner le premier élément
combobox1.selectedindice = 0
end sub
cs_ShayW
Messages postés
3253
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
57
28 janv. 2013 à 21:52
28 janv. 2013 à 21:52
Salut
ce n'est pas en postant tout un code (en plus
sans coloration syntaxique) qu'on va mieux comprendre ton problème
essaie plutot d'expliquer ce que tu veux faire
avec un exemple pour illustrer
je ne comprends pas comment remplir les combos.
ce n'est pas en postant tout un code (en plus
sans coloration syntaxique) qu'on va mieux comprendre ton problème
essaie plutot d'expliquer ce que tu veux faire
avec un exemple pour illustrer
Bonsoir, j'ai essayé, mais je ne comprend pas pourquoi ça ne fonctionne pas.
J'ai même fait une Sub pour initialiser les combos.
Je vous remercie de prendre de votre temps, pour pouvoir m'aider à trouver ma solution.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
J'ai même fait une Sub pour initialiser les combos.
#Region "Initialisation des combos"
Sub Init()
For i = 1 To 30 ' Jours républicains
CmbJRep.Items.Add(i.ToString)
Next
For i = 0 To sTMoisRep.Length - 1 ' Mois républicains
CmbMRep.Items.Add(sTMoisRep(i))
Next
For i = 0 To sTAnRep.Length - 1 'Ans républicains
CmbARep.Items.Add(sTAnRep(i))
Next
For i = 0 To sTJoursCompInt.Length - 1 'Jours complémentaires
CmbJCompInt.Items.Add(sTJoursCompInt(i))
Next
For i = 1 To 31
CmbJGre.Items.Add(i.ToString) 'Jours grégoriens
Next
For i = 0 To sTMoisGre.Length - 1
CmbMGre.Items.Add(sTMoisGre(i)) ' Mois grégoriens
Next
For i = 0 To sTAnGre.Length - 1 ' Années frégoriennes
CmbAGre.Items.Add(sTAnGre(i))
Next
'pour sélectionner le premier élément
CmbJRep.SelectedIndex = 0
CmbMRep.SelectedIndex = 0
CmbARep.SelectedIndex = 0
CmbJCompInt.SelectedIndex = 0
CmbJGre.SelectedIndex = 1
CmbMGre.SelectedIndex = 0
CmbAGre.SelectedIndex = 0
End Sub
#End Region
Je vous remercie de prendre de votre temps, pour pouvoir m'aider à trouver ma solution.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
cs_ShayW
Messages postés
3253
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
57
29 janv. 2013 à 00:03
29 janv. 2013 à 00:03
mais je ne comprend pas pourquoi ça ne fonctionne pas.
c.a d ?
le combo est vide ? une erreur du compiler ?
Bonjour Micoute.
Il me semble que ce qui vous arrête est un manque de méthodologie. Vous dites
Faites donc des convertisseurs, à savoir des fonctions du genre
puis exploitez-les comme bon vous semble. Pour écrire vos fonctions, rédigez d'abord en français courant les règles de conversion, puis traduisez vos textes en code Vb.net. Là, si vous avez des difficultés, nous pourrons vous aider.
Cordialement.
Étant illettré, je signe d'une croix : ×
Il me semble que ce qui vous arrête est un manque de méthodologie. Vous dites
J'essaye de faire un calendrier républicain pour convertir des dates pour ma généalogie et apparemment, je ne comprends pas comment remplir les combos.
Faites donc des convertisseurs, à savoir des fonctions du genre
Public Function DateRép(ByVal DteG As String) As String ...................... End Function
Public Function DateGéo(ByVal DteR As String) As String ..................... End Function
puis exploitez-les comme bon vous semble. Pour écrire vos fonctions, rédigez d'abord en français courant les règles de conversion, puis traduisez vos textes en code Vb.net. Là, si vous avez des difficultés, nous pourrons vous aider.
Cordialement.
Étant illettré, je signe d'une croix : ×
Bonjour, merci pour la réponse, mais je ne sais pas si une erreur du compilateur, car je suis un petit débutant et déjà quand je tape un point et qu'il me présente une liste de possibilités, je suis un peu déboussolé.
J'ai essayé de mettre des listes chaînées à la place des tableaux que j'ai mis dans une structure, mais je suis obligé de faire des boucles pour chaque liste étant donné qu'elles n'ont pas toutes la même longueur, mais seule la première est prise en compte.
En gros, je n'ai pas trouver la solution et je ne sais pas pourquoi !
La langue française est gratuite, seules les fautes d'orthographe sont en option.
J'ai essayé de mettre des listes chaînées à la place des tableaux que j'ai mis dans une structure, mais je suis obligé de faire des boucles pour chaque liste étant donné qu'elles n'ont pas toutes la même longueur, mais seule la première est prise en compte.
En gros, je n'ai pas trouver la solution et je ne sais pas pourquoi !
La langue française est gratuite, seules les fautes d'orthographe sont en option.
Il est normal qu'un petit débutant soit déboussolé. Mais dans ce cas, il doit se résoudre à commencer par les bases. Je vous suggère ce qui suit.
a) Récupérez sur internet le document de Philippe Lasserre et potassez-le. Cela prendra du temps, mais ne sera pas du temps perdu.
b) Essayez de faire un tout petit programme. Par exemple, qu'il vous envoie le message "Bonjour Micoute" quand vous le lancez. Puis, quand vous aurez réussi cela, donnez-vous un cahier des charges un peu plus compliqué, et continuez de la sorte.
c) Apprenez à vous servir de l'explorateur d'objets.
d) N'hésitez pas à demander de l'aide au fur et à mesure de vos petits essais.
Cordialement.
Étant illettré, je signe d'une croix : ×
a) Récupérez sur internet le document de Philippe Lasserre et potassez-le. Cela prendra du temps, mais ne sera pas du temps perdu.
b) Essayez de faire un tout petit programme. Par exemple, qu'il vous envoie le message "Bonjour Micoute" quand vous le lancez. Puis, quand vous aurez réussi cela, donnez-vous un cahier des charges un peu plus compliqué, et continuez de la sorte.
c) Apprenez à vous servir de l'explorateur d'objets.
d) N'hésitez pas à demander de l'aide au fur et à mesure de vos petits essais.
Cordialement.
Étant illettré, je signe d'une croix : ×
Re bonjour, je suis pratiquement connecté en permanence sur le cours VB.NET de Philippe Lasserre, mais ce n'est pas que c'est mal expliqué, c'est je juste que je trouve les exemples trop vagues et ne s'adaptant pas toujours à mon cas, néanmoins, je suis les conseils qui y sont donnés et ça m'a fait avancer plus que je n'aurais pensé.
Par contre, je trouve que les classes ne sont pas assez développées, parce que mon problème, c'est que je viens de PureBasic qui fonctionne en mode procédurale et VB.NET n'a rien à voir avec ça, se qui explique pourquoi je suis perdu à ce point et j'ai tellement pris d'habitude avec VB que je ne sais même plus programmé en PB, je sais, c'est lié à l'age, il faut dire que j'ai commencer à programmer avec le Commodore C64 et qui état bien armé avec ses 64 Ko de mémoire dont une bonne partie était recouverte par la ROM et la mémoire vidéo, alors de la logique, j'en ai !!!
En tout cas merci énormément pour l'aide précieuse que vous m’apportez tous.
Je vous remercierai jamais assez !!!
La langue française est gratuite, seules les fautes d'orthographe sont en option.
Par contre, je trouve que les classes ne sont pas assez développées, parce que mon problème, c'est que je viens de PureBasic qui fonctionne en mode procédurale et VB.NET n'a rien à voir avec ça, se qui explique pourquoi je suis perdu à ce point et j'ai tellement pris d'habitude avec VB que je ne sais même plus programmé en PB, je sais, c'est lié à l'age, il faut dire que j'ai commencer à programmer avec le Commodore C64 et qui état bien armé avec ses 64 Ko de mémoire dont une bonne partie était recouverte par la ROM et la mémoire vidéo, alors de la logique, j'en ai !!!
En tout cas merci énormément pour l'aide précieuse que vous m’apportez tous.
Je vous remercierai jamais assez !!!
La langue française est gratuite, seules les fautes d'orthographe sont en option.
cs_ShayW
Messages postés
3253
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
57
29 janv. 2013 à 11:39
29 janv. 2013 à 11:39
développées, parce que mon problème, c'est que je viens de PureBasic qui fonctionne en mode procédurale et VB.NET n'a rien à voir avec ça, se qui explique pourquoi je suis perdu
donc ce n'est pas un problème de code mais
de conception ce n'est pas facile de passer
de la réflection procédurale au OOP ou POO
essai de definir ton calendrier par une class
ou plusieurs class avec des méthodes etc
cela ne se fait pas en 10 min
Re bonjour, j'aimerais bien savoir faire une classe, mais j'apprend lentement et je n'en suis pas encore là, alors lorsque je reçois de l'aide providentielle, je m'empresse de l'imprimer et l'archiver dans un classeur prévu à cet effet.
En tout cas, merci pour ta réponse.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
En tout cas, merci pour ta réponse.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
Bonjour à nouveau, Micoute.
Je suis prêt à vous aider à faire une classe. Mais dites-moi d'abord sous quelle version de Vb.net travaillez-vous.
PS. J'ai 72 ans, alors ne me dites pas que c'est une question d'âge.
Cordialement.
Étant illettré, je signe d'une croix : ×
Je suis prêt à vous aider à faire une classe. Mais dites-moi d'abord sous quelle version de Vb.net travaillez-vous.
PS. J'ai 72 ans, alors ne me dites pas que c'est une question d'âge.
Cordialement.
Étant illettré, je signe d'une croix : ×
ucfoutu
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
211
29 janv. 2013 à 12:56
29 janv. 2013 à 12:56
Bonjour, Micoute,
c'est à mon avis la pire des méthodes. Essaye de l'abandonner, au profit de la compréhension la plus totale qui, elle, restera "gravée" dans ton esprit et t'ouvrira ainsi les portes de la création.
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.
alors lorsque je reçois de l'aide providentielle, je m'empresse de l'imprimer et l'archiver dans un classeur prévu à cet effet
c'est à mon avis la pire des méthodes. Essaye de l'abandonner, au profit de la compréhension la plus totale qui, elle, restera "gravée" dans ton esprit et t'ouvrira ainsi les portes de la création.
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.
Merci beaucoup pour toutes ces réponses qui m'ont été très utiles et que j'ai mises en pratique aussitôt.
C'est fou tout ce qu'on peut faire avec Visual Studio 2010, j'avais fait connaissance avec les objets avec Turbo Pascal 7.0 de Borland et j'ai remarqué que la technique à vraiment évolué.
Pour mes combos, j'ai donc décidé de mettre mes variables, qui sont surtout des constantes, dans des listes de strings et de les contenir dans une structure et pas de problème.
Je me dois de vous remercier pour la bienveillance que vous m'avez manifestée, car je me rend compte que je suis vraiment un boulet, alors merci encore.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
C'est fou tout ce qu'on peut faire avec Visual Studio 2010, j'avais fait connaissance avec les objets avec Turbo Pascal 7.0 de Borland et j'ai remarqué que la technique à vraiment évolué.
Pour mes combos, j'ai donc décidé de mettre mes variables, qui sont surtout des constantes, dans des listes de strings et de les contenir dans une structure et pas de problème.
Je me dois de vous remercier pour la bienveillance que vous m'avez manifestée, car je me rend compte que je suis vraiment un boulet, alors merci encore.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
Utilisateur anonyme
29 janv. 2013 à 20:18
29 janv. 2013 à 20:18
Bonjour,
Je te propose une petite expérience:
1) Entre ta ligne form Claass1 et ta première sub si tu as toujours cette ligne:
mets la en commentaire et mets
Puis dans le Form1_load()
sTMoisRep() = {"Vendémiaire", "Brumaire", "Frimaire", "Nivôse", _
"Pluviôse", "Ventôse", "Germinal", "Floréal", "Prairial", _
"Messidor", "Thermidor", "Fructidor"}
2) Puis dans la sub init(), mets un point d'arrêt (F9) sur cette ligne
et un Espion sur sTMoisRep.Length
Si ton programme se rend jusque là sans arrêter avant, regarde la valeur de [b]sTMoisRep.Length[/b dans la fenêtre Espions.
Si la valeur est Nothing ou zéro, cela pourrait bien vouloir dire que le Form1_Load n'est même pas exécuté et qu'il y a probablement un erreur avant d'exécuter le Form_Load.
Si la valeur est 12, c'est donc que le tableau est correct et que tu peux refaire l'expérience avec tes autres tableaux.
Je te propose une petite expérience:
1) Entre ta ligne form Claass1 et ta première sub si tu as toujours cette ligne:
Public sTMoisRep() As String = {"Vendémiaire", "Brumaire", "Frimaire", "Nivôse", _
"Pluviôse", "Ventôse", "Germinal", "Floréal", "Prairial", _
"Messidor", "Thermidor", "Fructidor"}
mets la en commentaire et mets
dim sTMoisRep() as string
Puis dans le Form1_load()
sTMoisRep() = {"Vendémiaire", "Brumaire", "Frimaire", "Nivôse", _
"Pluviôse", "Ventôse", "Germinal", "Floréal", "Prairial", _
"Messidor", "Thermidor", "Fructidor"}
2) Puis dans la sub init(), mets un point d'arrêt (F9) sur cette ligne
For i = 0 To sTMoisRep.Length - 1 ' Mois républicains
et un Espion sur sTMoisRep.Length
Si ton programme se rend jusque là sans arrêter avant, regarde la valeur de [b]sTMoisRep.Length[/b dans la fenêtre Espions.
Si la valeur est Nothing ou zéro, cela pourrait bien vouloir dire que le Form1_Load n'est même pas exécuté et qu'il y a probablement un erreur avant d'exécuter le Form_Load.
Si la valeur est 12, c'est donc que le tableau est correct et que tu peux refaire l'expérience avec tes autres tableaux.
Utilisateur anonyme
29 janv. 2013 à 20:22
29 janv. 2013 à 20:22
Bonjour,
Oupss! Quand j'ai mis ma dernière réponse, il n'y avait pas encore de question sur la classe. Donc ma réponse portait sur l'alimentation du Combo et non sur la classe.
Oupss! Quand j'ai mis ma dernière réponse, il n'y avait pas encore de question sur la classe. Donc ma réponse portait sur l'alimentation du Combo et non sur la classe.
Bonsoir, merci pour les réponses, finalement, j'ai beaucoup appris aujourd'hui, mais j'avoue que pour les classes, il faudra que je prenne encore quelques cours.
pour l'espion, je ne savais pas comment m'y prendre, puis j'ai appuyé sur F9 comme je faisais avec PB et ça m'a affiché un point d'arrêt et j'ai bien trouvé les valeurs escomptées.
Comme je ne trouvais pas la solution pour remplir mes combos, j'ai donc utilisé une structure et du coup, j'ai réussi ce que je voulais faire dès le début et j'en remercie banana32 qui m'a aidé dans un autre programme dans lequel je me suis inspiré.
Evidemment, je remercie beaucoup, tous ceux qui ont contribué à cette réussite.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
pour l'espion, je ne savais pas comment m'y prendre, puis j'ai appuyé sur F9 comme je faisais avec PB et ça m'a affiché un point d'arrêt et j'ai bien trouvé les valeurs escomptées.
Comme je ne trouvais pas la solution pour remplir mes combos, j'ai donc utilisé une structure et du coup, j'ai réussi ce que je voulais faire dès le début et j'en remercie banana32 qui m'a aidé dans un autre programme dans lequel je me suis inspiré.
Evidemment, je remercie beaucoup, tous ceux qui ont contribué à cette réussite.
La langue française est gratuite, seules les fautes d'orthographe sont en option.
