Private Sub ListBoxItems_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBoxItems.SelectedIndexChanged Dim sFilePath As String = SetupSheetPartPath.TrimEnd("\") & "\" & SelectedPartNo & "\" & SelectedOperation & "\" & Me.ListBoxItems.SelectedItem & ".pdf" Me.AxAcroPDF1.LoadFile(sfilepath) Me.AxAcroPDF1.gotoFirstPage() Me.AxAcroPDF1.setShowToolbar(False) End Sub
Private Sub ListBoxItems_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBoxItems.DoubleClick 'Me.BtnViewSelectedItem.PerformClick() MsgBox("Double click") End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)