Stap 5: Voeg Code toe
Begin Code
Public Class Form1 Private pic As Bitmap Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click OpenFileDialog1.FileName = "Select File" OpenFileDialog1.ShowDialog() pic = New Bitmap(OpenFileDialog1.FileName) PictureBox1.BackgroundImage = pic End SubEnd Class
Einde Code
WAT DE CODE DOET
Openbare klasse Form1 - definieert de vorm als openbaar
Privé pic als Bitmap - Hiermee wordt bepaald pic als een privé bitmap
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) behandelt Button1.Click - definieert wanneer de gebeurtenissen plaatsvinden
OpenFileDialog1.FileName = "Select File" - maakt de naam van het bestand in de OpenFileDialog zeggen Select File
OpenFileDialog1.ShowDialog() - geeft de OpenFileDialog
PIC = nieuwe Bitmap(OpenFileDialog1.FileName) - voegt de waarde van de geselecteerde afbeelding aan pic
PictureBox1.BackgroundImage = pic - Hiermee wijzigt u de afbeelding in ImageBox1 aan pic
End Sub
Einde klasse