Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBox1.Image = Image.FromFile("c:\image\1.jpg")
End Sub

Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
PictureBox1.Load("c:\image\2.jpg")
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
PictureBox1.Image = Nothing
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim res As DialogResult
OpenFileDialog1.Filter = "비트맵 파일|*.bmp|Jpeg 파일|*.jpg"
OpenFileDialog1.InitialDirectory = "C:\image"
res = OpenFileDialog1.ShowDialog
If res = Windows.Forms.DialogResult.OK Then
PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)

End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, RadioButton5.CheckedChanged, RadioButton4.CheckedChanged, RadioButton3.CheckedChanged, RadioButton2.CheckedChanged, RadioButton1.CheckedChanged
If RadioButton1.Checked = True Then
PictureBox1.SizeMode = PictureBoxSizeMode.Normal

ElseIf RadioButton2.Checked = True Then
PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage

ElseIf RadioButton3.Checked = True Then
PictureBox1.SizeMode = PictureBoxSizeMode.AutoSize

ElseIf RadioButton4.Checked = True Then
PictureBox1.SizeMode = PictureBoxSizeMode.CenterImage

ElseIf RadioButton5.Checked = True Then
PictureBox1.SizeMode = PictureBoxSizeMode.Zoom
End If
End Sub
End Class