おぉ！消したらビルドエラーはなくなりました！
ありがとうございます。

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

下の部分にある
Private Sub Timer1_Tick...
End Sub
が不要ですね。

以下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
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿


＼(゜ロ＼)３つある・・・
で、これをどうすれば????　　何にも知らなくて本当にすいませんm(_ _)m
申し訳ないです。。。

Timer1_Tickが２つあるということはありませんか？

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

でも、これはTimer1_Tickを複数記述するという意味ではありません。
Timer1_Tickは１つだけにする必要があります。

本サイトの授業の ゲーム講座の第１回、キャラクターの表示をやっていました。
そして、Timer　を使ってキャラクターを表示させるプログラムをフォームに書き込んだら、

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

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

VB2010です。