循环通过表列

时间:2013-10-21 13:32:02

标签: vba loops access-vba

Access VBA新手,需要一些帮助。我有一个带有布尔字段的表,我试图遍历以找到所有“False”字段。找到后,我想显示一个包含ID号和一些基本信息的消息框。我的表位于SQL数据库中。谢谢你的帮助!

1 个答案:

答案 0 :(得分:0)

您可以使用GetString。这是一个例子

Public Sub MsgBoxActives()

    Dim rs As ADODB.Recordset
    Dim cn As ADODB.Connection

    Set cn = CurrentProject.Connection
    Set rs = cn.Execute("SELECT CUSTOMERID, DISCOUNT FROM [Volume Rebate Customers] WHERE not [INACTIVE?];")

    MsgBox rs.GetString

End Sub