Private Sub Form_Load()
Dim d As HTMLDocument, dd As IHTMLDocument2, c As IHTMLTableCell
Set d = New HTMLDocument
Set dd = d.createDocumentFromUrl("file.htm", "null")
End Sub
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4