主题：[求助]drawcell事件必须鼠标经过单元格才触发效果

想实现的功能，当鼠标点击某一行时，用颜色标注出相同卡号和相同还款日的单元格。

代码如下：

Dim bgd As String = Tables("用卡记录").Current("卡号")
Dim dt As Date = Tables("用卡记录").Current("还款日")
If e.Col.Name = "卡号"
    If e.Row("卡号") = bgd And e.Row("还款日") = dt Then
        e.Style = "同一张卡"

    End If
   
End If

但是写完drawcell事件，发现实现的功能和预想的不一样。本来想点击某行后，马上都标注出需要的单元格的颜色。

但是实际效果确实，鼠标必须经过单元格，才能更新该单元格样式。

此主题相关图片如下：honeycam 2020-02-29 00-24-11.gif