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
ลองใช้ดูครับ
วันที่สร้าง : 22 พฤษภาคม 2554 เวลา 17:54
จำนวนคนอ่าน : 952
SiAMFOCUS.COM ยังคงรักษาแนวความคิดเดิม คือต้องการให้ที่แห่งนี้เป็นที่ที่แลกเปลี่ยนความรู้ ทางด้านภาษาที่ใช้พัฒนาโปรแกรมต่างๆ ซึ่งเป็น code ที่ใช้งานจริง อาจจะยากสำหรับคนที่เพิ่งเริ่มต้น แต่บทความทางด้านเทคนิค ต่าง ๆ ได้ผ่านการทดสอบการใช้งานมาแล้ว หากใครมีเทคนิคดีดี ก็สามารถส่งเข้ามาได้นะครับ
ปัจจุบัน
SiAMFOCUS.COM ยังได้เปิดบริการ
จด Domain และ บริการ ให้เช่าพื้นที่
Hosting ให้บริการด้านการเรียนการสอน
สอนเขียนเว็บ,
สอน ASP,
สอน PHP ให้บริการเว็บไซต์ โดยรับ
ทำเว็บ, รับ
เขียนโปรแกรม ต่าง ๆ เพื่อหารายได้เสริมและทุน เพื่อให้ทีมงาน มีกำลังใจในการ ทำส่วนของ
FREE CODE ขอแรงใจ แรงเชียร์มาก ๆ ด้วยนะครับ ^^