No.1ベストアンサー
- 回答日時:
画像での例ではありませんが、フォームのタイマーイベントを利用します。
(時間での周期的実行の設定が楽です)
以下の例では、2つのラベルを左右に移動させるものです。
左側のラベル名:lab00 右側のラベル名:lab01
フォームデザイン時のプロパティ「タイマ間隔」は「0」にしておきます。
' タイマーイベント用処理カウンタ
'
Dim iCount As Integer
' タイマーイベント
' 5回ラベル移動後、フォームオープン
'
Private Sub Form_Timer()
iCount = iCount + 1
Select Case iCount
Case 1 To 5
Me.lab00.Left = Me.lab00.Left - 100
Me.lab01.Left = Me.lab01.Left + 100
Case Else
Me.TimerInterval = 0
' DoCmd.OpenForm "XX"
' DoCmd.Close acForm, Me.Name, acSaveNo
End Select
End Sub
' 初期設定/ラベル表示文字消去
'
Private Sub Form_Load()
Me.lab00.Caption = ""
Me.lab01.Caption = ""
End Sub
' 実行ボタンで、タイマー起動
'
Private Sub btn00_Click()
iCount = 0
Me.TimerInterval = 100
End Sub
この回答への補足
アドバイスありがとうございました。
扉を開くときに音を鳴らすことはできるのでしょうか?
作っているプログラムではふすまを開かせるのですが鼓のような『ポンポンポンポン』みたいな音が理想ですが・・・・
No.2
- 回答日時:
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- DIY・エクステリア 自作アクリルケースの「扉」について。 画像の様に下から持ち上げるタイプの扉をつけようと思っていました 4 2022/11/12 21:32
- リフォーム・リノベーション 鉄製の門扉をスムースに開閉したい。 古くい借家に引っ越してきました。 ガレージにある門扉が重くて固く 5 2022/04/04 07:43
- DIY・エクステリア システムキッチンなどに使われている扉の丁板を換装取り替えするとき、丁番サイズ、丁番形状、丁番種類選定 7 2023/05/02 08:31
- Visual Basic(VBA) エクセルマクロでアニメを作る方法を教えてください。 1 2023/02/07 14:27
- DIY・エクステリア 自動扉を手動扉にすることはできますか? 4 2022/11/28 16:37
- Access(アクセス) Accessに関する質問です。 クエリーQ出勤 からフォームF出勤を作成 フォームは分割フォームで作 1 2023/05/26 08:57
- Access(アクセス) Accessで独自メニューバーまたはリボンを作成したい 1 2022/12/02 14:31
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Chrome(クローム) 入力フォームの履歴を消したい 2 2023/06/29 13:02
- Access(アクセス) Access 複数条件検索の設定が上手く行きません 1 2022/07/22 20:37
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでユーザーフォームを再表示...
-
ユーザーフォームのテキストボ...
-
ユーザーフォーム上に現在日時...
-
モーダルフォームとモードレス...
-
Microsoft Formsの「個人情報や...
-
ユーザーフォームのコピー?
-
MSGBOXのフォント大きさ変更
-
ExcelVBAのユーザーフォームの...
-
VBA(エクセル)のユーザー...
-
Excel VBAで別のブックからユ...
-
エクセルのフォームをマクロで...
-
Microsoft Forms とか、それに...
-
エクセルVBAのフォームを最...
-
ユーザーフォームを表示中にシ...
-
VBAのテキストフォームの折り返...
-
なぜエラーになるのでしょう?...
-
子フォームでDB更新後、親フォ...
-
フォームの位置を取得したい
-
Form_Load と Form_Activate の...
-
エクセルのVBAでユーザーフォー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ユーザーフォームを表示中にシ...
-
ExcelVBAのユーザーフォームの...
-
クリックイベントなのに、2回ク...
-
Microsoft Formsの「個人情報や...
-
ユーザーフォームのテキストボ...
-
【VBAユーザーフォームで閉じる...
-
モーダルフォームとモードレス...
-
VBAでユーザーフォームを再表示...
-
エクセルVBAのフォームを最...
-
MSGBOXのフォント大きさ変更
-
Form_Load と Form_Activate の...
-
ユーザーフォーム上に現在日時...
-
Excelにて、ユーザーフォームで...
-
Hideについて(.NET)
-
フォームウィンドウを最前面に...
-
コントロールの存在確認
-
VBA(エクセル)のユーザー...
-
'ユーザーフォーム右上隅の[×...
-
エクセルVBA フォーム上でOnkey...
-
ブックをCloseまたはQuitで閉じ...
おすすめ情報