我编写了一个宏,它启动一个对话框,用户从组合框中选择一个值。不幸的是,对话框显示,我得到一个 1 到 20 秒的沙漏。
我发现了一些似乎有帮助的解决方法:
- 快速的 CTRL-Alt-Del 后跟 Escape。
- 单击任务栏中的旋转宏动画。
- 从任务栏最小化然后最大化对话框。
然而,这变得非常痛苦,有谁知道是怎么回事,以及如何防止上吊?
我用来启动对话框的代码是
Dim winptr As New WinWrapper()
frm.ShowDialog(winptr)
和
'' This class is used to set the proper parent to any UI that you may display from within a macro.
Public Class WinWrapper
Implements System.Windows.Forms.IWin32Window
Overridable ReadOnly Property Handle() As System.IntPtr Implements System.Windows.Forms.IWin32Window.Handle
Get
Dim iptr As New System.IntPtr(DTE.MainWindow.HWnd)
Return iptr
End Get
End Property
End Class