درخواست زیر برنامه جداکننده ارقام فیلد مبلغ [بایگانی]

View Full Version : درخواست زیر برنامه جداکننده ارقام فیلد مبلغ

sh_m

دوشنبه 11 آبان 1383, 11:42 صبح

سلام
من می خوام کدی بنویسم که وقتی کاربر داخل یک TextBox فیلد مبلغ را وارد می کنه خود به خود از سمت راست ارقام را با ویرگول 3 تا 3 تا جدا کنه(یک هفته اس وقت منو گرفته ولی به هیچ نتیجه ای نرسیدم).خواهش می کنم اگر کسی از دوستان در این مورد به نتیجه ای رسیده کمکم کنه .
مرسی

linux

دوشنبه 11 آبان 1383, 21:44 عصر

برادر من!
این کارها قبلا انجام شده!
توی codeproject دنبال maskeditbox بگرد.

دوشنبه 11 آبان 1383, 23:17 عصر

میتونی در رویداد KeyPress بعد از زدن Enter توسط کاربر به صورت زیر اعداد رو سه رقم سه رقم جدا کنی

DIM g AS INT32 = cint(TextBox1.Text
TextBox1.Text = Format(g, "#,##0")

sh_m

سه شنبه 12 آبان 1383, 08:04 صبح

خیلی از کمک دوستان متشکرم
ببخشید این codeproject کجاست :گیج:

linux

سه شنبه 12 آبان 1383, 08:53 صبح

www.codeproject.com

mfasihy

شنبه 20 فروردین 1384, 11:37 صبح

Public Function adjust_cama(strnum) As String
Dim s As String
Dim i As Integer
If strnum = "" Then
exit function
End If
i = Len(strnum)
s = ""
For i = Len(strnum) To 1 Step -1
If (Len(strnum) - i) Mod 3 = 0 And Len(strnum) <> i Then
s = "," & s
End If
s = Mid(strnum, i, 1) & s

Next i
adjust_cama = s
End Function

reham

یک شنبه 21 فروردین 1384, 08:46 صبح

microsoftmaskeditbox رو به جعبه ابزارت اضافه کن.

بعد تو mask میتونی بنویسی.

###,###,###