Visual Basic Picture Box Example

Q. Create an application with 2 small picture boxes and one larger picture box. Each of the small picture box has a radio button. When a radio button is selected the corresponding image for that picture box gets placed in the large picture box and a Level is generated with the caption of the selected picture just below the large picture box.

Answer submitted by a student

Private Sub Form_Load()
Me.File1.Path = "C:\Image"

Me.File1.Selected(0) = True

Me.P_1.Picture = LoadPicture(Me.File1.Path + "\" + Me.File1.FileName)

Me.File1.Selected(1) = True

Me.P_2.Picture = LoadPicture(Me.File1.Path + "\" + Me.File1.FileName)

End Sub

Private Sub Option1_Click()
Me.P_zoom.Picture = Me.P_1.Picture

End Sub

Private Sub Option2_Click()
Me.P_zoom.Picture = Me.P_2.Picture

End Sub