ShiftOS/crash_pic.vb


1
2
3
4
5
6
7
8
9
10
11

Public Class crash_pic


    Private Sub crash_pic_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        killme.Start()
    End Sub

    Private Sub killme_Tick(sender As Object, e As EventArgs) Handles killme.Tick
        Application.Exit()
    End Sub
End Class