| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 738 人关注过本帖
标题:VB脚本的问题
只看楼主 加入收藏
mextb1860
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2005-7-10
收藏
 问题点数:0 回复次数:4 
VB脚本的问题

<script language="VBScript">
sub check()
if frm1.user.value=empty then
msgbox "请输入您的留言昵称!"
focusto(0) <==============================这里是什么意思?
exit sub
end if
if frm1.email.value=empty then
msgbox "请输入您的电子邮件地址!"
focusto(1) <==============================这里是什么意思?
exit sub
end if
if instr(frm1.email.value, "@")=0 then
msgbox "请正确填写您的电子邮件地址!"
focusto(1) <==============================这里是什么意思?
exit sub
end if
if frm1.content.value=empty then
msgbox "请输入您的留言内容!"
focusto(2) <==============================这里是什么意思?
exit sub
end if
frm1.submit
end sub
sub focusto(x) <==============================这里是什么意思?
document.frm1.elements(x).focus() <==============================这里是什么意思?
end sub
</script>

谁可以帮我解释一下上面不懂的地方是什么意思吗

还有就是focusto(2) 这里面的数字是什么意思

搜索更多相关主题的帖子: 脚本 
2006-02-27 21:38
阳光白雪
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:39
帖 子:2220
专家分:0
注 册:2005-11-18
收藏
得分:0 
sub focusto(x) <==============================这里是什么意思?
document.frm1.elements(x).focus() <==============================这里是什么意思?
end sub
定义一个函数,focusto是函数名,X是参数
document.frm1.elements(x).focus()是让表单frm1的第X个元素获取焦点

focusto(0) 调用定义的 focusto函数

专注于WEB前端交互平台开发:[url=http://blog./]blog.[/url](富客户端技术(RIA)交流平台)
2006-02-27 21:52
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
sub focusto(x)纠正2楼错误这里明显是定义过程名,sub定义过程关键字,Function才是定义函数的关键字。
楼主的代码是VB脚本的输入有效性验证,focusto(2) 这里面的2是标单里元素的序号,标单里一个文本框或者一个下拉列表等都是标单里的元素。没个元素根据网页上的排列顺序,有自己的一个序号。
2006-02-27 23:20
mextb1860
Rank: 1
等 级:新手上路
帖 子:179
专家分:0
注 册:2005-7-10
收藏
得分:0 
没有错的。。我的代码执行很正确
2006-02-28 00:23
water123456
Rank: 5Rank: 5
等 级:贵宾
威 望:15
帖 子:3208
专家分:5
注 册:2006-2-21
收藏
得分:0 
我感觉3 楼上的兄弟说的是对的,可是那个元素怎么样在网页中实现呢?一般情况我们都用它的NAME来访问,可是一下子改成了什么1.2...等等,我们一下子,不好接受,可以不右以直接给个简单的例子,让我们自己运行一下,谢谢

让我们风风火火的过一生,别平平淡淡过一年。
2006-02-28 08:07
快速回复:VB脚本的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022587 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved