No.7ベストアンサー
- 回答日時:
itohhさんの回答にちょっとだけ補足します。
他のアプリケーションであっても、自分自身のアプリケーションであってもメッセージボックスの制御は基本的に可能です。
まず、他アプリのメッセージボックスの場合はFindWindowでメッセージボックスを検索し、ダイアログのハンドルを得るのは必須です。
↓これについて補足
>SendMessage関数でWM_CLOSE
それ以外に情報が必要です。メッセージボックスの中に「はい」「いいえ」ボタンがあって、「いいえ」ボタンを押したようにして閉じたいのであれば、「いいえ」ボタンのハンドルとvbNo定数値が必要です。
それらをSendMessageにてWM_CLOSEと一緒に送らないと、WINDOWS自体が不安定になります。
No.10
- 回答日時:
あの、2回間違いと、申し訳ないのですが、TimerなどのIntervalは
プロパティウィンドウじゃないと効果ありませんでした。
下のコードのスペースが3つ、ついてるところは消したほうが
効率いいかもしれません。
Private Sub Timer1_Timer()
Timer1.Interval = 1000
End
End Sub
Private Sub Timer2_Timer()
Timer2.Interval = 1000
Unload Form1
Form2.Show
End Sub
No.9
- 回答日時:
すみません!!下のコードに間違いがありました。
Label2は下記のコードを使ってください。間違いの点は、このコードは、本来Timer2を
アクティブにするのに、Timer1をアクティブにしていました。
大変ご迷惑おかけいたしました。
Private Sub Label2_Click()
Label2.Caption = "Form2開く"
Timer2.Enabled = True
End Sub
No.8
- 回答日時:
小4のkunpaです。
単に、Form1を終了して、別のForm(例として、Form2)を開くのであれば、
「Unload Form1
Form2.Show」と書けば、Form1を閉じて、Form2を開くことができます。
これを利用すれば、タイマーコントロールで設定できます。
また、ソフトを終了するなら、「End」というコードを書き込めば、
ソフトが終了します。
なので、Formがアクティブになっていない時も、タイマーコントロール
(例:Interval 1000=1秒)のコードに[Unload Form1
Form2.Show]または[End]のコードを
書き込んでしまえば、Formがアクティブでなくても、タイマーで設定した
Intervalの時間になれば、UnloadまたはEndします。
タイマーのEnabledをFalseにして、LabelをクリックしたらEnabledをTrueに
しても面白いです。
サンプルコードです。Labelを、
「終わり(Label1)」と「Form2開く(Label2)」を用意して、終わりをクリックすると、1秒後に終わって、Form2開くをクリックすると1秒後に閉じるコード
です。Timerのコードを抜けば、簡単なプログラムに使えます。
CaptionとIntervalはプロパティウィンドウで設定してもいいです。
Timer1とTimer2のEnabledはプロパティウィンドウで
Falseにしておいてください。
参考になれば幸いです。
Private Sub Label1_Click()
Label1.Caption = "終わり"
Timer1.Enabled = True
End Sub
Private Sub Label2_Click()
Label2.Caption = "Form2開く"
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Timer1.Interval = 1000
End
End Sub
Private Sub Timer2_Timer()
Timer2.Interval = 1000
Unload Form1
Form2.Show
End Sub
No.6
- 回答日時:
こんにちは。
itohhといいます。先のアドバイスちょっと間違いがありました、すみません。
>自分自身のメッセージボックスを制御するのは基本的に出来ないと思った方がよいですよ。
正しくは、
自分自身以外(他のプロセス)のメッセージボックスを制御するのは基本的に出来ないと思った方がよいですよ。
No.5
- 回答日時:
こんにちは。
itohhといいます。>プログラム上であるソフトを起動するとメッセージが立ち上がって
>くるので、そのメッセージボックスを閉じたいのですが...
自分自身のメッセージボックスを制御するのは基本的に出来ないと思った方がよいですよ。
例えば、そのメッセージボックスを閉じてしまった場合、起動したソフトまで終了してしまう
ということはないですか?
それでも、OKでしたらば。
1.FindWindow関数でWindowハンドルを取得する。
2.そのWindowハンドルにSendMessage関数でWM_CLOSEを送信する。
これで、閉じてくれるとは思いますが、先にも説明したようにソフト自体が終了して
しまうかもしれません。
No.3
- 回答日時:
少し蛇足になりますが、#1でannie_xさんがお書きになった「Hide」はフォームを「隠す」為のコマンドで、「閉じる」とは意味合いが異なります。
フォームを隠しただけでは、まだメモリ上にフォームの内容が保持されています。
(つまり、Form1上のテキストボックスに何か入力したあと、
Form1.Hide
Form1.Show
としても、入力した内容が残った状態でフォームが再表示されます。
Unload Form1だと、メモリ上からもフォームを削除してしまいますので、
Unload Form1
Form1.Show
とすると、Form1上のテキストボックスの内容は初期化されます。
#annie_xさま、つっこんじゃってスミマセン。この文章は回答に正確を期すために投稿しました。個人攻撃の意図は全く無いことをご理解ください。
お気を悪くなさらないで下さいね(^^;
No.1
- 回答日時:
>「Form1」を閉じるためのコマンド
Form1.Hide です。
>「Form1」はアクティブになっている時、いない時両方の場合が考えられるのですが
具体的にコードを見ないとなんともいえませんが、普通は関係ないですよ。
ちなみに表示させるときは Form1.Show です。
このあたりフォームのヘルプから、「メソッド」を見てみると書いてあると思います。
この回答への補足
プログラム上であるソフトを起動するとメッセージが立ち上がって
くるので、そのメッセージボックスを閉じたいのですが...
そのメッセージは最小化の状態でタイトルバーに”Mail”と
かかれた状態で立ち上がってくるので、
オブジェクトの名前が"Mail"なのだと思って、
Mail.hide
としたら”オブジェクトが必要です”とエラー表示されてしまいました。
このメッセージボックスをプログラム上で閉じるように制御する方法
を知りたいのです。
説明が足りなくて申し訳ありません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- JavaScript ラジオボタンによるフォームの開閉を行いたい 3 2022/03/31 21:30
- Excel(エクセル) ハイパーリンクの削除について 2 2022/11/10 07:32
- Mac OS Parallels Desktop for Mac 2 2023/06/22 04:32
- 英語 自動詞のhopeについて 5 2023/03/12 02:34
- Excel(エクセル) Excel VBAについてです。 少しだけ知識はあるのですが、 うまくいかなかったので 質問させてい 3 2022/09/13 18:40
- Google Drive Google form を利用して 問い合わせフォームを作りたい 1 2022/04/25 14:15
- 英語 "for living"の意味について 13 2022/11/02 09:35
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- その他(プログラミング・Web制作) 入力フォームへ、データを自動的に入力するプログラム。どうやって作る? 4 2023/01/16 10:24
- 英語 「名詞+for...to不定詞句」で「for以降」が完全な文となる場合の名詞との関係について 4 2023/04/26 09:45
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
accessで2つ以上のフォームを起...
-
フォームで複数のチェックボッ...
-
筋トレについて質問です 身長17...
-
メインフォームからサブフォー...
-
ExcelVBAでユーザーフォーム内...
-
VBAでフォームのスクロールバー...
-
PDFフォームに本日の日付を自動...
-
PDFフォーム内で日付計算したい...
-
ToolStripStatusLabelを固定し...
-
メッセージボックスの背景色
-
Access 無操作の場合、自動で閉...
-
VB.net(VB)で、フォームにExcel...
-
フォーム上の全てのコントロー...
-
サブフォームの行ごとにコンボ...
-
Accessでフォームから別フォー...
-
Access2000のフォームに含まれ...
-
ACCESSのサブフォームのフォン...
-
C# マルチディスプレイにて、...
-
Google form を利用して 問い合...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
リストボックスの選択解除
-
Googleフォーム・複数人の申し...
-
サブフォームの新規レコードに...
-
Accessでフォームから別フォー...
-
メッセージボックスの背景色
-
PDFフォームに本日の日付を自動...
-
accessで2つ以上のフォームを起...
-
VB.net(VB)で、フォームにExcel...
-
筋トレ初心者です。 ジムでひた...
-
Access 無操作の場合、自動で閉...
-
サブフォームのイベント取得
-
サブフォームの行ごとにコンボ...
-
VBプログラムの終了
-
ユーザーフォーム上にアイコン...
-
アクセスVBA フォームのス...
-
ディスプレイ解像度より大きな...
-
PDFフォーム内で日付計算したい...
-
フォーム上の全てのコントロー...
-
VBAでフォームのスクロールバー...
おすすめ情報