#excel #vba #webbrowser-control
#превосходить #vba #веб-браузер-контроль
Вопрос:
Я создал форму пользователя и добавил элемент управления webbrowser. Я загружаю PDF-файл в элемент управления webbrowser в форме пользователя. Это работает просто отлично, но когда я снова инициализирую форму пользователя из другой формы пользователя, она содержит старое письменное содержимое. Как очистить содержимое?
Это код, который я использовал
Private Sub UploadImage_Click() Dim xDialog As FileDialog Dim xDocumen As String Set xDialog = Application.FileDialog(msoFileDialogFilePicker) xDialog.Title = "Select Document" xDialog.AllowMultiSelect = False If xDialog.Show = 0 Then Exit Sub xDocumen = xDialog.SelectedItems(1) Me.ImagePath.Caption = xDocumen usfAdd.WebBrowser.Navigate2 "about:blank" usfAdd.WebBrowser.Document.write "lt;HTMLgt;lt;Bodygt;lt;embed src=""" amp; xDocumen amp; """ width=""100%"" height=""100%"" /gt;lt;/Bodygt;lt;/HTMLgt;" End Sub Ответ №1:
Попробуйте добавить .Refresh
If usfAdd.Document Is Nothing Then usfAdd.Navigate2 "about:blank" End If usfAdd.Document.write "lt;HTMLgt;lt;Bodygt;lt;embed src=""" amp; xDocumen amp; """ width=""100%"" height=""100%"" /gt;lt;/Bodygt;lt;/HTMLgt;" usfAdd.Refresh Комментарии:
1. Спасибо, он очищает содержимое, но я не могу перезаписать его новым содержимым и должен перезапустить программу, чтобы использовать ее снова.
2. @mahmoud Разве он не показывает документ после того, как вы нажмете Upload_Image ?
3. да, он продолжает показывать пустую белую страницу.