从 visio 检测 IE 上的事件

Question

我可以在 IE 页面上的按钮和 visio 事件之间建立链接吗？ （例如：只需单击 IE 页面上的按钮即可更改形状的颜色）

Answer 1

除非您也可以访问 IE 中的 HTML 内容，否则这并不容易，但是您可以使用 VBA 类，该类实现“withevents”私有变量来捕获对页面上特定元素的引用，并且该类具有事件处理程序响应基于浏览器的事件。例如。在“clsHTML”类中：

Private WithEvents el As MSHTML.HTMLInputElement

Public Sub SetElement(t As MSHTML.HTMLInputElement)
    Set el = t
End Sub

Private Function el_onchange() As Boolean
    Debug.Print "captured change: value = " & el.Value
End Function 

在其他代码中，创建该类的一个实例，并使用对 IE 中页面上元素的引用来调用“SetElement”：

Dim objHTML As clsHTML  'global variable


Sub TestEvents()
   Dim IE As Object

    'set up your IE reference....

  Set objHTML = New clsHTML
  objHTML.SetElement IE.document.getElementById("tester2")
  Debug.Print "set capture"
End Sub

在此实例中，您将捕获文本框上的“change”事件，但其他元素会暴露不同的事件......

编辑：我在 Excel 中测试了这一点，但我假设类似的东西也适用于 Visio。

Edit2：在 Visio 中创建一个表单来处理这个问题可能比坚持使用自动化 IE 更好。

Answer 2

是的，你应该检查 jquery html 的入门文档

：

<button id="mybutton" />
<div id="myshape">blabla</div>

javascript ：

$('#mybutton').click(function() {
    $('#myshape').css('background-color', '#555555');
});