第四回 VB講座

第四回 VB講座
画像とタイマー
座標について（フォーム）
右向き正
原点（ 0, 0 ）
端点
（Me.Width , Me.Height）
下向き正
座標について（オブジェクト）
オブジェクトの原点
(PictureBox1.Left , PictureBox1.Top)
画像を使おう

PictureBoxを使う
PictureBoxを画面に配置して、画像を表示させてみよう。
表示できる画像には、
bmp、jpeg、gif、ico、png、wmf
などいろんな種類があります。
周期的に命令を実行しよう

10ミリ秒ごとに画像を移動させよう
まずは、ツールボックスからTimerをみつけて設置しよう。
→Timerの設定
画像を移動させよう。
次の命令をTimerをダブルクリックしてできた部分に書こう。
PictureBox1.Top += 1
PictureNox1.Left += 1
あたり判定をしよう

みかんが端まで来たら跳ね返そう
みかんの座標＋みかんの横幅＞＝ Formの横幅（Me.Height）
みかんのX軸に進む方向を逆に
みかんの座標＋みかんの縦幅＞＝ Formの縦幅（Me.Width）
みかんのY軸に進む方向を逆に
みかんの座標＜＝ FormのX軸原点（具体的な数字で言うと「０」）
みかんのX軸に進む方向を逆に
みかんの座標＜＝ FormのY軸原点（具体的な数字で言うと「０」）
みかんのY軸に進む方向を逆に
当たり判定をしよう

プログラム例
Classの中で
Dim X As Integer = 3
Dim Y As Integer = 1
Timerの中で
If (mikan.Left + mikan.Width) >= Me.Width Then
x = -x
End If
mikan.Top += y
mikan.Left += x

Download Report