神马品牌网中班室内亲子活动游戏:一道ASP题,请大家帮我写一下吧!
来源：百度文库 编辑：神马品牌网 时间：2024/04/30 11:19:24
FOR语句实现:
<%
Dim i,j,TempStr
TempStr=""
For i=1 To 9
TempStr=""
For j=1 To i
TempStr=TempStr&CStr(i)&"*"&CStr(j)&"="&CStr(j*i)&Space(3)
Next
Response.Write(TempStr&"<br><br>")
Next
%>
--------------传说中的分隔符-------------------
DO....LOOP实现:
<%
Dim i,j,TempStr
TempStr=""
i=1
Do While i<=9
TempStr=""
j=1
Do While j<=i
TempStr=TempStr&CStr(i)&"*"&CStr(j)&"="&CStr(j*i)&Space(3)
j=j+1
Loop
i=i+1
Response.Write(TempStr&"<br><br>")
Loop
%>
以上两段代码不可放在同一个ASP文件中运行，否则会出现变量重定义的错误。如果你想在同一个ASP文件中运行，请更改变量名。
用C#这样写：
private void n_print
{
int i=0;
int j=0;
for(i;i<10;i++)
{
for(j;j<10;j++)
{
response.write(i+"*"+j+"="+i*j);
}
}
}
思路给你啦，DO...LOOP好写了吧！没有运行这个代码，因为刚刚重装系统(中毒啦)
ASP用FOR语句实现：
<title>使用ASP编程九九乘法表</title>
<table border=1>
<%for i = 1 to 9%>
<tr><%for j = 1 to i%><td>
<%=j%>×<%=i%>=<%=i*j%></td>
<%next%></tr>
<%next%>
</table>
------------------------
上面是用FOR的ASP,运行效果如下:
1×1=1
1×2=2 2×2=4
1×3=3 2×3=6 3×3=9
1×4=4 2×4=8 3×4=12 4×4=16
1×5=5 2×5=10 3×5=15 4×5=20 5×5=25
1×6=6 2×6=12 3×6=18 4×6=24 5×6=30 6×6=36
1×7=7 2×7=14 3×7=21 4×7=28 5×7=35 6×7=42 7×7=49
1×8=8 2×8=16 3×8=24 4×8=32 5×8=40 6×8=48 7×8=56 8×8=64
1×9=9 2×9=18 3×9=27 4×9=36 5×9=45 6×9=54 7×9=63 8×9=72 9×9=81
------------------------------------------
ASP用Do语句实现：
<title>使用ASP编程九九乘法表</title>
<table border=1>
<%do
j=0
i=i+1%>
<tr><%do
j=j+1%><td>
<%=j%>×<%=i%>=<%=i*j%></td>
<%loop until j>=i%></tr>
<%loop until i>=9%>
</table>
这是用Do的,运行结果同上.
这是用(asp)编写的,我们前两天刚做的!
<html>
<head>
<title>使用ASP编程九九乘法表</title>
</head>
<body>
<%
response.write "<h3 align=center>九九乘法表</h3>" '使用H3字体格式
response.write "<table border=1 width=95% >" '设置表格边框和宽度
for i=1 to 9 '使用for语句控制表格行数
response.write "<tr align=center bgcolor=#fffff>" '设置表格颜色
for j=1 to 9 ''使用for语句控制表格列数
if j<i+1 then '往表格中添加数字
response.write "<td>"&i&"*"&j&"="&i*j& "</td>"
end if
next
response.write "</tr>"
next
response.write "</table>"
%>
</body>
</html>