VB.NET : Event Close(X) บน ฟอร์ม ครับ
ปัญหาที่พบคือเมื่อผู้ใช้กดปิดที่ปุ่ม x ด้านบนนะครับ
แล้ว พบว่าจะเปิดโปรแกรมไม่ได้อีก เนื่องจาก อยู่ใน TaskManager
เหมือนคำสั่งปิดไม่สมบูรณ์
จึงต้องหาคำสั่งมาเพิ่มเพื่อให้เกิดการปิดโปรแกรมอย่างแท้จริงอีกครั้งครับ
Private Sub frmName_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If (MsgBox("คุณต้องการออกจากระบบใช่หรือไม่ ?", MsgBoxStyle.YesNo, "การยืนยัน") = MsgBoxResult.Yes) Then
Dim a As Double
For a = 1 To 0 Step -0.01
Me.Opacity = a
Next
End
End If
End Sub
ลองใช้ดูครับ
มาเป็นเพื่อนกันครับ บนช่องทาง Social ด้านล่างนี้ครับ
--------------------------► LINE@ : @siamfocus.com
► Facebook : fanpage.siamfocus
► Twitter (X) : siamfocus
► Linkedin : taam-siamfocus
► Instagram : iamtaam
► Youtube : SiAMFOCUS
► Tiktok : @taamsiamfocus
--------------------------