如何才能够用MSTHML解析Internet Transfer控件OpenURL取得的HTML源代码
Option Explicit
Dim HTMLDoc As HTMLDocument
Dim htmlCode As String
Private Sub Form_Load()
htmlCode = Inet1.OpenURL("http://www.google.com")
'下面这样显然是不行的,但是,怎样才能让HTMLDoc的内容为htmlcode呢?
Set HTMLDoc.All = htmlCode
End Sub