Response ASP.Net

<%@ Page Language="vb" %>

   
      Sending a PICS label in ASP.NET
      
         Sub Page_Load()
            Dim PICSLabel As String
            PICSLabel &= "(PICS-1.1  "
            PICSLabel &= "labels on " & Chr(34)
            PICSLabel &= "2001.08.01T06:00-0000" & Chr(34)
            PICSLabel &= " until " & Chr(34)
            PICSLabel &= "2002.02.28T23:59-0000" & Chr(34)
            PICSLabel &= " ratings (V 1 S 2 L 3 N 1))"
            Response.PICS(PICSLabel)
            Message.Text = PICSLabel
         End Sub