Discussion :

[soveste]

Salut,

J'ai créée un user control, mais je ne peux pas l'utiliser.
Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub btnWF_AddModule_Click()
    Dim wfwGUI As uclWaveFlowgui
 
    Set wfwGUI = Me.Controls.add("WaveNetBuilder.uclWaveFlowgui", "wfwGUI", fraWaveFlow)
 
        wfwGUI.Top = topWFW
        wfwGUI.Left = leftWFW
 
        wfwGUI.Visible = True
End Sub

où

uclWaveFlowgui est le nom du Contrôle Utilisateur, que j'avais créé,
WaveNetBuilder - le nom du projet
topWFW est un variable indiquant la coordonéé Top où on doit mettre le contrôle et leftWFW, réspectivement la coordonnée Left. (des nombres entiers)
Dans ce code j'ai éssayé de positionner le contrôle ajouté dans le Frame 'fraWaveFlow' sur le formulaire.

Lors de la compilation, j'obtiens l'erreur : 'Méthode ou membre de données introuvable' pour l'expression : 'wfwGUI.Top ='.

Est-ce que quelcun pourrait m'aider


Merci par avance

[avigeilpro]

Pour ajouter un control que tu a compiler(fichier ocx) il suffit sous VB d'appuyer sur Ctrl+T (composants), puis d'aller chercher ton fichier grace a parcourir
Sauf si on ne parle pas des même contrôles utilisateur.

[Theocourant]

Salut,

J'ai créée un user control, mais je ne peux pas l'utiliser.
Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub btnWF_AddModule_Click()
    Dim wfwGUI As uclWaveFlowgui
 
    Set wfwGUI = Me.Controls.add("WaveNetBuilder.uclWaveFlowgui", "wfwGUI", fraWaveFlow)
 
        wfwGUI.Top = topWFW
        wfwGUI.Left = leftWFW
 
        wfwGUI.Visible = True
End Sub

où

uclWaveFlowgui est le nom du Contrôle Utilisateur, que j'avais créé,
WaveNetBuilder - le nom du projet
topWFW est un variable indiquant la coordonéé Top où on doit mettre le contrôle et leftWFW, réspectivement la coordonnée Left. (des nombres entiers)
Dans ce code j'ai éssayé de positionner le contrôle ajouté dans le Frame 'fraWaveFlow' sur le formulaire.

Lors de la compilation, j'obtiens l'erreur : 'Méthode ou membre de données introuvable' pour l'expression : 'wfwGUI.Top ='.

Est-ce que quelcun pourrait m'aider


Merci par avance

Salut,

Le code de ton user control serait le bienvenu stp

Merci

Théo

[soveste]

Le contrôle est déja inclut, en fait il fait partie du projet en cours.

[soveste]

Le contrôle n'est pas programmé. Il contient un frame avec des labels et TextBox sur ce dernier. [/img]

[soveste]

En fait j'ai trouvé que le problème n'est pas d'ajouter le Contrôle, mais l'accès vers les contrôles de base qui se trouvent sur le UserControle.
Mon contrôle contient un textBox, dont je ne peux pas (je ne sais pas comment) y accèder dans le code.

Est-ce que quelcun a des idées ?

Merci beaucoup par avance




PS : Pour ceux qui s'interesse à l'ajout du contrôle, voici un code de MSDN :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
Dim ctlExtender As VBControlExtender
 
Private Sub Form_Load()
   Set ctlExtender = Controls.Add("Project1.UserControl1", "MyControl")
   With ctlExtender 
      .Visible = True
      .Top = 1000
      .Left = 1000
   End With
End Sub

[soveste]

Bon,
finalement j'ai trouvé moi-même la solution.
Le problème était que les contrôles sur le UserControls sont privés dans l'application et donc je n'ai pas directement accès à eux dans le code. La solution a été de créer une méthode publique à UserControl pour ajouter du texte à mon textBox.

[Theocourant]

Bon,
finalement j'ai trouvé moi-même la solution.
Le problème était que les contrôles sur le UserControls sont privés dans l'application et donc je n'ai pas directement accès à eux dans le code. La solution a été de créer une méthode publique à UserControl pour ajouter du texte à mon textBox.

Bonne nouvelle,

C'est vrai que j'ai sèché sur ta question ...

Maintenant que c'est résolu, un petit clic sur le tag tout en bas à gauche serait de mise

Bonne continuation

Théo