public ValueBinder(
	TModel model,
	TControl control,
	Expression<Func<TModel, TValue>> getModelValue,
	Action<TModel, TValue> setModelValue,
	Func<TControl, TValue> getControlValue,
	Action<TControl, TValue> setControlValue
)

Public Sub New ( 
	model As TModel,
	control As TControl,
	getModelValue As Expression(Of Func(Of TModel, TValue)),
	setModelValue As Action(Of TModel, TValue),
	getControlValue As Func(Of TControl, TValue),
	setControlValue As Action(Of TControl, TValue)
)

public:
ValueBinder(
	TModel model, 
	TControl control, 
	Expression<Func<TModel, TValue>^>^ getModelValue, 
	Action<TModel, TValue>^ setModelValue, 
	Func<TControl, TValue>^ getControlValue, 
	Action<TControl, TValue>^ setControlValue
)

new : 
        model : 'TModel * 
        control : 'TControl * 
        getModelValue : Expression<Func<'TModel, 'TValue>> * 
        setModelValue : Action<'TModel, 'TValue> * 
        getControlValue : Func<'TControl, 'TValue> * 
        setControlValue : Action<'TControl, 'TValue> -> ValueBinder