主题：如何实时更新窗口表

hzb=cmd.ExecuteReader
        If hzb.DataRows.count>0 Then
            Tables("采购合同_fkmx").DataSource =hzb
        Else
            Tables("采购合同_fkmx").DataSource =""
        End If

上面代码的意思是如果从后台查询到数据 就填充窗口表fkmx 如果没有就将fkmx显示为空

但是现在实际情况是没有查询到数据时显示的是上一次的查询结果 fkmx表并不会动态更新

其实我更想实现在表里显示 未查询到任何数据 请问要如何实现？

谢谢BIN