Dim i As Integer,wd As Integer,hd As Integer
目前创新互联公司已为近1000家的企业提供了网站建设、域名、雅安服务器托管、网站托管、服务器托管、企业网站设计、大峪网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
Dim Obj As HtmlDocument=WebBrowser1.Document.GetElementsByTagName("iframe")(2).Document
For i=0 To Obj.Images.Count-1
wd=Obj.Images(i).OffsetRectangle.Width
hd=Obj.Images(i).OffsetRectangle.Height
If wd=800 Or wd=790 Then
Call tupxiazai(Obj.Images(i).GetAttribute("SRC"),Application.StartupPath "\image\" i "pic.jpg")
End If
Next
以有简单的 吧编译好的 vb6或者其他的vb的文件用vb.net打开 有个升级向导 一步一步很简单转换时exe只能换成exe dll只能换成dll 以前的属性不能修改就能升级成.net框架下的vb最新的vb.net编辑了。
你这个是OCX或DLL外部引用,在VB和VB.NET中是不一样的,一般不能通用。VB6升级到VB.NET,不是那么简单的,并不是语句的简单转换,有可能基本结构都要大变。
Marsharl As UnmanagedType.Any As Object
VB6.0中的As Any,在VB.NET里用Object代替,前面加上Marsharl As XXX属性,有提示的,自己看吧
VB6和vb.net的数据库操作有很大不同,不能简单的语句对语句转换,建议你深入了解vb.net的数据库操作,再做移植