1.一行一行的输出
<%
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 5
Response.Write("<tr><td> </td><td> </td><td> </td><td> </td></tr>")
Next
Response.Write("</table>")
%>这没什么好说的了，大家都看得明白。
2.一个单元格一个单元格的输出
<%
Response.Write("<table border=""1"" width=""200"">")
For i=1 to 18
If i mod 4 = 1 Then Response.Write("<tr>")
Response.Write("<td> </td>")
If i mod 4 = 0 Then Response.Write("</tr>")
Next
'补足单元格
i = i - 1
If i mod 4<>0 Then
For j=1 to 4-i mod 4
Response.Write("<td>补</td>")
Next
Response.Write("</tr>")
End If
Response.Write("</table>")
%>这边需要说明一下：网上很多的输出N行N列表格的ASP中都没有考虑最后一行的列数是否完整，即没有上边的补足部分，结果输出一个残缺的表格。细节上的问题，毛病虽不大，但还是希望大家注意下。
评论（0）
暂无评论。