设为首页
加入收藏
联系我们
您当前的位置:资源网365 -> 文章中心 -> 网页制做 -> 网页特效 -> 文章内容 退出登录 用户管理
栏目导航
· 状态栏特效 · 网页配色
· 网页特效 · 鼠标特效
· 按钮特效

热门文章
· 春节对联-有横批的对...
· qq空间最新导航代码...
· 猪年对联( 2007猪年...
· 2007春节搞笑祝福语...
· 政治学习心得体会
· 鼠年春联集锦
· 党员学习心得范文
· [推荐] 知名论坛列表
· 我国五十六个民族名...
· 2008年鼠年春节对联...

相关文章
· VBScript教程 第七课...
· VBScript教程 第八课...
· VBScript教程 第九课...
· VBScript教程 第十课...
· VBScript教程 第十一...
· VBScript教程 第十三...
· VBScript教程 第十四...
VBScript教程 第十二课
作者:zyw365  来源:www.zyw365.com  发布时间:2007-2-8 13:47:24  发布人:资源网365

减小字体 增大字体

VBScript教程 第十二课
一个简单页面

使用 Microsoft? Internet Explorer 可以查看用以下 HTML 代码制作的页面。如果单击页面上的按钮,可看到 VBScript 的运行结果。

<HTML>
<HEAD><TITLE>一个简单首页</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Button1_OnClick
MsgBox "Mirabile visu."
End Sub
-->
</SCRIPT>
</HEAD>
<BODY>
<H3>一个简单首页</H3><HR>
<FORM><INPUT NAME="Button1" TYPE="BUTTON" VALUE="单击此处"></FORM>
</BODY>
</HTML>

结果虽然有点简单:一个对话框显示一个拉丁短语(意为“看起来非常漂亮”)。然而这段代码实际上作了许多事情。

当 Internet Explorer 读取页面时,找到 <SCRIPT> 标记,识别出 VBScript 代码并保存代码。单击按钮时,Internet Explorer 使按钮与代码连接,并运行该过程。

<SCRIPT> 标记中的 Sub 过程是一个事件过程。过程名包含两部分:一部分为按钮名,即 Button1(从 <INPUT> 标记中的 NAME 属性获取),另一部分为事件名,即 OnClick。两部分由下划线 (_) 连接。单击按钮时,Internet Explorer 查找并运行相应的事件过程,即 Button1_OnClick。

Internet Explorer 在 Internet Explorer Scripting Object Model 文档中定义了可用于窗体控件的事件。

页面也可以使用控件与过程的组合。VBScript 与窗体显示了控件之间的一些简单交互作用。

向事件附加代码的其他方法

上述的方法也许是最简单和最常用的,但也可以使用另外两种方法向事件附加 VBScript 代码。一种方法是在定义控件的标记中添加较短的内部代码。例如在单击按钮时,下面的 <INPUT> 标记执行与前面示例相同的操作:

<INPUT NAME="Button1" TYPE="BUTTON"
VALUE="单击此处" OnClick='MsgBox "Mirabile visu."'>

请注意函数调用包含在单引号中,MsgBox 函数的字符串包含在双引号中。只要用冒号 (:) 分隔语句,就可以使用多条语句。

另一种方法是在 <SCRIPT> 标记中指定特定的控件和事件:

<SCRIPT LANGUAGE="VBScript" EVENT="OnClick" FOR="Button1">
<!--
MsgBox "Mirabile visu."
-->
</SCRIPT>

由于 <SCRIPT> 标记指定了事件和控件,所以不需要再用 Sub 和 End Sub 语句。

[] [返回上一页] [打 印] [收 藏]
上一篇文章:VBScript教程 第十三课
下一篇文章:VBScript教程 第十一课
∷相关文章评论∷    (评论内容只代表网友观点,与本站立场无关!) [更多评论...]
关于本站 - 网站帮助 - 广告合作 - 下载声明 - 友情连接 - 网站地图 - 意见留言
Copyright © 2006-2008 zyw365.com. All Rights Reserved .
站长QQ:416044505 站长:王耀加
有事点这里可以联系我! 站长QQ群:42160413
请把本站网址介绍给你10个好友,谢谢!( 资源网365 http://www.zyw365.com/ ) 蜀ICP备06018926