○VB6 プログラムの再起動


    If Not (0 = Shell(App.Path & "\" & App.EXEName)) Then End