วันพฤหัสบดีที่ 17 มิถุนายน พ.ศ. 2553

TextBox : การเคลียร์ข้อความใน TextBox ทั้งหมด


1. สร้าง textbox ขึ้นมา
2. สร้างปุ่มสำหรับเคลียร์
3.พิมพ์ Code ที่ ปุ่มเคลียร์

Dim a As Control
For Each a In Me.Controls
If TypeOf a Is TextBox Then
a.Text = Nothing
End If
Next

1 ความคิดเห็น: