GB3- Gridview et presse papier

Rédigé par spheris Aucun commentaire
Classé dans : apprentisssage, gambas 3, Gridview, Tutoriel Mots clés : aucun
Bonjour,
Dans ce petit tutoriel, je vous propose de copier l'intégralité d'une gridview dans le presse papier pour pouvoir le coller dans un éditeur de texte pour créer un fichier CSV par exemple.


A) création de l'interface.

Posez une gridview et un bouton
renommez la gridview en 'grille' et le button1 en Bcopy.

B) Ecriture du code.

Dans l'évènement Bcopy_Click(), écrivez ce code :

Dim maliste As String
Dim a As Integer
maliste = Null
For a = 0 To (grille.Rows.Max - 1)
maliste = maliste & grille[a, 0].Text & ";" & grille[a, 1].Text & ";" & grille[a, 2].Text & ";" & grille[a, 3].Text & ";" & grille[a, 4].Text & ";" & grille[a, 5].Text & ";" & grille[a, 6].Text & ";" & grille[a, 7].Text & ";" & Chr$(10)
Next
Clipboard.Copy(maliste)
End Select


Le texte ainsi copié sera toutes les cellules des lignes séparées par un point virgule sur tout le tableau.
A votre convenance, vous pouvez coller ce texte dans une textarea par exemple avec la commande:

TextArea1.text = Clipboard.Paste()

ou dans une autre application (éditeur de texte) par un clic droit de la souris et 'Coller'

Merci pour votre attention.