01.
<%@ Page Language=
"VB"
%>
02.
<script runat=
"server"
>
03.
04.
Sub
Page_Load(sender
As
Object
, e
As
EventArgs)
05.
Dim
strString
As
String
=
"www.ThaiCreate.Com"
06.
Me
.lblText1.Text = LSet(strString, 1)
07.
Me
.lblText2.Text = LSet(strString, 2)
08.
Me
.lblText3.Text = LSet(strString, 3)
09.
Me
.lblText4.Text = LSet(strString, 4)
10.
End
Sub
11.
12.
</script>
13.
<html>
14.
<head>
15.
</head>
16.
<body>
17.
<form runat=
"server"
>
18.
<asp:Label id=
"lblText1"
runat=
"server"
></asp:Label><br />
19.
<asp:Label id=
"lblText2"
runat=
"server"
></asp:Label><br />
20.
<asp:Label id=
"lblText3"
runat=
"server"
></asp:Label><br />
21.
<asp:Label id=
"lblText4"
runat=
"server"
></asp:Label><br />
22.
</form>
23.
</body>
24.
</html>