同じ署名で複数の定義が存在します??? への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 ぇえええええ  (小学生) 投稿日時 2013/10/16 17:30:35
おぉ!消したらビルドエラーはなくなりました!
ありがとうございます。

自分の注意不足でした。。
今回はありがとうございました!

投稿者 HiDE-Ada  (社会人) 投稿日時 2013/10/16 00:48:40
下の部分にある
Private Sub Timer1_Tick...
End Sub
が不要ですね。
投稿者 ぇえええええ  (小学生) 投稿日時 2013/10/15 21:44:14
以下Timer1_Tickがあるコードです。
________________________________________

Public Class Form1
    Private mainGraphics As Graphics
    Private PlayerImage As Bitmap
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Init()
        Timer1.Enabled = True
    End Sub
    Private Sub Init()

        '▼描画用のGraphicsクラスの確保(技術的な処理)
        If mainGraphics Is Nothing Then
            '初回のみ生成
            Dim bmp As New Bitmap(Me.ClientRectangle.Width, Me.ClientRectangle.Height)
            Me.BackgroundImage = bmp
            mainGraphics = Graphics.FromImage(bmp)
        End If

        'exeと同じフォルダーにあるPlayer1.bmpを読み込む。
        'これができるのは、ファイルのプロパティで出力ディレクトリにコピーする設定になっているから。
        PlayerImage = Image.FromFile(Application.StartupPath & "\Player1.bmp")

    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick   ←コレ↑

        mainGraphics.DrawImage(PlayerImage, 0, 0)

        'フォームを再描画
        Me.Invalidate()

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick  ←コレ

    End Sub
End Class
__________________________________________


\(゜ロ\)3つある・・・
で、これをどうすれば????  何にも知らなくて本当にすいませんm(_ _)m
申し訳ないです。。。
投稿者 るきお  (社会人) 投稿日時 2013/10/15 12:52:31
Timer1_Tickが2つあるということはありませんか?

この記事は少しずつプログラムを作っていくスタンスなので、記事中にはプログラムが異なる Timer1_Tick が何回か登場します。

でも、これはTimer1_Tickを複数記述するという意味ではありません。
Timer1_Tickは1つだけにする必要があります。
投稿者 ぇえええええ  (小学生) 投稿日時 2013/10/14 18:44:06
本サイトの授業の ゲーム講座の第1回、キャラクターの表示をやっていました。
そして、Timer を使ってキャラクターを表示させるプログラムをフォームに書き込んだら、

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)には
同じ署名で複数の定義が存在します。

と出て、エラーが起きてしまいます。
どういうことなのか、またどのようにすればよいのか、教えてください m(_ _)m

VB2010です。