以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助 mouseentercell中可以延时进行吗  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=135039)
--  作者：81538475
--  发布时间：2019/5/15 17:22:00
--  求助 mouseentercell中可以延时进行吗
 mouseentercell  这个里面的代码比如说我进入单元格2秒后才会执行下面代码，如何设置呢
If frm.opened = False Then
            frm.open
        End If
        frm.baseform.left = System.Windows.Forms.Cursor.Current.Position.X + 5
        frm.baseform.Top = System.Windows.Forms.Cursor.Current.Position.Y + 5
        e.Table.Focus

我使用sleep 
和下面的代码都不是很理想，当我快速经过单元格然后离开的时候，过一会就会显示出来。
Dim sdt As Date = Date.Now
While Date.Now < sdt.AddSeconds(2)
    Application.DoEvents
End While

[此贴子已经被作者于2019/5/15 17:28:26编辑过]
--  作者：有点甜
--  发布时间：2019/5/16 10:04:00
--  

建议做一个【计划管理】（定时器），设置2秒后启动。

 

鼠标进入，开启定时器，鼠标离开关闭定时器。

 

定时器事件那里，执行的第一句，把自己关闭。