Ado Error

[GlenW]

Anybody got any idea why this causes VB to perform an illegal operation and crash?

rsRes.Open "SELECT DISTINCT (ASampleName, BSampleName )" & _
            "FROM tblTests " & _
            "WHERE TestName = " & Chr(34) & _
            frmMain.cboTest.Text & Chr(34) & _
            " AND Archived = false", _
            cnnCon, _
            adOpenKeyset, _
            adLockReadOnly, _
            adCmdText