w3school下的一段代码运行时报错

w3school上的一段代码运行时报错
http://www.w3school.com.cn/tiy/s.asp?f=demo_aspnet_customvalidator
上面的网页左边是程序运行的源码,右边显示的是效果,
但我将其源码复制粘贴后,程序报错无法运行,请高手帮助看一下


------解决方案--------------------
没问题啊,<script runat="server">
Sub user(source As object,args As ServerValidateEventArgs)
if len(args.Value)<8 or len(args.Value)>16 then
args.IsValid=false
else
args.IsValid=true
end if
End Sub
</script> 这个没忘吧
------解决方案--------------------
把项目类型换成VB的。。这代码明显是VB的么。。
<%@ Page Language="vb"
------解决方案--------------------
这是个vb.net的,不是“C#”,测试好了,建个vb.net的试试吧。

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default2.aspx.vb" Inherits="Default2" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<script runat="server">
Sub user(source As object,args As ServerValidateEventArgs)
if len(args.Value)<8 or len(args.Value)>16 then
args.IsValid=false
else
args.IsValid=true
end if
End Sub
</script>
<head runat="server">
<title>无标题页</title>
 
</head>
<body>
<form id="Form1" runat="server">
<asp:Label ID="Label1" runat="server" Text="请输入用户名:" />
<asp:TextBox id="txt1" runat="server" />
<asp:Button ID="Button1" Text="提交" runat="server"/>
<br />
<asp:Label id="mess" runat="server"/>
<br />
<asp:CustomValidator ID="CustomValidator1"
ControlToValidate="txt1"
OnServerValidate="user"
Text="用户名必须介于 8 到 16 个字符之间!"
runat="server"/>
</form>

</body>
</html>