Guest User

Untitled

a guest
Nov 19th, 2018
94
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.46 KB | None | 0 0
  1. Private Sub PPSGPS_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
  2. Select Case e.CloseReason
  3. Case CloseReason.WindowsShutDown
  4. Logging.Log("Closing due to windows shutdown.", "PPSGPS_FormClosing")
  5. SaveCluster("STOP")
  6. return
  7. Case CloseReason.TaskManagerClosing
  8. Logging.Log("Closing due to task manager kill.", "PPSGPS_FormClosing")
  9. SaveCluster("STOP")
  10. return
  11. End Select
Add Comment
Please, Sign In to add comment