用VB解释是什么意思，这个是怎么运行的

答案:2 悬赏:50 手机版

解决时间 2021-07-17 06:30

提问者网友：练爱
2021-07-16 05:37

<html><head><title>我的留言版</title></head>
<script language="vbscript">
Sub datacheck()
IF document.reg.name.value=""THEN
msgbox"'姓名'不得为空"
Exit Sub
END IF
IF document.reg.email.value=""THEN
msgbox"'电子邮件'不得为空"
Exit Sub
ELSE IF instr(document.reg.email.value,"@")=0 THEN
msgbox"'电子邮件必须包含'@'"
Exit Sub
END IF

IF doucment.reg.memo.value=""THEN
msgbox"留言内容不得为空"
Exit Sub
END IF
doucment.reg.submit
END Sub
</script>

最佳答案

五星知识达人网友：春色三分
2021-07-16 06:26

<html><head><title>我的留言版</title></head>
<script language="vbscript">
Sub datacheck()
IF document.reg.name.value=""THEN 判断reg项目的姓名是否为空，
msgbox"'姓名'不得为空" 如果为空的话，就弹出消息对话框“姓名不是为空”
Exit Sub 结束这个函数
END IF 结束if判断语句块
IF document.reg.email.value=""THEN 判断reg的邮箱不能为空
msgbox"'电子邮件'不得为空" 如果为空，弹出消息对话框内容是"电子邮件不得为空"
Exit Sub
ELSE IF instr(document.reg.email.value,"@")=0 THEN
msgbox"'电子邮件必须包含'@'"
Exit Sub
END IF

IF doucment.reg.memo.value=""THEN
msgbox"留言内容不得为空"
Exit Sub
END IF
doucment.reg.submit
END Sub
</script>

其实上面这些代码都是判断语句来的。也顺便结合了msgbox（消息对话框）的使用，以作提示用户那里操作出错了。

我也做了一个例子让楼主能够充分理解判断语句和msgbox(消息对话框)结合的使用

全部回答

1楼网友：等灯
2021-07-16 06:46

存在函数datacheck 。应该是提交事件时（比如按钮）使用的。依次检查页面的reg项目的name和email、memo子项目的值。 1）name/email不能为空，否则提示消息框并退出。 2）email中间必须有@，否则提示消息框并退出。 3）memo不能为空，否则提示消息框并退出。 4）如果以上检查都能通过，则submit 以上

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！