[Black Rain]

Formumuza 2 adet form,1 Adet trackbar ,1 adet open filedialog,1 Adet buton ve 1 Adette trackbar ekliyoruz.1.Forma Trackbarla butonu yerleştiriyoruz.2.forma sadece picturebox'ı yerleştiriyoruz.

Dim y, x As Integer
'Butonun click olayına
Form2.Show()
        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Form2.PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
        End If
'formun load olayına
TrackBar1.Maximum = 4
        TrackBar1.Minimum = 1
        TrackBar1.TickFrequency = 1
        x = Form2.PictureBox1.Width
        y = Form2.PictureBox1.Height
'trackabara çift tıklayarak
Form2.PictureBox1.Width = x * TrackBar1.Value
        Form2.PictureBox1.Height = y * TrackBar1.Value