Question

我有一个有图像的HTA应用程序。单击此图像时，调用sub。当点击“Enter”键时，会调用另一个子。

这里的问题是当一个Enter键被命中时，两个子被调用。

请参阅以下代码，例如......

<head>

<HTA:APPLICATION>



</head>


<script language="VBScript">

Sub EnterKey

    If window.event.Keycode = 13 then
        MsgBox "Enter was pressed"
    End If

    If window.event.Keycode = 27 then
        MsgBox "Escape was pressed"
    End If

End Sub

Sub DeleteThis
    MsgBox "Image was clicked"
End Sub

</script>

<body onkeypress="EnterKey">

<input type="image" height="27" width="27" onclick="DeleteThis" src="Search.png" alt="Database Search">

</body>

当点击“输入”键时，“图像被点击”＆amp;显示“已按下Enter”。单击“Enter”时，我不希望显示“Image was clicked”消息。

任何建议？

Answer 1

您可以删除onclick="DeleteThis"以阻止该函数被调用。

或者您必须在函数DeleteThis中实现一个条件，以防止在按下的键是输入键时输出。

Sub DeleteThis
    If window.event.Keycode != 13 then
        MsgBox "Image was clicked"
    End If
End Sub

Answer 2

好的我想通了，我更改了图片链接的下面代码

<input type="image" height="27" width="27" onclick="DeleteThis" src="Search.png" alt="Database Search">

到

<img src="search.png" alt="Database Search" width="27" height="27" onclick="DeleteThis">

显然这取决于使用的标签...

HTA / HTML中的图像链接

2 个答案: