Syntax: Objekt.TabWidth (index) = 100 [Long]
Dim ax As VistaStyleTabControl Set ax = Me!AX_Tab.Object With ax .TabWidth(.SelectedTab) = 100 End With Set ax = Nothing