Discussion :

[sergio_bzh]

Bonjour,
je suis en train de développer une appli et je n'arrive pas à faire un truc qui me semble pourtant complètement basique. Pour résumer :
- je crée un projet "appli windows" de nom "prj"
- j'ai donc une Form "Form1"
- j'y ajoute un label "Label1"
- je crée un Module "Module1"
Vraiment simple.

Mon pb : dans Module1 je ne sais pas comment accéder à Label1 !!!

j'essaie avec prj. , Form1. , System.Windows.Forms. ou encore plein d'autres choses, rien à faire.
Comment j'accède à Label1 ?? (et plus généralement aux vars et objets de Form1 qui sont pourtant Friend ou Public)

merci d'avance.
Sergio

[graphicsxp]

Salut,
Déclare et crée un objet du type de ta form:

Code :

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

dim f as new myForm

et appelle ses propriétés, methodes... depuis une méthode:

Code :

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

1
2
3
public sub Test ()
  f.UneFonction
end sub

@+

[sergio_bzh]

J'ai bien essayé à peu près équivalent avec l'instance courante Me :

Code :

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

1
2
3
4
5
6
7
8
 
Public Class Form1
    Inherits System.Windows.Forms.Form
  (code généré par le concepteur Windows Form)
    Private Sub Form1_Load(ByVal sender ..... ) Handles MyBase.Load
        Module1.rtn(Me)
    End Sub
End Class

et le module :

Code :

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

1
2
3
4
5
6
7
8
 
Module Module1
    Public maForm As System.Windows.Forms.Form
    Public Sub rtn(ByRef frm As System.Windows.Forms.Form)
        maForm = frm
        maForm.Label1()
    End Sub
End Module

Et j'ai donc une erreur de compil sur maForm.Label1

Ce n'est pas un pb propre à mon appli. C'est valable pour n'importe quel projet. Essayé aussi sur d'autres PC.
Mais le pb n'est que pour la classe Form1. Toutes les autres classes que je construis "fonctionnent" normalement.

Est-ce du au fait que c'est le Main ? D'ailleurs Dans Visual Studio on ne sait même pas où est la déclaration Main
Ou est-ce que c'est tellement énorme que personne n'ose me le dire ?

[graphicsxp]

Une fois que tu as récupéré ta form dans ta procédure rtn, fais un cast en Form1, sinon label1 ne peut pas etre reconnu comme étant un control de Form.

Les appli .net ont un point d'entree que tu définis dans les propriétés du projet. Cela peut etre un form (Form1 par exemple) ou bien une procédure Main que tu écris.

[sergio_bzh]

Effectivement c'était tout bête. il suffit d'écrire

Code :

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

1
2
 
Public Sub rtn(ByRef frm As Form1)

Merci .

[graphicsxp]

Oui, c'est une solution. Ou sinon tu fais comme avant en passant un objet de type Form que tu cast ensuite en Form1

Code :

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

directcast(frm, Form1).Label1