โค๊ด: [Select]
Private Sub Form_Load()
If App.PrevInstance = True Then
MsgBox "โปรแกรมกำลังทำงานอยู่ !!! ไม่สามารถเปิดพร้อมกันได้", vbOKOnly + vbExclamation, "Error !"
End
End If
End Sub
Credit : IT-DARK.ORG
Private Sub Form_Load()
If App.PrevInstance = True Then
MsgBox "โปรแกรมกำลังทำงานอยู่ !!! ไม่สามารถเปิดพร้อมกันได้", vbOKOnly + vbExclamation, "Error !"
End
End If
End Sub
ดีครับ แต่ถ้าจะทำแบบว่า set focus โปรแกรมที่เปิดอยู่ด้วยทำไงพอรู้ป่าวยังไงครับ งง
ด้วยฟังค์ชั่น ตอบด่วน คุณสามารถใช้โค๊ดและ เครื่องหมายแสดงอารมณ์ได้ เหมือนการตั้งกระทู้ธรรมดา แต่สามารถทำได้สะดวกกว่า
ระวัง: หัวข้อนี้ไม่มีการอัพเดทมานานถึง 120 วัน
แจ้งเตือน: โพสของคุณจะไม่แสดงจนกว่าผู้ดูแลจะอนุมัติ.