我有一个自定义控件的库。现在有一个看起来像面板的控件,当它打开时,我想为它的垂直增长设置动画,如下所示:
For h As Single = 0 To finalHeight Step 0.5
Me.Height = CInt(h)
' HERE I WANT TO CALL DoEvents'
Next
Me.Height = finalHeight
如果我不在循环中调用 DoEvents 则不会显示动画,我只会得到最终高度而没有沿途的视觉反馈。
我可以从我的主 WinForm 项目中调用 DoEvents,但不能在库中调用。
我怎样才能做到这一点,而不淹没在深水里?