MaskEd textbox vb.net

[asastrem]

que tal foreros, tengo una duda que quiza alguien pueda resolver o ampliar...

tengo una caja de texto con formato de moneda
Private Sub formatMoneda()
txtCantPag.Text = FormatCurrency(txtCantPag.Text)
txtResta.Text = FormatCurrency(txtResta.Text)
txtCantUP.Text = FormatCurrency(txtCantUP.Text)
txtCantMaxCon.Text = FormatCurrency(txtCantMaxCon.Text)
txtAdeuCCon.Text = FormatCurrency(txtAdeuCCon.Text)
End Sub

y a este procedimiento lo mando a llamar cuando cargo la forma:

Private Sub frmContacto_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
IniciarFormulario()
formatMoneda()
End Sub

aqui no hay problema, el problema es cuando actualizo cifras, me deja el formato sin signo de pesos y sin coma

y si lo meto en la carga del formulario:
Private Sub frmContacto_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

me manda error...

trate de utilizar un MASKED TEXTBOX
dandole el formato $ ##0,000.00

pero me recorre los decimales
no me da la cifra exacta o me da menos o mas...

alguien sabe como se usa exactamente???????????????