Public Class Form1

Private Sub drawImage(ByVal e As PaintEventArgs)

Dim bmp1 As New Bitmap("C:\Discs.bmp")

        e.Graphics.DrawImage(bmp1, New Point(1, 1))

End Sub

Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint

        drawImage(e)

End Sub

End Class