- แปลง text เป็น number ก่อนก็ได้ครับ เมื่อมันเป็น number แล้วก็ใช้คำนวนค่าก็ง่ายขึ้น ส่วนจะแสดงผลในรูปแบบไหนๆ ก็ไปตั้งค่าการแสดงผลใน textbox ปลายทางก็ได้ครับ

- หรือจะสั่ง format มันไปเลยก็ได้ (มีผลเฉพาะแสดงผลเท่านั้น ข้อมูลจริงยังคงเป็น string เหมือนเดิม)

yourString = "12767.79"3

แปลงค่าเป็น number
Dim myNumber as Double
myNumber = cDbl(yourString)
หรือ
myNumber = val(yourString)

เมื่อต้องการแสดงผล ก็ไปตั้งค่าใน คุณสมบัติของ textbox ได้เลยครับ

หรือจะสั่งแสดงผลจาก text เลยก็ได้
Dim myString as String
myString = format(yourString,"###,###.##")