GROUPE DE CONTRÔLES VB6 EN VISUAL BASIC 2005 EXPRESS EDITION vb2005, control, groupe, collection, Source N°36228

Information sur la source

Catégorie :Control

Classé sous : vb2005, control, groupe, collection Niveau : Débutant Date de création : 24/02/2006 Date de mise à jour : 25/02/2006 10:28:20 Vu / téléchargé: 9 050 / 801

Auteur : Afyn

Ecrire un message privé

Note :

8,00 / 10

1
2
3
4
5
6
7
8
9
10

Commentaire sur cette source (3)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

C'est une simulation des groupes de contrôles de VB6 en VB.NET
Evidemment EBArtSoft m'a mis sur la voie.
On peut grouper des contrôles identiques, soit dans l'IDE
soit dynamiquement dans le code et y attacher la gestion
des évenements.

Afyn
Navedac - Le savoir faire des cancres

Source

Les contrôles sont ajoutés à la collection Controls
' Créé l'objet
Dim Ctl As New Note
' L'ajoute à la collection Controls de NotePanel
Me.NotePanel.Controls.Add(Ctl)
' On ajoute une interception des messages et une re direction
' Il faut traiter tous les messages un à un
AddHandler Ctl.MouseMove, AddressOf NoteMouseMove
AddHandler Ctl.DoubleClick, AddressOf NoteMouseDoubleClick
With Ctl
.Top = y
.Left = x
.BringToFront()
End With

Les contrôles sont ajoutés à la collection Controls

        ' Créé l'objet
        Dim Ctl As New Note
        ' L'ajoute à la collection Controls de NotePanel
        Me.NotePanel.Controls.Add(Ctl)
        ' On ajoute une interception des messages et une re direction
        ' Il faut traiter tous les messages un à un
        AddHandler Ctl.MouseMove, AddressOf NoteMouseMove
        AddHandler Ctl.DoubleClick, AddressOf NoteMouseDoubleClick
        With Ctl
            .Top = y
            .Left = x
            .BringToFront()
        End With

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

bin
- Debug
- Release
My Project
- Application.Designer.vb 1 515 octets
- Application.myapp510 octets
- AssemblyInfo.vb 1 181 octets
- Resources.Designer.vb 2 780 octets
- Resources.resx 5 612 octets
- Settings.Designer.vb 2 985 octets
- Settings.settings279 octets
obj
- Debug
  - TempPE
    - My Project.Resources.Designer.vb.dll7 680 octets
  - GraphicControl.exe32 768 octets
  - GraphicControl.Form1.resources180 octets
  - GraphicControl.Note.resources180 octets
  - GraphicControl.pdb67 072 octets
  - GraphicControl.Resources.resources180 octets
  - GraphicControl.vbproj.GenerateResource.Cache899 octets
  - GraphicControl.xml 688 octets
- Release
- GraphicControl.vbproj.FileList.txt 407 octets
Form1.Designer.vb 4 298 octets
Form1.resx 5 814 octets
Form1.vb 2 517 octets
GraphicControl.sln 923 octets
GraphicControl.suo15 360 octets
GraphicControl.vbproj 4 822 octets
image002.jpg 10 509 octets
Note.Designer.vb 1 308 octets
Note.resx 5 814 octets
Note.vb 299 octets

Télécharger le zip

Historique

24 février 2006 13:26:27 :: - Corrections Mineures
25 février 2006 10:28:20 :: - Suppression du Tag et utilisation du mot clé TypeOf à la place

Sources du même auteur

Toutes les sources de Afyn

Sources de la même categorie

Toutes les sources de la catégorie Control

Sources en rapport avec celle ci

Commentaires

Commentaire de Mauricet le 27/02/2006 10:33:57

Bonjour
Il faut rajouter l'espace de nom Graphic Control pour que cela fonctionne.
C'est une solution. Mais, fait un peu une grille du Lotto avec un bouton en dessous qui lance, à chaque appui, l'application pour donner les numéros ganants, y compris le complémentaire.
Le tout est affiché graphiquement sur la grille avec une couleur différente pour le complémentaire
A bientôt
Maurice
Commentaire de BSGilles le 16/07/2007 15:46:04

Simple et efficace. Parade à l'une des nombreuses absurdités de VB.Net, souvent en régression par rapport à VB6. Merci
Commentaire de Afyn le 12/12/2007 21:47:41

J'avais loupé ce commentaire ...

Merci BSGILLES

Afyn - Navedac