[VB6] Property Get e Let

[Brainjar]

Se non vuoi che la proprietà sia pubblica definiscila come Private

Private Property Get BStyle() As Integer
  BStyle = mStyle
End Property

Public Property Let BStyle(ByVal sNewValue As Integer)
  mStyle = sNewValue
  stile mStyle
End Property

Ciao,