<html>
<body>
@Code
Dim i=0
Do While i < 5
    i += 1
    @<p>行 @i</p>
自环
End Code

</body>
</html>