Viewing source for recipe1506vb.aspx

<%@ Page Language="vb" %>
<script runat="server">
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
    Dim input As String = "ASPAlliance.com"
    Dim UPPER, lower As String
    UPPER = input.ToUpper()
    lower = input.ToLower()
    Response.Write(input & "<br>" & UPPER & "<br>" & lower)
End Sub
</script>