Private Sub FileListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileListBox1.SelectedIndexChanged
Me.PictureBox1.Image = Image.FromFile(Me.FileListBox1.Path & "\" & Me.FileListBox1.SelectedItem.ToString)
End Sub
Private Sub FileListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileListBox1.SelectedIndexChanged
Me.PictureBox1.Image = Image.FromFile(Me.FileListBox1.Path & "\" & Me.FileListBox1.Items(Me.FileListBox1.SelectedIndex).ToString)
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.FileListBox1.Path = "D:\My Documents\My Pictures"
End Sub
Private Sub FileListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileListBox1.SelectedIndexChanged
Me.PictureBox1.Image = Image.FromFile(Me.FileListBox1.Path & "\" & Me.FileListBox1.Items(Me.FileListBox1.SelectedIndex).ToString)
End Sub
End Class