accesｓのフォーム上でで画像を動かすプログラムは作れますか

質問

ACCESS２００３を使用している初心者です

画像検索のデータベースを作りまして、トップページをつっているのですがフォーム上に”扉の画像(BMP)”を2枚貼り付けて、その扉を左右に移動させて、扉を開いてログインするみたいなフォームを作りたいのですが可能でしょうか。
扉を横に動かすというプログラムをどうやったらいいのか・・・・

回答No.1

30246kiku · ベストアンサー

画像での例ではありませんが、フォームのタイマーイベントを利用します。
（時間での周期的実行の設定が楽です）

以下の例では、２つのラベルを左右に移動させるものです。
左側のラベル名：lab00　　右側のラベル名：lab01
フォームデザイン時のプロパティ「タイマ間隔」は「0」にしておきます。

'　タイマーイベント用処理カウンタ
'
Dim iCount As Integer

'　タイマーイベント
'　　５回ラベル移動後、フォームオープン
'
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

30246kiku

Beep 音については、以下を参照ください。

http://oshiete1.goo.ne.jp/qa4886451.html

一般の警告音が使われるようです。
（試してみたらそうでした）