Snasui Excel Forum

Posted: **Mon Jan 26, 2015 7:53 am**

ดิฉันต้องการเปลี่ยน format ใน text box คะ
โดยใช้ code นี้คะ

tbox1.Value = Format(tbox1.Value, "#,###,###.00")

แต่ code ดังกล่าวนี้สามารถคีย์ตัวเลขได้เพียงค่าเดียว
กล่าวคือ ที่ tbox1 และ tbox2 ดิฉันต้องการใส่ตัวเลข 5,000.45 แต่ใส่ได้เพียง 5.00 คะ
นอกจากนี้พอใส่ตัวเลขแล้ว ต้องการ key ใหม่ ก็ไม่สามารถแก้ไขได้ด้วยคะ ดิฉันต้องการแก้ไขตัวเลขใน tbox1 และ 2 ได้ด้วยคะ
รบกวนช่วยแนะนำด้วยคะ

Posted: **Mon Jan 26, 2015 9:04 am**

ปรับเป็น Event AfterUpdate แทนครับ

ตัวอย่าง Code ตามด้านล่างครับ

Code: Select all

Private Sub tbox1_AfterUpdate()
    tbox1.Value = Format(tbox1.Value, "#,###,###.00")
End Sub

Posted: **Mon Jan 26, 2015 9:33 am**

ได้ผลลัพธ์ตามที่ต้องการแล้วคะ ขอบคุณมากคะอาจารย์

Snasui Excel Forum

สอบถามการแก้ไข format number ใน textbox

สอบถามการแก้ไข format number ใน textbox

Re: สอบถามการแก้ไข format number ใน textbox

Re: สอบถามการแก้ไข format number ใน textbox