Public Class Form1

    Private Sub ФайлToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ФайлToolStripMenuItem.Click

    End Sub

    Private Sub ВідкритиToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ВідкритиToolStripMenuItem.Click
        Dim file As String
        OpenFileDialog1.Filter = "jpg|*.jpg"
        If OpenFileDialog1.ShowDialog(Me) = DialogResult.OK Then
            file = OpenFileDialog1.FileName
            PictureBox1.Load(file)
            PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage

        End If

    End Sub

    Private Sub ВихідToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ВихідToolStripMenuItem.Click
        Dim file As String
        SaveFileDialog1.filter = "bmp*.bmp"
        If SaveFileDialog.ShowDialog(Me) = DialogResult.OK Then
            file = SaveFileDialog1.filename
            PictureBox1.Image.Save(file)
        End If
    End Sub
End Class