25-09-20, 09:12 PM
السلام عليكم
لقد قمت بادارج اداة AxAcroPDF
وعند اختيار الملف لا يقوم بعرضة على الاداة ممكن حل للمشكلة
وعند اختيار الملف لا يقوم بعرضة على الاداة ممكن حل للمشكلة
استخدام هذا الكود
Dim OFD As OpenFileDialog = New OpenFileDialog()
Dim dlgRes As DialogResult = OFD.ShowDialog()
If (Not dlgRes = DialogResult.Cancel) Then
TextBox8.Text = OFD.FileName
AxAcroPDF1.LoadFile(OFD.FileName)
End If
واستخدمت هذا الكود ونفس الحال لم يعرض على الاداة الملف
TextBox8.Text = OFD.FileName
AxAcroPDF1.src = TextBox8.Text