vb6 - 在 Visual Basic 6 中处理空记录集

Question

如果以下语句没有返回任何内容，即一条不存在的记录，我该如何处理？

Form1.data1.RecordSource = "SELECT * " _
                         & "FROM Table " _
                         & "WHERE Column1 = " & txtSomeTextField.Text & ""
Form1.data1.Refresh

编辑: 我得到的错误是: 运行时错误“3021”: 暂无记录

Answer 1

检查记录集的 EOF 和 BOF ...

If Not rs.EOF And Not rs.BOF Then
   ' You have results
End If