Vb6 在vb web浏览器中禁用图像

我正在使用vb6中的webbrowser控件，但我想禁用webbrowser中的图像，而无需进入IE中的设置。如果有人能帮助我，我将不胜感激，谢谢

If checkbox1.value=1 then
'load images
else
'don't load images
End if

像这样

这个对我很有用

Private Sub webbrowser1_ProgressChange(ByVal Progress As Long, ByVal ProgressMax As Long)
    On Error Resume Next
      if checkbox1.value=1 then
           webbrowser1.Document.body.innerHTML = Replace(webbrowser1.Document.body.innerHTML, "<img", "<div ")
        Exit Sub
    End if
    End Sub

Private Sub-webbrowser1\u ProgressChange（ByVal progressas Long，ByVal ProgressMax As Long）
出错时继续下一步
如果复选框1.value=1，则
webbrowser1.Document.body.innerHTML=替换（webbrowser1.Document.body.innerHTML，“好代码
Tnx股份有限公司

webbrowser1.Document.body.innerHTML=替换（web1.Document.body.innerHTML，“png”和“”）
webbrowser1.Document.body.innerHTML=Replace（web1.Document.body.innerHTML，“jpg”，“”）
webbrowser1.Document.body.innerHTML=Replace（web1.Document.body.innerHTML，“gif”，“”）