Bonjour,
J’ai mis un SSTAB dans un UserControl.
J’aurais aimé conserver le nom de la propriété "TAB" du SSTAB. Malheureusement VB6 ne l’accepte pas puisqu’il s’agit d’un mot réservé.
Evidemment, je pourrais renommer TAB en TABX, mais cela m’ennuie pour les utilisateurs de mon UserControl.
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 Public Property Get Tab() As Integer 'Erreur : Tab est un mot réservé Tab = SSTab1.Tab End Property Public Property Let Tab(ByVal New_Tab as Integer) 'Erreur : Tab est un mot réservé SSTab1.Tab = New_Tab PropertyChanged "Tab" End Property Private Sub UserControl_ReadProperties(PropBag As PropertyBag) SSTab1.Tab = PropBag.ReadProperty("Tab", 0) End Sub Private Sub UserControl_WriteProperties(PropBag As PropertyBag) Call PropBag.WriteProperty("Tab", SSTab1.Tab, 0) End Sub
Existe-t-il un moyen de faire accepter par VB6 l’utilisation de ce mot réservé TAB ?
Merci pour votre aide.
Partager