1.
Private
Sub
close_all_frm()
2.
For
i
As
Integer
= My.Application.OpenForms.Count - 1
To
0
Step
-1
3.
If
My.Application.OpenForms.Item(i) IsNot
Me
Then
4.
My.Application.OpenForms.Item(i).Close()
5.
End
6.
Next
7.
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
