Private Sub Command2_Click()
Text5.Text = CommonDialog1.FileName
Picture1.Picture = LoadPicture(Text5.Text)
Text5.Visible = True
End Sub

You want to display an entire PDF file in a picture box ?

yup. I want to show it on the picture box. how do sir?

why can not after I try? I know you sir are the steps?