FrontPage VBA教程:ondragstart属性

返回或设置 Variant 类型的值,该值表示与 ondragstart事件相关联的值。例如,Variant 可以代表当事件发生时执行的的某个宏或过程调用。可读写。

expression.ondragstart

expression  必选。返回DispFPHTMLDocument对象的表达式。

VBA示例

在以下示例中,当用户在当前网页中从包含有 ondragstart="DisplayMessage"属性的当前 <p> 元素中拖动选择时,将向用户显示一条信息。此示例内嵌在 HTML 文档的 <head> 节中。


<head>
<title>ondragstart Example</title>
<script id=clientEventHandlersVBS language=vbscript>
<!--
Sub DisplayMessage
'Displays message to user
    MsgBox "This message is displayed when the user drags a selection within the <p> element in the current document."
End Sub
-->
</script>
</head>

以下 <p> 节代码调用位于文档的 <head> 节中的 DisplayMessage 过程;当用户从文档的 <p> 元素中拖动选择时,将显示一条消息。

<body>
<p ondragstart = "DisplayMessage">Select this text and drag it to view a message.</p>
</body>

以下代码行将 ondragstart属性设置为 DisplayMessage 过程调用。索引值零 (0) 表示 <p> 标志是当前网页中唯一的 <p> 元素,也是 all集合中的第一个 <p> 元素。

ActiveDocument.body.all.tags("p").item(0).ondragstart = "Display Message"

上页:FrontPage VBA教程:ondblclick属性 下页:FrontPage VBA教程:onhelp属性

FrontPage VBA教程:ondragstart属性

FrontPage VBA教程:onhelp属性 FrontPage VBA教程:onkeydown属性
FrontPage VBA教程:onkeypress属性 FrontPage VBA教程:onkeyup属性
FrontPage VBA教程:onmousedown属性 FrontPage VBA教程:onmousemove属性
FrontPage VBA教程:onmouseout属性 FrontPage VBA教程:onmouseover属性
FrontPage VBA教程:onmouseup属性 FrontPage VBA教程:onreadystatechange属性
FrontPage VBA教程:onselectstart属性 FrontPage VBA教程:OperatingSystem属性
FrontPage VBA教程:OrganizationName属性 FrontPage VBA教程:pageContentElement属性
FrontPage VBA教程:PageWindows属性 FrontPage VBA教程:Parent属性
FrontPage VBA教程:parentWindow属性 FrontPage VBA教程:Prev属性
FrontPage VBA教程:PreviewDocument属性 FrontPage VBA教程:ProductCode属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号