Salve a tutti.
Sto cercando di aggiungere una nuova proprietà al mio ocx,
vi posto il codice.
codice:
Public Property Get BStyle() As String
  BStyle = mStyle
End Property

Public Property Let BStyle(ByVal sNewValue As Integer)
  mStyle = sNewValue
  stile mStyle
End Property
dove mStyle è una variabile privata e stile è una sub anch'essa privata.
Ed eccovi l'errore (a parte il fatto che non mi appare BStyle nella finestra delle proprietà)
--------------------------------------------------------
definition of property procedures for the same property ore inconsistent, or property procedure has an optional parameter, a ParamArray, or an invalid Set final parameter
--------------------------------------------------------
dov'è che sbaglio?