请问这个VB6.0的代码怎么转换成VB.NET代码？谢谢！

VB6和vb.net的数据库操作有很大不同，不能简单的语句对语句转换，建议你深入了解vb.net的数据库操作，再做移植

创新互联公司专注为客户提供全方位的互联网综合服务，包含不限于成都网站制作、网站设计、外贸网站建设、盖州网络推广、成都小程序开发、盖州网络营销、盖州企业策划、盖州品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；创新互联公司为所有大学生创业者提供盖州建站搭建服务，24小时服务热线：13518219792，官方网址：www.cdcxhl.com

vb6代码和vs2008里的vb有什么不同 语法通用吗？

VS2008中的叫做VB.NET,运行在NET平台上，对VB6的语法改变了一些，功能也比较强大了，与.NET平台的其他语言开发工具容易接合，控件样式等也有所改进。

VB6是VS98时代的开发工具，当然比VB.NET轻量些，容易上手些，其面向对象程序设计的思想和实现上没有VB.NET体现得充分。

请教!VB6.0代码翻译为vb.net代码，谢谢

引用 Microsoft DAO 3.6 Object Library

Public Function DaoOpenDB(ByVal pDbType As String, ByVal pDbName As String, ByVal pMdbCnct As String) As Integer

On Error GoTo Err_Handler

Dim m_DbDataBase As DAO.Database

Dim gwsMainworkSpace As DAO.Workspace

Dim DAODBEngine As New DAO.DBEngine()

Dim m_DbWkSpace = DAODBEngine.CreateWorkspace("", " Admin ", "")

If pDbType = "c_ACCESS" Then

'Access

m_DbDataBase = m_DbWkSpace.OpenDatabase(pDbName)

Else

'Oracle

m_DbDataBase = m_DbWkSpace.OpenDatabase(pDbName, True, False, pMdbCnct)

End If

DaoOpenDB = c_OK '你在全局中已定义

Exit Function

Err_Handler:

DaoOpenDB = c_NG '你在全局中已定义

MsgBox(Err.Description, MsgBoxStyle.OkOnly + MsgBoxStyle.Critical, "Err")

End Function

VB6代码转换VB.NET

Dim i As Integer,wd As Integer,hd As Integer

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

VB.net编写的dll，供vb6调用时dll中的函数不可见？

在您的代码中，您已经成功使用了RegAsm命令将DLL注册为COM组件，并在VB6中成功引用了该组件的类型库文件（TLB文件）。此外，您还在VB6代码中声明了一个YCImageDo类型的对象，并成功创建了该对象。

但是，当您尝试使用YCImageDo对象的属性和方法时，却发现这些成员不可见。这可能是因为在编写DLL代码时您没有正确地声明这些成员的可见性。

在VB.NET中，您可以使用"Public"关键字来声明一个类型的成员（属性、方法、过程等）对外可见，而使用"Private"关键字则声明该成员仅在类型内可见。如果您希望YCImageDo类型的成员在VB6代码中可见，则应将这些成员声明为Public类型。

例如，如果您希望YCImageDo类型拥有一个名为"GetImage"的方法，则可以在DLL代码中按如下方式声明该方法：

Public Function GetImage() As String

' 在这里编写方法的代码

End Function

同样，如果您希望YCImageDo类型拥有一个名为"ImagePath"的属性，则可以在DLL代码中按如下方式声明该属性：

Public Property ImagePath As String

vb6文件可以转成vb.net的吗？怎么转

能不能转换 主要取决于vb6的源程序是不是使用了第三方控件 如果用了 那这些全部都不能转！~

如果vb6里面有控件数组vb.net会自动生成出一套东西（vb.net里面已经没有控件数组）模拟控件数组

如果vb6的程序很简单的话，转成.net之后应该改的地方不大！~

绝对你应该先弄清楚以前vb6的程序具体用了什么 然后去微软查一下vb6升级到vb.net最大的区别！~

我们做过好几个升级的程序 有的不用改 有的简单修改 有的基本重写！~

分享名称：vb6代码net vb6代码转vs2010
标题链接：http://pwwzsj.com/article/doojcio.html