Posledni 4 radky jsou spatne, pomozte mi je prosim opravit…

Protected Overrides Sub OnPaint(ByVal e As System.Window­s.Forms.PaintE­ventArgs)
MyBase.OnPaint(e)

e.Graphics.Dra­wImageUnscaled(New Bitmap(_zkouska1), 0, 0)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MyNewSub()
End Sub

Sub MyNewSub()
BackColor = Color.Red
TransparencyKey = BackColor
End Sub
Private Sub Example_Contro­lAdded(ByVal sender As Object, ByVal e As System.Window­s.Forms.Contro­lEventArgs) Handles Me.ControlAdded

AddHandler e.Control.Mou­seClick, AddressOf Example_MouseClick
End Sub

Private Sub Example_Mouse­Click(ByVal sender As Object, ByVal e As System.Window­s.Forms.Mouse­EventArgs) Handles Me.MouseClick
If True Then e.Graphics.Dra­wImageUnscaled(New Bitmap(_zkouska2), 0, 0) = True
End Sub
End Class