即効テクニック |
フォームを開くと同時に音楽が流れる、というのはいかがでしょうか?ここでは、MIDI形式のサウンドファイルをフォームに組み込み、フォームが開かれると自動的に音楽が再生される方法を紹介します。 ●操作手順●●補足● Actionプロパティは、OLEオブジェクトに対して実行する操作を示します。
- フォームを新規作成して、デザインビューで表示します。
- [挿入(I)]メニューの[オブジェクト(O)]をクリックして、[オブジェクトの挿入]ダイアログボックスを表示します。
- [ファイルから(F)]をクリックして、[ファイル名(E)]に再生したいサウンドファイルを指定します。 (例)C:\音楽\Happy_Biethday.mid
- [OK]ボタンをクリックすると、フォームに非連結OLEが追加されます。
- プロパティシートを表示して、[すべて]タブの[名前]を「BGM」にします。
- フォームのプロパティシートを表示して、[イベント]タブの[開く時]にイベントプロシージャを設定してコード表示ボタン[...]をクリックします。
- 次のコードを記入します。 Private Sub Form_Open(Cancel As Integer) bgm.Action = acOLEActivate End Sub
- フォームを保存してから開くと音楽が再生されます。