MS Access - 列表框中的值仍然存在但不可见

Question

我有一个列表框和一个文本框，如下图所示：

iskanje dijaka 表示搜索学生。基本上它根据文本框中输入的内容缩小了学生的范围。我用VBA实现了这个目标：

    Private Sub srchDijaki_Change()
        Me.[sezDijaki].RowSource = "SELECT [priimek], [ime], [Id_d] FROM Dijak " _
        & "WHERE [priimek] Like """ & Me.srchDijaki.Text & "*" & """ ORDER BY [priimek]"
    End Sub

快速翻译，如果它使代码更容易阅读：

  

Dijak - 学生，Priimek - 姓，Ime - 姓名

现在实现了这个代码，每次我在文本框中键入内容时，我都会看到列表框缩小，但它完全空白。滚轮变得越来越小，我仍然可以点击多个列表项，我只是看不到它们。我甚至可以右键单击它们，复制，粘贴到某个地方，然后看到正确的值。就像文本颜色与背景颜色相同，但事实并非如此。

我不知道是什么原因引起的。感谢任何帮助，谢谢！