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é.

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
Evidemment, je pourrais renommer TAB en TABX, mais cela m’ennuie pour les utilisateurs de mon UserControl.
Existe-t-il un moyen de faire accepter par VB6 l’utilisation de ce mot réservé TAB ?

Merci pour votre aide.