掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
2つの画像 (ID:139034)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Public Class Form1 Dim vectorx As Integer Dim vectory As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load vectorx = 1 vectory = 1 End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick PictureBox1.Top = PictureBox1.Top + vectory + (-1) PictureBox1.Left = PictureBox1.Left + vectorx PictureBox2.Top = PictureBox2.Top + vectory PictureBox2.Left = PictureBox2.Left + vectorx + (-1) End Sub End Class 恥ずかしながらこんな感じでデバッグしたら意中の動きをしました。＾＾ ありがとうございます。こんな感じのコードでOKなのでしょうか？
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.