تفکیک استاندارد ارقام

[shkeramat]

با سلام
فایل پیوست از همین سایت است برای چاپ چک .
بنده نتوانستم ارقام را برای چاپ روی چک 3رقم 3رقم (فرمت استاندارد ) جدا نمایم
لطفا بذل عنایت نمائید . با تشکرChek01.rar

[mmbguide]

سلام

بعد از اتمام محاسباتتون، متغیری که عدد رو ذخیره میکنه رو به این شکل در کد نویسی سه رقم سه رقم جدا کنید. فرض کنید متغیری که عدد رو ذخیره میکنه اسمش TotalAmount هستش:
من میخوام عدد رو بصورت جدا شده در یک کادر پیغام نمایش بدم:

Msgbox Format(TotalAmount,"#,###")

در ضمن اگر مایلید که اعشار رو هم نمایش بدید به این صورت بنویسید:

Msgbox Format(TotalAmount,"#,###.00")

به تعداد اعشار 0 قرار بدید

[Abbas Amiri]

با سلام
فایل پیوست از همین سایت است برای چاپ چک .
بنده نتوانستم ارقام را برای چاپ روی چک 3رقم 3رقم (فرمت استاندارد ) جدا نمایم
لطفا بذل عنایت نمائید . با تشکرChek01.rar

در رویداد txtMablaChek_LostFocus فرم chap دوخط زیر را جایگزین کنید:

            Me.txtMablaA = Me.txtMablaChek '& "/---"

            Me.txtMablaA.Format = "#,##0.00/---;($#,##0.00)[Red];"

وخصوصیت Numeral Shapes تکست باکس txtMablaA را National قراردهید