编程狮在线代码实例

Tab
<>
""
''
()
{}
[]
/
:
;
?
,
.
$
输入
运行
xxxxxxxxxx
 
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="/statics/demosource/showrazor.css">
</head>
<body>
<span class="marked">@Code
​
Dim db = Database.Open(&quot;SmallBakery&quot;)&nbsp;
​
Dim query = &quot;SELECT * FROM Product&quot;&nbsp;
​
End Code</span>
​
<html>&nbsp;
​
<body>&nbsp;
​
<h1>Small Bakery Products</h1>&nbsp;
​
<table border=&quot;1&quot; width=&quot;100%&quot;>&nbsp;
​
<tr>
​
<th>Id</th>&nbsp;
​
<th>Product</th>&nbsp;
​
<th>Description</th>&nbsp;
​
<th>Price</th>&nbsp;
​
</tr>
​
<span class="marked">@Code
​
Dim row
​
for each row in db.Query(query)
​
End Code</span>
​
<tr>&nbsp;
​
<td><span class="marked">@row.Id</span></td>&nbsp;
​
<td><span class="marked">@row.Name</span></td>&nbsp;
​
<td><span class="marked">@row.Description</span></td>&nbsp;
​
<td align=&quot;right&quot;><span class="marked">@row.Price</span></td>&nbsp;
​
</tr>&nbsp;
​
<span class="marked">@Code
next
End Code</span>
​
</table>&nbsp;
​
</body>&nbsp;
​
</html>
</body>
</html>
实例代码
运行结果