如何解决通过模态WinFormVSTO将线程回输到Office
我的行为难以重现，但始终会通过几个用户（通常是相同的用户，但并非总是如此）回击：在VSTO加载项（此处为Excel）上，使用{{1 }}，依次Excel.Shape，然后.Duplicate，然后.Copy，然后在DifferentSpreadsheet.Paste或Exception处抛出.Copy。 / p>
我尝试过的事情
我在这里分享我的经验，不仅是为了演示该主题，还包括在有人遇到类似问题的情况下。我被困了几个月，很乐意拯救任何经历同样的事情。
第一个解决方法是在.Paste和Threading.Thread.Sleep(TimeSpan>0)之间插入.Copy。我认为这是由于.Paste的 70％而解决的，由于剪贴板的比赛条件。
第二种解决方法是要求所有用户关闭Office剪贴板。该工具是微软几十年前开发的，取得了相当有限的成功。但他们最近似乎试图通过为所有Office 365用户静默激活它来促使用户使用它。陷阱是，即使关闭“ Office剪贴板”面板，它也会继续收集并似乎锁定对新创建的对象的访问，直到Office（此处为Excel）将UI线程放回。这解决了Exceptions的 25％。
但是我们仍然有 5％情况，我们不知道发生了什么。这5％可能是来自一家公司的少数用户，该公司的其他数十名用户没有任何问题，并且所有计算机的配置方式均类似。但是它也可能是偶尔出现过一次随机问题的用户，以前从未遇到过该问题，并且在再次尝试后再也无法获得它。
在怀疑Office剪贴板发生的事情是Office需要取回其UI线程以便可以释放对象之后，我开始使代码异步，目的是在Exceptions之前await Task.Delay(TimeSpan)并且在.Copy之前。烦人的部分是，这涉及到重新键入代码负载，使整个堆栈从Click事件到复制/粘贴一系列.Paste返回Async Function或Task，等等;而我所需要的只是在一个或两个特定位置放回线程。换句话说，这影响了巨大的对象块，一直扩展到整个堆栈，并且不可避免地会影响维护。
当前解决方案
因此，我实现了一个通过Tasks(Of T)调用的WinForm。该WinForm具有一个.ShowDialog，该Windows.Forms.Timer在所需的持续时间之后。勾选时，将Ticks d WinForm。
它就像魔术一样工作，即使激活了Office剪贴板，我们现在也有0％的错误。但是，对我来说，这看起来像是骇客/气味，我想实现一些更简洁的方法。
除了等待.Close之外，还有其他选择吗？
为了自己寻找替代方案，有人可以帮助我了解Task.Delay背景下发生的情况吗？我高度怀疑那里有一些异步，但是我很困惑地了解.Net如何在等待模态形式的响应时知道在哪里继续。
源代码和用法示例
.ShowDialog解决方法
我不确定它是否会对您有所帮助，但我将向您展示如何在自己的自动化代码中进行抽水等待。这需要有一个活动的Dispatcher，因为它依靠Dispatcher.PushFrame来抽取消息，直到准备继续。
Function WaitForEvent(ByVal eventHandle as EventWaitHandle,Optional ByVal timeout As Integer = Timeout.Infinite) As Boolean
Dim isEventSignaled As Boolean = False
Dim frame = New DispatcherFrame()
Dim t = New Thread(Sub()
isEventSignaled = eventHandle.WaitOne(timeout)
frame.Continue = False
End Sub)
t.Start()
Dispatcher.PushFrame(frame)
Return isEventSignaled
End Function
您可能只需要进行固定的等待（例如在Task.Delay上进行Async Sub），而不是寻找要发出信号的事件；就我而言，我有一个.NET事件处理程序（用于COM事件），它将Windows事件翻转为已发出信号。
（对上一个段落中哪个“事件”感到困惑的歉意，这里讨论了三种不同的“事件”！）
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。