Validation ASP.Net Tutorial

<%@ Page Language="VB" %>

   Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
       If Page.IsValid Then
          Label1.Text = "VALID ENTRY!"
       End If
   End Sub
   Sub ValidateNumber(sender As Object, args As ServerValidateEventArgs)
       Try
          Dim num As Integer = Integer.Parse(args.Value)
          args.IsValid = ((num mod 5) = 0)
       Catch ex As Exception
          args.IsValid = False
       End Try
   End Sub



    CustomValidator


    
    

        
            Number: 
                         Runat="server">
                         Runat="server" ControlToValidate="TextBox1" 
             ErrorMessage="Number must be divisible by 5" 
             OnServerValidate="ValidateNumber">
        
                         Runat="server" Text="Button">