.net 当我关闭控制台VB窗口时，我想做一些事情，这可能吗？

当我关闭控制台vb中的窗口时，我想调用函数或执行一些代码，这可能吗

---

提前感谢

试试这个，我还没有测试过，我会让你决定：）不过这应该会引导你走上正确的方向：）

让我知道你的进展：）

---

快乐编码

是的，如果你相信自己，这是可能的。。。当然，如果你尝试了一些东西，我在来这里之前就尝试过，但是在关闭控制台应用程序时没有发生任何事件，我在谷歌上搜索过，但我没有找到任何解决方案。所以，如果你不知道该怎么做，请不要发布这样的答案，因为它反映了你有多可怕。我同意Crush，我必须是可能的…@mohammed，听着，我不想和你争论（因为我不能理解你说的一些话，因为语法不好）。懒惰的人也不是这样。就像你说的。。如果你尝试了什么，你可以把它包括在你的问题中。谢谢！这正是我想做的事，伙计，我很乐意帮忙：）

Module Module1
Public Enum ConsoleEvent
    CTRL_CLOSE_EVENT = 2
End Enum
Private Declare Function SetConsoleCtrlHandler Lib "kernel32" (ByVal handlerRoutine As ConsoleEventDelegate, ByVal add As Boolean) As Boolean
Public Delegate Function ConsoleEventDelegate(ByVal MyEvent As ConsoleEvent) As Boolean
Private handler As ConsoleEventDelegate

Sub Main()
    handler = AddressOf Application_ConsoleEvent
    If Not SetConsoleCtrlHandler(handler, True) Then
        Console.WriteLine("ERROR ADDING HANDLER")
    Else
        ''ADD YOUR MAIN CODE HERE.
        Console.WriteLine("Hello WORLD!")
        Console.ReadLine()

    End If
End Sub
Public Function Application_ConsoleEvent(ByVal [event] As ConsoleEvent) As Boolean
    Dim cancel As Boolean = False
    Select Case [event]
        Case ConsoleEvent.CTRL_CLOSE_EVENT
            'ADD YOUR CLOSING CODE WITHIN HERE, you dont need to have the Msgbox, its just there so you can understand :)
            MsgBox("Program being closed!")
            ''ADD your clean up code if needed here.
    End Select

    Return cancel ' handling the event.
End Function
End Module