Dim MyVar As Object Dim MyCheck As Boolean ' ... MyVar = "53" ' Assign value. MyCheck = IsNumeric(MyVar) ' Returns True. ' ... MyVar = "459.95" ' Assign value. MyCheck = IsNumeric(MyVar) ' Returns True. ' ... MyVar = "45 Help" ' Assign value. MyCheck = IsNumeric(MyVar) ' Returns False.
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง