1.
if isnumeric(text1.text)=false then
2.
messagebox.show(
"กรุณากรอกตัวเลข"
)
3.
end if
Private
Sub
txt_box_KeyPress(
ByVal
sender
As
Object
,
e
System.Windows.Forms.KeyPressEventArgs)
Handles
txt_box.KeyPress
Select
Case
Asc(e.KeyChar)
48
To
57, 8
4.
Else
5.
e.Handled =
True
6.
End
7.
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
