 |
|
|
 |
 |
|
Code (VB.NET)
Dim Num As Integer = 12345
Num.ToString()
ตึ้งโป๊ะ!!!
|
 |
 |
 |
 |
| Date :
2010-03-15 11:24:43 |
By :
tungman |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
อีกแบบ
Code (VB.NET)
Dim Num As Integer = 12345
Cstr(Num)
|
| |
|
|
| |
| Date :
2010-03-15 12:28:20 |
By :
ผ่านมา |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ซอร์สโค้ดอังกฤษเยอะแยะ ลองหาดูนะใน Google ลองหาประมาณว่า VB.NET Convert Number To String แาจจะต้องเอามาดัดแปลงเปงไทย ผมเคยทำตอนปี 2 แต่ตอนนี้ลืมไปแระ มะยากหรอก ลองหาดู
|
| |
|
|
| |
| Date :
2010-03-19 13:40:28 |
By :
Cee |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
เอ่อ - -" เอาเป็น Convert DataType หรือจะแปลงจากตัวเลขเป็น คำอ่านกันแน่ครับเนี่ย ( เช่น 10 แปลงเป็นคำอ่าน "สิบ" ) 
|
| |
|
|
| |
| Date :
2010-03-25 08:22:12 |
By :
madoadza |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
เหอะๆ รอคำตอบแบบนี้ งานคงไม่เสร็จง่ายๆ
google : asp.net แปลงตัวเลข
แค่นี้ก็เจอแล้วครับพี่น้อง เห้อ 
|
| |
|
|
| |
| Date :
2010-03-29 02:21:55 |
By :
plakrim |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ถ้าในรูปแบบเดิมก็ CStr() , CDate() , Cint() , CDbl()
|
| |
|
|
| |
| Date :
2010-03-29 06:45:09 |
By :
webmaster |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
โอเคคับ งานเพิ่งจะเริ่มอะคับ สู้สู้
|
| |
|
|
| |
| Date :
2010-03-29 09:32:52 |
By :
adunafah |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
Function changenum(num As String) As String
Dim i As Integer, max As Integer, r As String, n As String
num = Trim(Str(Val(num)))
max = Len(num)
For i = 1 To max
r = Choose(((max - i + 1) Mod 6) + 1, "แสน", "", "สิบ", "ร้อย", "พัน", "หมื่น")
n = Choose(Mid(num, i, 1) + 1, "ศูนย์", "หนึ่ง", "สอง", "สาม", "สี่", "ห้า", "หก", "เจ็ด", "แปด", "เก้า")
If r = "สิบ" And n = "หนึ่ง" Then n = ""
If n = "หนึ่ง" And r = "" And max <> 1 Then n = "เอ็ด"
If i = 1 And n = "เอ็ด" And max > 1 Then n = "หนึ่ง"
If r = "สิบ" And n = "สอง" Then n = "ยี่"
If r = "" And max - i + 1 > 6 Then r = "ล้าน"
If n <> "ศูนย์" Then
changenum = changenum & n & r
Else
If r = "ล้าน" Then changenum = changenum & r
End If
Next
End Function
---------------------
ของเค้าดีจริงๆ
http://www.expert2you.com/view_article.php?cat_sel=50502&art_id=2882&page_no=1
แต่ 1001 มันออกมาเป็น "หนึ่งพันเอ็ด"
ไปแก้ต่อเองล่ะกัน
|
| |
|
|
| |
| Date :
2010-04-02 16:45:37 |
By :
watcharop |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
Quote:
