Public Class Form1

 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Me.Close()

    End Sub

 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim img As New Bitmap("C:\discs.bmp")

        PictureBox1.Image = img

    End Sub

 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        StretchPic()

    End Sub

    Private Sub StretchPic()

        ' Stretch the picture to fit the control.

        PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage

        ' Load the picture into the control.

        ' You should replace the bold image

        ' in the sample below with an icon of your own choosing.

        PictureBox1.Image = Image.FromFile("C:\discs.bmp")

    End Sub

End Class