Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick
Dim ofd As New OpenFileDialog
ofd.Filter = "PDF| *.pdf"
ofd.FileName = "z:\process\documents\" & DataGridView1.CurrentRow.Cells(1).Value
Me.AxAcroPDF1.LoadFile(ofd.FileName)
End Sub
No comments:
Post a Comment