Création propriété pour une form
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:
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 |
