Rechercher : dans
Par :

[Visual Basic] MSFlexGrid

Dernière réponse le 23 jun 2008 à 16:12:14 klowlead, le 24 fév 2005 à 09:45:35 
 Signaler ce message aux modérateurs

Bonjour à tous (et toutes)

Quelqu'un pourrait-il m'expliquer comment fonctionne une Flexgrid ? Je sais que je peux faire des choses avec les propriétés Row, Col, et Text, mais je ne sais pas comment m'en servir et ne connais pas la syntaxe.
Je voudrais donner des titres à mes colonnes, et alimenter chaque lignes de la grille avec des enregistrements d'une table (avec recordset).
Si quelqu'un pouvais me donner quelques trucs je lui en serais reconnaissante. Je travaille sous VB6.
En vous remerciant.

Meilleures réponses pour « [Visual Basic] MSFlexGrid » dans :
Introduction à Visual Basic Voir Présentation de Visual Basic Visual Basic est un outil développé par Microsoft pour développer facilement des applications fonctionnant sous Microsoft Windows ©. Visual Basic est, comme son nom l'indique, un outil visuel permettant de créer...
Télécharger Visual Basic 6 Runtime (VB6 DLL) Voir Le Runtime Visual Basic 6 contient l'ensemble des librairies (DLL) nécessaires pour exécuter des programmes écrits en langage Visual Basic 6.0. Il contient notamment les DLL suivantes :...
Introduction à VBScript VoirPrésentation de VB Script VBScript (aussi appelé Visual Basic Scripting Edition) est un sous-ensemble du langage Visual Basic for Applications (VBA), un langage propriétaire de Microsoft prévu pour être intégré aux produits Microsoft Office©, le...
Généralités sur Visual Basic VoirConcept de Visual Basic l'Environnement de Développement intégré

1

rudy, le 1 mar 2005 à 14:18:49
  • +1

Salut klowlead,

Voici peut-être une première approche à ta question :
dans la forme où tu as placé ta MsFlexGrid, par un click "droit" sur celle-ci, définir dans les proptiétés : le nombre de lignes et le nombre de colonnes. Placer 1 dans la zone "Fixed row".
Cette ligne fixe te servira plus tard à y indiquer les entêtes de colonnes. Pour alimenter tes entêtes :

.MaGrid.Clear
.MaGrid.Rows = 1
.MaGrid.Row = .GridAgents.Rows - 1
MaGrid.Col = 0: MaGrid.ColWidth(0) = 2000: MaGrid = "Nom"
MaGrid.Col = 1: MaGrid.ColWidth(1) = 2000: MaGrid= "Prenom"
MaGrid.Col = 2: MaGrid.ColWidth(2) = 900: MaGrid = "Dat. nais."
MaGrid.Col = 3: MaGrid.ColWidth(3) = 1000: MaGrid = "Employeur"
MaGrid.Col = 4: MaGrid.ColWidth(4) = 1100: MaGrid = "Num. méd."
MaGrid.Col = 5: MaGrid.ColWidth(5) = 3000: MaGrid= "Localité"

.......

Tu crées ensuite ton ordre SQL qui te permet d'aller chercher les zônes dont tu as besoin pour afficher dans ta grid.

If Not EOF Then

Do Until EOF
.MaGrid.Rows = .MaGrid.Rows + 1
.MaGrid.Row = .MaGrid.Rows - 1
MaGrid.Col = 0: MaForme.MaGrid = zone fichier (venant de SQL)
MaGrid.Col = 1: MaForme.MaGrid = zone fichier

......

MoveNext
Loop
End If


Voilà, essaie d'abord avec ces quelques petites notes (qui, j'espère, sont assez claires).

Bon courage,

Rudy.

Répondre à rudy

2

klowlead, le 1 mar 2005 à 15:13:14

Salut Rudy, merci pour ta réponse, j'ai trouvé ce que je voulais faire entre temps. Voici une partie du code que j'ai fait pour mon application si ça peut aider quelqu'un :


Private Sub Form_Load()

MSFlexGrid1.Cols = 4
MSFlexGrid1.FixedCols = 0

rsSession.MoveFirst

MSFlexGrid1.ColWidth(0) = 1500
MSFlexGrid1.ColWidth(1) = 1500
MSFlexGrid1.ColWidth(2) = 1700
MSFlexGrid1.ColWidth(3) = 1500


MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "Code Session"
MSFlexGrid1.Col = 1
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "Code Stage"
MSFlexGrid1.Col = 2
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "Date de session"
MSFlexGrid1.Col = 3
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = "Animateur"


Do Until rsSession.EOF

MSFlexGrid1.AddItem rsSession("CodeSession") & Chr(9) & rsSession("CodeStage") & Chr(9) & rsSession("DateSession") & Chr(9) & rsSession("NumAnim")
rsSession.MoveNext

Loop


End Sub

Répondre à klowlead

3

rudy, le 1 mar 2005 à 15:23:56

OK

All 's well that ends well...

Répondre à rudy

8

 titi311, le 23 jun 2008 à 16:12:14

Slt
voila j'ai executé ton code main j'ai un bug dans la ligne
Do Until rsSession.EOF

MSFlexGrid1.AddItem rsSession("CodeSession") & Chr(9) & rsSession("CodeStage") & Chr(9) & rsSession("DateSession") & Chr(9) & rsSession("NumAnim")
rsSession.MoveNext

Loop
aides moi sto j'en ai vraiment besoin

Répondre à titi311

4

brahimhakkou, le 1 mai 2007 à 20:50:59

Bonjour,

j'ai un MSFlexGrid et je le remplis avec une listeBox ou j'affecte mes données
j'ai un probleme je vais savoir si c'est possible d'enregistrer les elements d'un MSFlexGrid dans une base de données avec un evenement d'un bouton par exemple. j'ai deja essayé mais ca marche pas. je sai pas si c'est possible ou non ????
Merci

Répondre à brahimhakkou

5

Mayno, le 17 aoû 2007 à 16:19:27

Salut tout le monde

j'ai une MSFlexGrid rempli par des résultat de recherche d'une base de donnée, i y a il quelqu'un svp me dire la méthode pour calculer les nombres des résultat qui s'affiche sur le MSFlexGrid.

merci pour tous

Répondre à Mayno

7

Tana, le 29 avr 2008 à 11:37:18

MSFlexGrid.Rows calcule le nombre de ligne
si tu veux calculer la somme des données de la prmière colone de ton MSFlexGrid
for i=1 to MSFlexGrid.Rows-1
cel=MSFlexGrid.matrix(i,0)
s=s+cel
next

alors s contient la somme.

Répondre à Tana

6

ibouko, le 7 nov 2007 à 13:34:50

Salut j'aimerai avoir de l'aide à propos de mon msflexgrid je veux aprés saisi dans une cellule etkan je tape sur entrer le pointeur se met sur la ligne suivante automatiquement

Répondre à ibouko