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
.lblText.Text = Left(strString,21)
07.
End
Sub
08.
09.
</script>
10.
<html>
11.
<head>
12.
</head>
13.
<body>
14.
<form runat=
"server"
>
15.
<asp:Label id=
"lblText"
runat=
"server"
></asp:Label>
16.
</form>
17.
</body>
18.
</html>