G
Guest
Hi
Sit here and try to understand and learn VBA access
I have this
Private Sub klormen_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb()
Dim strsql As String
strsql = "SELECT * FROM Kunder WHERE KøbIalt >= 100000"
Set rs = db.OpenRecordset(strsql, dbOpenSnapshot)
Do Until rs.EOF
Debug.Print rs("Firma")
rs.MoveNext
Loop
But how can i see what is in debug.Print ??
Alvin
Sit here and try to understand and learn VBA access
I have this
Private Sub klormen_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb()
Dim strsql As String
strsql = "SELECT * FROM Kunder WHERE KøbIalt >= 100000"
Set rs = db.OpenRecordset(strsql, dbOpenSnapshot)
Do Until rs.EOF
Debug.Print rs("Firma")
rs.MoveNext
Loop
But how can i see what is in debug.Print ??
Alvin