每行输出三个数字??在线等待

zhangjun 2003-09-29 01:33:57
本人有个问题如下:
<table .....>
<%
for i=1 to 500
...
<tr>
<td>输出数字</td>
</tr>
next
%>
要求每行输出3个数字

1 2 3
4 5 6
7 8 9
....
格式,怎么判断合适??谢谢!!
...全文
161 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
cloudchen 2003-09-29
  • 打赏
  • 举报
回复
<%
Response.Write modTable(650,3)

function modTable(max,lineBreak)
Dim sBody

sBody = "<table border=1>"&chr(13)&"<tr>"
for i = 1 to max
sBody = sBody & "<td>"&i&"</td>"
if i mod lineBreak = 0 and i <> max then
sBody = sBody & "</tr>"&chr(13)&"<tr>"
end if
next
sBody = sBody & "</tr>"&chr(13)&"</table>"

modTable = sBody
end function
%>
liudong963 2003-09-29
  • 打赏
  • 举报
回复
我的程序保证了table中td完整性,而采用mod方式,就会出现标志不匹配的现象,所以要注意。之所以采用构造字符串方式,就是为了提高页面效率,这点我想大家编程时应该注意到的。
cloudchen 2003-09-29
  • 打赏
  • 举报
回复
<%
response.write "<table border=1>"&chr(13)&"<tr>"
for i = 1 to 500
response.write "<td>"&i&"</td>"
if i mod 3 = 0 then
response.write "</tr>"&chr(13)&"<tr>"
end if
next
response.write "<tr>"&chr(13)&"</table>"
%>
liudong963 2003-09-29
  • 打赏
  • 举报
回复
<table>
<%
Dim Number,Max,rowStr

Number=3 '设定每一行输出的数字数
Max=500

rowStr="<tr><td colspan="&Number&">输出数字</td></tr>"
for i=1 to Max
rowStr=rowStr&"<tr>"
for j=0 to Number-1
if i+j<=Max then
rowStr=rowStr&"<td>"&(i+j)&"</td>"
else
rowStr=rowStr&"<td> </td>"
end if
next
i=i+j-1
rowStr=rowStr&"</tr>"
next
response.write rowStr
%>
</table>
cloudchen 2003-09-29
  • 打赏
  • 举报
回复
<SCRIPT LANGUAGE="VBScript">
document.write "<table border=1><tr>"
for i = 1 to 500
document.write "<td>"&i&"</td>"
if i mod 3 = 0 then
document.write "</tr><tr>"
end if
next
document.write "</table>"
</SCRIPT>
mch2000 2003-09-29
  • 打赏
  • 举报
回复
流浪鸟的方法虽然简单,但不具通用性,改起来麻烦。
mch2000 2003-09-29
  • 打赏
  • 举报
回复
<table ....>
......
<%
i=1
while i<= 500
%>
<tr>
<%
count=0
do while 1
%>
<td><%=i%></td>
<%
i=i+1
count=count+1
if count=3 then exit do
loop
%>
</tr>
<%
wend
%>
</table>
不老书生 2003-09-29
  • 打赏
  • 举报
回复
上面的我的错了,应该是
<table>
<%
for i=1 to 500
%>
<tr>
<td><%=i%></td>
<%i=i+1%>
<td><%=i%></td>
<%i=i+1%>
<td><%=i%></td>
</tr>
<%next%>
</table>
不老书生 2003-09-29
  • 打赏
  • 举报
回复
i mod 3 =0 判断

也可以
<table>
<%
for i=1 to 500
%>
<tr>
<td><%=i%></td>
<%i=i+1%>
<td><%=i%></td>
<%i=i+1%>
<td><%=i%></td>
<%i=i+1%>
</tr>
<%next%>
lincoke 2003-09-29
  • 打赏
  • 举报
回复
<table >
<%wz="<tr><td>"
for i=1 to 500
%>
<%
if (i mod 3)=0 then
wz=wz&i&"</td></tr><tr><td>"
else
wz=wz&"   "&i&" "

end if

next
response.write wz&"</td></tr>"
%>
</table>
xianglong 2003-09-29
  • 打赏
  • 举报
回复
if n mod 3<>0 then
....
n=n+1
else
....
n=n+1
end if
nnh 2003-09-29
  • 打赏
  • 举报
回复
用一個IF語句,當i mod 3=0 是,就</td></tr><tr><td>.....

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧