コンソールのVBウィンドウを閉じると何かしたいですか？

Question

私はコンソールのVBのウィンドウが可能ですか？close私は関数を呼び出したり、いくつかのコードを実行したいですか？事前

Answer 1

で

おかげでこれを試してみてください、私はそのようにテストしていない、私はあなたにそれを任せるしかしこれは正しい方向にあなたを導くべきである:) :)

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 

を

どうすればいいのか教えてください:)

ハッピーコーディング！