تکمیل ماکرو طبق شروط تعیین شده

[mojtabaaaa]

لطفا کد ریر رو ملاحظه بفرمایید
'مبلغ الف
Private Sub TextBox1_Change()
On Error Resume Next
TextBox1.Text = Format(TextBox1.Text, "#,##")
If IsNumeric(TextBox1.Text) = False Then TextBox1.Text = Empty
Call sum_mablagh
End Sub
'مبلغ ب
Private Sub TextBox2_Change()
On Error Resume Next
TextBox2.Text = Format(TextBox2.Text, "#,##")
If IsNumeric(TextBox2.Text) = False Then TextBox2.Text = Empty
Call sum_mablagh
End Sub
'مبلغ نهایی
Private Sub sum_mablagh()
On Error Resume Next
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟
Call mablagh_abh
End Sub
لطفا کد فوق را طبق شروط زیر ویرایش نمایید....
ما در تکست باکس 3 مقدار جمع و یا به عبارت دیگر مقدار کل دو تکست باکس الف و ب رو می خواهیم
بطوری که اگر در دو تکست باکس مقدار عددی وارد شد به طور خودکار مبلغ کل را در تکست باکس 3 داشته باشیم .
اگر کاربر ما در یکی ار دو تکست باکسهای الف و یا ب مقدار عددی ، حتی صفر رو هم وارد نکرد بازهم مقدار کل را داشته باشیم
ضمنا عدد کل نیز برای راحتی به صورت سه رقم سه رقم از سمت راست همانند تکس باکسهای الف و ب توسط سمی کالون جدا شوند.
امیدوارم منظورمو رسونده باشم
با تشکر از لطف شما....