01.
<%@ Page Language=
"VB"
%>
02.
<script runat=
"server"
>
03.
Sub
Page_Load(sender
As
Object
, e
EventArgs)
04.
05.
Dim
i
Integer
06.
i = 0
07.
Do
08.
i = i + 1
09.
Response.write(
"www.ThaiCreate.Com<br>"
)
10.
If
i = 3
Then
11.
Exit
12.
End
IF
13.
Loop
While
i <= 5
14.
15.
16.
</script>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท