∇　右上の×を無効にする　∇

　　　　　　　　　　　　　　　　　　　　　　　×を無効にすると終わらない(終われない)アプリが作れます。
　　　　　　　　　　　　　　　　　　　　　　　でも具体的に何に使うかは、私には思いつきません(^-^)

　　　　　　　　　　　　　
　　　　　　　　　　　　　　　

　　　　　　　　　　　　　　　　　　Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
　　　　　　　　　　　　　　　　　　　　'Unloadを無効にする
　　　　　　　　　　　　　　　　　　　　Cancel = 1
　　　　　　　　　　　　　　　　　　End Sub

　　　　　　　　　　　　　　　　　　　　　　　こうするだけです。これ以上書きようがありません。

1999-2000 Copyright(C) Manabu
1999-00 Manabuの部屋 http://www.manabu.uni.cc/
この文章の無断転際を禁じます

テレワークならECナビ Yahoo 楽天 LINEがデータ消費ゼロで月額500円〜！
無料ホームページ 無料のクレジットカード 海外格安航空券　海外旅行保険が無料！ 海外ホテル