บทความ : 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
ลองใช้ดูครับ
หากชอบบทความนี้ กดให้ค่ากาแฟที่นี่ครับ
ฝากติดตามผลงานด้านล่างด้วยครับ
--------------------------► Website : https://www.siamfocus.com/
► LINE@ : https://line.me/ti/p/@siamfocus.com
► Facebook : https://www.facebook.com/fanpage.siamfocus
► Twitter : https://twitter.com/siamfocus
► Instagram : https://www.instagram.com/iamtaam
--------------------------
