Bonjour,

J'ai créé une form afin de personnalisé une messagebox car j'ai besoin d'adapter le texte de la fenetre et des boutons.

Je l'ai créé dans un projet différents car j'ai pour objectif de le réutiliser ultérieurement voir plusieurs fois dans mon appli.

J'aurai donc besoin de créer des propriété personnalisé afin de définir "dynamiquement" le texte de mes boutons et de la messagebox.

J'ai donc fait cela, mais je ne vois pas les propriétés apparaitre.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Public Class w_msgbox
    Property Msgbox_Titre As String
    Property Msgbox_Texte As String
    Property Msgbox_But1_texte As String
    Property Msgbox_But1_name As String
    Property Msgbox_But2_texte As String
    Property Msgbox_But2_name As String
 
    Sub Msgbox_modif()
        Me.Text = Msgbox_Titre
        Me.lab_texte.Text = Msgbox_Texte
        Me.bt_but1.Text = Msgbox_But1_texte
        Me.bt_but1.Name = Msgbox_But1_name
        Me.bt_but2.Text = Msgbox_But2_texte
        Me.bt_but2.Name = Msgbox_But2_name
    End Sub
 
End Class