筛选限制记录源

表：包含字段1、单词编号；2、英文单词；3、课程号（每10行单词的课程号用一个，一次排序）

窗体：设计三个文本框，分别源于表的1、单词编号；2、英文单词；3、课程号

按钮：设计个14个课程号单选按钮。

VBA：以单选按钮“课程1”为例。目的：单选“课程1”按钮后，整个窗体的单词记录，只包含表中课程号为1，所对应的十条记录。

Private Sub cmdcourse1_Click()
    Me.RecordSource = "select * from mbaword where mbacoursenumber = 1"

End Sub

运行后，记录源仍然显示全部的。