01.<%@ Page Language="VB" %>
02.<script runat="server">
03.
04. Sub Page_Load(sender As Object, e As EventArgs)
05. Dim strString As String = "I Love ThaiCreate.Com Version 2009 "
06. Me.lblText1.Text = UCase(strString)
07. Me.lblText2.Text = strString.ToUpper()
08. End Sub
09.
10.</script>
11.<html>
12.<head>
13.</head>
14.<body>
15. <form runat="server">
16. <asp:Label id="lblText1" runat="server"></asp:Label>
17. <br />
18. <asp:Label id="lblText2" runat="server"></asp:Label>
19. </form>
20.</body>
21.</html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
