VB6 Runtime Error 13 Type Mismatch - Toolbox for IT Groups

Hello, I am opening a Database using db.opendatabase and then setting it to a recordset by set rs=db.openrecordset("tablename"). When it ... ... Private Sub DcGrid_KeyDown(KeyCode As Integer, Shift As Integer) Dim oldcl As Integer Dim a, a1, b, b1 As Inte

visualbasic.ittoolbox.com