正在加载图片...
【例5-2】将例5-1中的行If语句改为使用块If语句。 <HTML <HEAD>< TITLE>简单验证</ TITLE></HEAD> <BODY><H3>简单验证</H3><HR> 请输入数值数据 Input name= Text1 TYPE=TEXT SIZE=10><P> 〈 INPUT TYPE=" Button"NAME=" Button" VALUE="确认"> KSCRIPT FOR="But tonl EVENT="onClick LANGUAGE=VBScript X= TextI value If Not IsNumeric (x) Then MsgBox"您输入的不是数值数据” El MsgBox"您输入的数据是:"&x End if K/SCRIPT> /BODY> </HTML>【例5-2】将例5-1中的行If语句改为使用块If语句。 <HTML> <HEAD><TITLE>简单验证</TITLE></HEAD> <BODY><H3>简单验证</H3><HR> 请输入数值数据： <input name="Text1" TYPE="TEXT" SIZE="10"><P> <INPUT TYPE="Button" NAME="Button1" VALUE="确认"> <SCRIPT FOR="Button1" EVENT="onClick" LANGUAGE="VBScript"> x = Text1.value If Not IsNumeric(x) Then MsgBox "您输入的不是数值数据" Else MsgBox "您输入的数据是：" & x End If </SCRIPT> </BODY> </HTML>