2013-12-23 64 views
0

以下代碼使用Visual Basic 6.0,我希望在vb.net中使用此代碼,並且我認爲在vb.net上鍵入它時出現錯誤(的Visual Studio 2013)在Visual Basic 6中使用Adodb記錄集到VB.net

我的MS Access數據庫的名稱是「mySavings.accdb」

表名是

我已經添加了引用「平衡」與名爲「平衡」字段: Microsoft ActiveX Data Objects 6.0 Library Microsoft ActiveX Data Objects Recordset 6.0 Library 謝謝你在前進,這裏是我的VB6

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 
+0

爲什麼你認爲它有錯誤?如果它不編譯或拋出錯誤,它們是什麼?如果你在VB.NET代碼中有錯誤,你爲什麼要發佈VB6代碼(或者是一個錯字)? – Plutonix

+0

在這裏的錯誤是 金額= RS!平衡 它說,「過載解決方案,因爲沒有可訪問的‘域’接受此數目的參數」 – Brent

回答

3

代碼這是一段時間,因爲我用ADODB,但我認爲這應該工作

Amount = rs.Fields.Item("Balance").Value 
+0

「」類型的未處理的異常出現在BrentWorks.exe 附加信息:無法轉換'ADODB.InternalField'類型的對象來鍵入'System.String'。 – Brent

+0

db中的Balance是什麼類型?也許那些需要匹配? – Jeff

+0

你是什麼意思的類型? 餘額是一種文本數據類型。它如何匹配?語法是什麼?預先感謝您 – Brent