View Full Version : درخواست زیر برنامه جداکننده ارقام فیلد مبلغ
sh_m
دوشنبه 11 آبان 1383, 12:42 عصر
سلام
من می خوام کدی بنویسم که وقتی کاربر داخل یک TextBox فیلد مبلغ را وارد می کنه خود به خود از سمت راست ارقام را با ویرگول 3 تا 3 تا جدا کنه(یک هفته اس وقت منو گرفته ولی به هیچ نتیجه ای نرسیدم).خواهش می کنم اگر کسی از دوستان در این مورد به نتیجه ای رسیده کمکم کنه .
مرسی
linux
دوشنبه 11 آبان 1383, 22:44 عصر
برادر من!
این کارها قبلا انجام شده!
توی codeproject دنبال maskeditbox بگرد.
sh
سه شنبه 12 آبان 1383, 00:17 صبح
میتونی در رویداد KeyPress بعد از زدن Enter توسط کاربر به صورت زیر اعداد رو سه رقم سه رقم جدا کنی
DIM g AS INT32 = cint(TextBox1.Text
TextBox1.Text = Format(g, "#,##0")
sh_m
سه شنبه 12 آبان 1383, 09:04 صبح
خیلی از کمک دوستان متشکرم
ببخشید این codeproject کجاست :گیج:
linux
سه شنبه 12 آبان 1383, 09:53 صبح
www.codeproject.com
mfasihy
شنبه 20 فروردین 1384, 12: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, 09:46 صبح
microsoftmaskeditbox رو به جعبه ابزارت اضافه کن.
بعد تو mask میتونی بنویسی.
###,###,###
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.