Quel est l'objet le plus approprié?
meclome
Messages postés
10
Date d'inscription
lundi 6 décembre 2004
Statut
Membre
Dernière intervention
15 avril 2005
-
10 avril 2005 à 18:44
VisualBoinet Messages postés 64 Date d'inscription mercredi 23 mars 2005 Statut Membre Dernière intervention 14 juin 2007 - 13 avril 2005 à 09:48
VisualBoinet Messages postés 64 Date d'inscription mercredi 23 mars 2005 Statut Membre Dernière intervention 14 juin 2007 - 13 avril 2005 à 09:48
A voir également:
- Quel est l'objet le plus approprié?
- La référence d'objet n'est pas définie à une instance d'un objet ✓ - Forum C# / .NET
- Objet requis vba ✓ - Forum Visual Basic 6
- L'objet invoqué s'est déconnecté de ses clients - Forum Visual Basic 6
- Recuperation objet wow - Forum Java
- L'objet s'est déconnecté de ses clients windows 10 excel 2016 - Forum Visual Basic 6
1 réponse
VisualBoinet
Messages postés
64
Date d'inscription
mercredi 23 mars 2005
Statut
Membre
Dernière intervention
14 juin 2007
13 avril 2005 à 09:48
13 avril 2005 à 09:48
Tu peut ptet utiliser une liste view. Pour faire des colones fo fr ceci :
listview.View = lvwReport
pour nommer les colonnes :
Call listview.ColumnHeaders.Add(, , "Nom de la colonne 0", 1000)
Call listview.ColumnHeaders.Add(, , "Nom de la colonne 1", 1000)...
Ensuite pour la remplir tu fait :
dim objAdd as listitem
dim intIndex as integer
dim intParcours as integer
dim NumeroLigne as integer
For intParcours = 1 to nbreDeMedicamentsPrescrits
Set ObjAdd = listview.ListItems.Add( , "A" & intIndex, NumeroLigne)
ObjAdd.SubItems(1) = Format(NomDuMedicament)
NumeroLigne = NumeroLigne +1
intIndex = intIndex +1
Next intParcours
La je lest mis dans une boucle for juste pr t montrer comment ca
fonctionne mais pour recuperer le NomDuMedicament fodra ktu passe par
une textbox par exemple pour la saisie.
En esperant kca poura taider...
Bonne journée, bonne prog et bn courage
V.B.
listview.View = lvwReport
pour nommer les colonnes :
Call listview.ColumnHeaders.Add(, , "Nom de la colonne 0", 1000)
Call listview.ColumnHeaders.Add(, , "Nom de la colonne 1", 1000)...
Ensuite pour la remplir tu fait :
dim objAdd as listitem
dim intIndex as integer
dim intParcours as integer
dim NumeroLigne as integer
For intParcours = 1 to nbreDeMedicamentsPrescrits
Set ObjAdd = listview.ListItems.Add( , "A" & intIndex, NumeroLigne)
ObjAdd.SubItems(1) = Format(NomDuMedicament)
NumeroLigne = NumeroLigne +1
intIndex = intIndex +1
Next intParcours
La je lest mis dans une boucle for juste pr t montrer comment ca
fonctionne mais pour recuperer le NomDuMedicament fodra ktu passe par
une textbox par exemple pour la saisie.
En esperant kca poura taider...
Bonne journée, bonne prog et bn courage
V.B.