<html>
<body>
@代码
Dim i=0
Do While i < 5
i += 1
@<p>第 @i 行</p>
Loop
End Code
</body>
</html>