Initialisation objet module classe

j'ai lu un peu partout que les modules de classe sont une très bonne approche. Pour me faire une idée, je vais au charbon. Je dois être un gros blaireau, impossible de commencer !!!

juste en hors d'oeuvre, je crée un module de classe "chaine" qui initialise l'instance d'objet à "bienvenue" . Là où je pensais mettre qq secondes, je ne comprends toujours pas pourquoi cela ne fonctionne pas :

je crée le module de classe "chaine"

et je code

Option Explicit

Private machaine as string

sub class_initialize() (ça commence à puer, il ne met pas les majuscules sur C et I)

machaine = "bienvenue"

end sub

puis un module :

Option Explicit

sub montest

dim toto as new chaine

end sub

Compil OK, mais la procédure class_initialize ne s'exécute pas. Je croyais que le new instanciait l'objet et donc exécutait le "sub class_initialize" ???

Bonjour, essaie comme ceci :

Dans un module de classe nommé chaine:

Public machaine As String

Dans un module normal :

Sub testermachaine()

Dim msg As New chaine
msg.machaine = "bienvenue"
MsgBox msg.machaine

End Sub

Cela devrait fonctionner.

Cordialement

-- 09 Déc 2010, 16:03 --

Tu as cette solution également.

Dans un module normal :

Sub testermachaine()

Dim machaine As New chaine

machaine.afficher_message ("Bienvenue")

End Sub

Dans module de classe chaine :

Public machaine As String

Public Sub afficher_message(machaine)

MsgBox machaine

End Sub