在VB.net中使用visualbasic6中的Adodb记录集
下面的这些代码使用的是visual basic 6.0，我希望在vb.net中使用这些代码，我认为在vb.net（visual Studio 2013）上键入这些代码时会出现错误 我的MS access数据库的名称是“mySavings.accdb” 表名为“Balance”，字段名为“Balance” 我已经添加了参考： Microsoft ActiveX数据对象6.0库 Microsoft ActiveX数据对象记录集6.0库 提前谢谢，这是我在VB6中的代码在VB.net中使用visualbasic6中的Adodb记录集,vb.net,visual-studio,vb6,ado.net,Vb.net,Visual Studio,Vb6,Ado.net,下面的这些代码使用的是visual basic 6.0，我希望在vb.net中使用这些代码，我认为在vb.net（visual Studio 2013）上键入这些代码时会出现错误 我的MS access数据库的名称是“mySavings.accdb” 表名为“Balance”，字段名为“Balance” 我已经添加了参考： Microsoft ActiveX数据对象6.0库 Microsoft ActiveX数据对象记录集6.0库 提前谢谢，这是我在VB6中的代码 Public con As N
Public con As New ADODB.Connection
Public rs As New ADODB.Recordset
Dim Amount as String
Private Sub Form_Load()
con.Open ("Provider=Microsoft.ACE.OLEDB.12.0; Data Source = C:\Users\MyPc\Documents\Visual Studio 2013\Projects\mySavings.accdb")
rs.Open ("Select * from Savings"), con, 3, 2
Amount = rs!Balance
msgbox("You're current balance is " & Amount)
End Sub
我已经有一段时间没有使用ADODB了，但我认为这应该是可行的
Amount = rs.Fields.Item("Balance").Value
我已经有一段时间没有使用ADODB了，但我认为这应该是可行的
Amount = rs.Fields.Item("Balance").Value
我已经有一段时间没有使用ADODB了，但我认为这应该是可行的
Amount = rs.Fields.Item("Balance").Value
我已经有一段时间没有使用ADODB了，但我认为这应该是可行的
Amount = rs.Fields.Item("Balance").Value
是那辆卡车！平衡一段不正确的代码。 另一种方法是：
Dim Amount As Decimal = rs.Fields("Balance").Value
是那辆卡车！平衡一段不正确的代码。 另一种方法是：
Dim Amount As Decimal = rs.Fields("Balance").Value
是那辆卡车！平衡一段不正确的代码。 另一种方法是：
Dim Amount As Decimal = rs.Fields("Balance").Value
是那辆卡车！平衡一段不正确的代码。 另一种方法是：
Dim Amount As Decimal = rs.Fields("Balance").Value
为什么你认为它有错误？如果它不编译或抛出错误，它们是什么？如果您在VB.NET代码中有错误，为什么要发布VB6代码（或者这是打字错误）？这里的错误是金额=卢比！Balance it说“重载解析，因为没有可访问的‘字段’接受这个数量的参数”，为什么您认为它有错误？如果它不编译或抛出错误，它们是什么？如果您在VB.NET代码中有错误，为什么要发布VB6代码（或者这是打字错误）？这里的错误是金额=卢比！Balance it说“重载解析，因为没有可访问的‘字段’接受这个数量的参数”，为什么您认为它有错误？如果它不编译或抛出错误，它们是什么？如果您在VB.NET代码中有错误，为什么要发布VB6代码（或者这是打字错误）？这里的错误是金额=卢比！Balance it说“重载解析，因为没有可访问的‘字段’接受这个数量的参数”，为什么您认为它有错误？如果它不编译或抛出错误，它们是什么？如果您在VB.NET代码中有错误，为什么要发布VB6代码（或者这是打字错误）？这里的错误是金额=卢比！Balance it表示“重载解析，因为没有可访问的“字段”接受此数量的参数”BrentWorks.exe中发生“System.InvalidCastException”类型的未处理异常其他信息：无法将“ADODB.InternalField”类型的对象强制转换为“System.String”类型。db中的
BalanceBalanceBalanceBalance