Parametri Set - Let

Private m_ParametroIDCliente As Long
Public WriteOnly Property ParametroIDCliente() As Long
Set(ByVal value As Long)
m_ParametroIDCliente = value
End Set
End Property