繁體瀏覽工具設為首頁收藏本站
 找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
發表文章前請先閱讀相關版規尊貴會員無限觀看附件圖片安全提問(回答) 和 永久尊貴會員 事宜
伊莉討論區 › 論壇 › 電腦資訊 › 電腦程式設計 › 如何用ASP 做出九九乘法表
mgmg霹靂七龍珠259luxu母世紀帝國
fantasy あまえん2nd attragent17叛道武士伊芙断れない
休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

[繁]為美好的世界獻上
快艇正妹豪乳吸睛
(4月新番)[繁]為美好

✡ 斗破蒼穹 年番／鬥
在店內買個飲料也會出
桃園觀音文林路 女子
電腦新資訊電腦軟體討論電腦軟體資訊分享電腦硬體討論電腦硬體資訊分享電腦萌化版電腦系統 OS 討論電腦程式設計
電腦設計技術交流圖像設計及交流各類下載工具教學寬頻上網討論
返回列表發新帖

查看: 4149|回復: 6
打印上一主題下一主題

[求助]如何用ASP 做出九九乘法表[複製鏈接]

ae0955837

Rank: 2Rank: 2

帖子
87
積分
338 點
潛水值
24080 米
跳轉到指定樓層
樓主
發表於 2009-11-24 02:02 PM|只看該作者|倒序瀏覽
如果重複性登入後自動登出，請先刪除所有Cookie和舊網頁再登入。
請問各位大大~~

怎樣用ASP做出99乘法表~

我試了很多次 就是無法成功 = ="

請高手幫忙解答~~~

要用單層迴圈

配合表格列印出九九乘法表

要用FOR指令來做.....

抱歉~老師上課聽不懂~SO 求救  

格式要像
1*1=1 1*2=2............1*9=9  
2*1=2 2*2=4............2*9=18
3*1=3 3*2=6............3*9=27
...
瀏覽完整內容，請先 註冊 或 登入會員
分享分享0收藏收藏0支持支持0
如果你覺得伊莉做得不錯，那就不要再猶疑了。今天就贊助和支持我們，立即行動！我們需要你的一點力量喔。

使用道具檢舉

angewang

Rank: 2Rank: 2

帖子
51
積分
340 點
潛水值
20659 米
頭香
發表於 2009-12-1 11:05 PM|只看該作者
如果你覺得伊莉做得不錯，那就不要再猶疑了。今天就贊助和支持我們，立即行動！我們需要你的一點力量喔。
for 回圈是重點 需要用到兩個 一個是乘數一個是被乘數
然後在用迴圈內用 Reponse.write 把表格的值寫出來,
想一下因該不難
如要用單回圈也可以
for把只要乘數作加一
然後迴圈內一行一到九為Reponse.write 乘數 "* 1  ="  乘數 * 1
如果發覺自己無法使用一些功能或出現問題，請按重新整理一次，並待所有網頁內容完全載入後5秒才進行操作。

使用道具檢舉

宇中有妮 該用戶已被刪除
3樓
發表於 2010-4-10 12:00 AM|只看該作者
如果你覺得伊莉做得不錯，那就不要再猶疑了。今天就贊助和支持我們，立即行動！我們需要你的一點力量喔。
我有寫出直向的，只是有點長...
我是利用LABEL和DropDownList1選單來製作的~
  1.   Dim J As Integer
  2.         If DropDownList1.SelectedIndex = 1 Then
  3.             Label2.Text &= "<TABLE Border=1>"
  4.             For J = 1 To 9
  5.                 Label2.Text &= "<tr>"
  6.                 Label2.Text &= "<td>"
  7.                 Label2.Text &= 1 & "X" & J & "=" & 1 * J
  8.                 Label2.Text &= "</td>"
  9.                 Label2.Text &= "</tr>"
  10.             Next

  12.         End If

  14.         If DropDownList1.SelectedIndex = 2 Then
  15.             Label2.Text &= ("<TABLE Border=1>")
  16.             For J = 1 To 9
  17.                 Label2.Text &= ("<tr>")
  18.                 Label2.Text &= ("<td>")
  19.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  20.                 Label2.Text &= ("</td>")
  21.                 Label2.Text &= ("<td>")
  22.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  23.                 Label2.Text &= ("</td>")
  24.                 Label2.Text &= ("</tr>")
  25.             Next
  26.         End If

  28.         If DropDownList1.SelectedIndex = 3 Then
  29.             Label2.Text &= ("<TABLE Border=1>")
  30.             For J = 1 To 9
  31.                 Label2.Text &= ("<tr>")
  32.                 Label2.Text &= ("<td>")
  33.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  34.                 Label2.Text &= ("</td>")
  35.                 Label2.Text &= ("<td>")
  36.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  37.                 Label2.Text &= ("</td>")
  38.                 Label2.Text &= ("<td>")
  39.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  40.                 Label2.Text &= ("</td>")
  41.                 Label2.Text &= ("</tr>")
  42.             Next
  43.         End If

  45.         If DropDownList1.SelectedIndex = 4 Then
  46.             Label2.Text &= ("<TABLE Border=1>")
  47.             For J = 1 To 9
  48.                 Label2.Text &= ("<tr>")
  49.                 Label2.Text &= ("<td>")
  50.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  51.                 Label2.Text &= ("</td>")
  52.                 Label2.Text &= ("<td>")
  53.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  54.                 Label2.Text &= ("</td>")
  55.                 Label2.Text &= ("<td>")
  56.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  57.                 Label2.Text &= ("</td>")
  58.                 Label2.Text &= ("<td>")
  59.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  60.                 Label2.Text &= ("</td>")
  61.                 Label2.Text &= ("</tr>")
  62.             Next
  63.         End If

  65.         If DropDownList1.SelectedIndex = 5 Then
  66.             Label2.Text &= ("<TABLE Border=1>")
  67.             For J = 1 To 9
  68.                 Label2.Text &= ("<tr>")
  69.                 Label2.Text &= ("<td>")
  70.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  71.                 Label2.Text &= ("</td>")
  72.                 Label2.Text &= ("<td>")
  73.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  74.                 Label2.Text &= ("</td>")
  75.                 Label2.Text &= ("<td>")
  76.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  77.                 Label2.Text &= ("</td>")
  78.                 Label2.Text &= ("<td>")
  79.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  80.                 Label2.Text &= ("</td>")
  81.                 Label2.Text &= ("<td>")
  82.                 Label2.Text &= (5 & "X" & J & "=" & 5 * J)
  83.                 Label2.Text &= ("</td>")
  84.                 Label2.Text &= ("</tr>")
  85.             Next
  86.         End If

  88.         If DropDownList1.SelectedIndex = 6 Then
  89.             Label2.Text &= ("<TABLE Border=1>")
  90.             For J = 1 To 9
  91.                 Label2.Text &= ("<tr>")
  92.                 Label2.Text &= ("<td>")
  93.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  94.                 Label2.Text &= ("</td>")
  95.                 Label2.Text &= ("<td>")
  96.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  97.                 Label2.Text &= ("</td>")
  98.                 Label2.Text &= ("<td>")
  99.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  100.                 Label2.Text &= ("</td>")
  101.                 Label2.Text &= ("<td>")
  102.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  103.                 Label2.Text &= ("</td>")
  104.                 Label2.Text &= ("<td>")
  105.                 Label2.Text &= (5 & "X" & J & "=" & 5 * J)
  106.                 Label2.Text &= ("</td>")
  107.                 Label2.Text &= ("</tr>")
  108.             Next
  109.             For J = 1 To 9
  110.                 Label2.Text &= ("<tr>")
  111.                 Label2.Text &= ("<td>")
  112.                 Label2.Text &= (6 & "X" & J & "=" & 6 * J)
  113.                 Label2.Text &= ("</td>")
  114.                 Label2.Text &= ("</tr>")
  115.             Next
  116.         End If

  118.         If DropDownList1.SelectedIndex = 7 Then
  119.             Label2.Text &= ("<TABLE Border=1>")
  120.             For J = 1 To 9
  121.                 Label2.Text &= ("<tr>")
  122.                 Label2.Text &= ("<td>")
  123.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  124.                 Label2.Text &= ("</td>")
  125.                 Label2.Text &= ("<td>")
  126.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  127.                 Label2.Text &= ("</td>")
  128.                 Label2.Text &= ("<td>")
  129.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  130.                 Label2.Text &= ("</td>")
  131.                 Label2.Text &= ("<td>")
  132.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  133.                 Label2.Text &= ("</td>")
  134.                 Label2.Text &= ("<td>")
  135.                 Label2.Text &= (5 & "X" & J & "=" & 5 * J)
  136.                 Label2.Text &= ("</td>")
  137.                 Label2.Text &= ("</tr>")
  138.             Next
  139.             For J = 1 To 9
  140.                 Label2.Text &= ("<tr>")
  141.                 Label2.Text &= ("<td>")
  142.                 Label2.Text &= (6 & "X" & J & "=" & 6 * J)
  143.                 Label2.Text &= ("</td>")
  144.                 Label2.Text &= ("<td>")
  145.                 Label2.Text &= (7 & "X" & J & "=" & 7 * J)
  146.                 Label2.Text &= ("</td>")
  147.                 Label2.Text &= ("</tr>")
  148.             Next
  149.         End If

  151.         If DropDownList1.SelectedIndex = 8 Then
  152.             Label2.Text &= ("<TABLE Border=1>")
  153.             For J = 1 To 9
  154.                 Label2.Text &= ("<tr>")
  155.                 Label2.Text &= ("<td>")
  156.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  157.                 Label2.Text &= ("</td>")
  158.                 Label2.Text &= ("<td>")
  159.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  160.                 Label2.Text &= ("</td>")
  161.                 Label2.Text &= ("<td>")
  162.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  163.                 Label2.Text &= ("</td>")
  164.                 Label2.Text &= ("<td>")
  165.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  166.                 Label2.Text &= ("</td>")
  167.                 Label2.Text &= ("<td>")
  168.                 Label2.Text &= (5 & "X" & J & "=" & 5 * J)
  169.                 Label2.Text &= ("</td>")
  170.                 Label2.Text &= ("</tr>")
  171.             Next
  172.             For J = 1 To 9
  173.                 Label2.Text &= ("<tr>")
  174.                 Label2.Text &= ("<td>")
  175.                 Label2.Text &= (6 & "X" & J & "=" & 6 * J)
  176.                 Label2.Text &= ("</td>")
  177.                 Label2.Text &= ("<td>")
  178.                 Label2.Text &= (7 & "X" & J & "=" & 7 * J)
  179.                 Label2.Text &= ("</td>")
  180.                 Label2.Text &= ("<td>")
  181.                 Label2.Text &= (8 & "X" & J & "=" & 8 * J)
  182.                 Label2.Text &= ("</td>")
  183.                 Label2.Text &= ("</tr>")
  184.             Next
  185.         End If

  187.         If DropDownList1.SelectedIndex = 9 Then
  188.             Label2.Text &= ("<TABLE Border=1>")
  189.             For J = 1 To 9
  190.                 Label2.Text &= ("<tr>")
  191.                 Label2.Text &= ("<td>")
  192.                 Label2.Text &= (1 & "X" & J & "=" & 1 * J)
  193.                 Label2.Text &= ("</td>")
  194.                 Label2.Text &= ("<td>")
  195.                 Label2.Text &= (2 & "X" & J & "=" & 2 * J)
  196.                 Label2.Text &= ("</td>")
  197.                 Label2.Text &= ("<td>")
  198.                 Label2.Text &= (3 & "X" & J & "=" & 3 * J)
  199.                 Label2.Text &= ("</td>")
  200.                 Label2.Text &= ("<td>")
  201.                 Label2.Text &= (4 & "X" & J & "=" & 4 * J)
  202.                 Label2.Text &= ("</td>")
  203.                 Label2.Text &= ("<td>")
  204.                 Label2.Text &= (5 & "X" & J & "=" & 5 * J)
  205.                 Label2.Text &= ("</td>")
  206.                 Label2.Text &= ("</tr>")
  207.             Next
  208.             For J = 1 To 9
  209.                 Label2.Text &= ("<tr>")
  210.                 Label2.Text &= ("<td>")
  211.                 Label2.Text &= (6 & "X" & J & "=" & 6 * J)
  212.                 Label2.Text &= ("</td>")
  213.                 Label2.Text &= ("<td>")
  214.                 Label2.Text &= (7 & "X" & J & "=" & 7 * J)
  215.                 Label2.Text &= ("</td>")
  216.                 Label2.Text &= ("<td>")
  217.                 Label2.Text &= (8 & "X" & J & "=" & 8 * J)
  218.                 Label2.Text &= ("</td>")
  219.                 Label2.Text &= ("<td>")
  220.                 Label2.Text &= (9 & "X" & J & "=" & 9 * J)
  221.                 Label2.Text &= ("</td>")
  222.                 Label2.Text &= ("</tr>")
  223.             Next
  224.         End If
  225.         Label2.Text &= ("</TABLE >")

  227.     End Sub
複製代碼
...
瀏覽完整內容，請先 註冊 或 登入會員
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。

使用道具檢舉

scitman

帖子
0
積分
0 點
潛水值
120 米
4樓
發表於 2010-5-31 06:19 PM|只看該作者
分享使你變得更實在，可以使其他人感到快樂，分享是我們的動力。今天就來分享你的資訊、圖片或檔案吧。
for i =1 to 9
  for j = 1 to 9
    中間自己加吧
  next j
next i
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。

使用道具檢舉

ChiHua0826

Rank: 1

帖子
6
積分
75 點
潛水值
1936 米
5樓
發表於 2010-10-1 09:49 PM|只看該作者
升級為尊貴會員或贊助會員，讓你擁有自由、暢通無阻、應有盡有及所有資源任你使用的無窮快感。
  1. <table>
  2. <%
  3. for i = 1 to 9
  4. %>
  5.    <tr>
  6. <%
  7.    for j = 1 to 9
  8. %>
  9.       <td><%=i%>*<%=j%>=<%=i*j%></td>
  10. <%
  11.    next j
  12. %>
  13.    </tr>
  14. <%
  15. next i
  16. %>
  17. </table>
複製代碼
...
瀏覽完整內容，請先 註冊 或 登入會員





若瀏覽伊莉的時侯發生問題或不正常情況，請使用Internet Explorer(I.E)。

使用道具檢舉

id.eyny3 該用戶已被刪除
6樓
發表於 2010-10-2 03:11 PM|只看該作者
如果重複性登入後自動登出，請先刪除所有Cookie和舊網頁再登入。
我服了三樓 真的= =""
如果重複性登入後自動登出，請先刪除所有Cookie和舊網頁再登入。

使用道具檢舉

gt569072

帖子
74
積分
-281 點
潛水值
14873 米
7樓
發表於 2010-10-2 08:14 PM|只看該作者
成為伊莉的版主，你將獲得更高級和無限的權限。把你感興趣的版面一步步地發展和豐盛，那種滿足感等著你來嚐嚐喔。
中間自己加吧
升級為尊貴會員或贊助會員，讓你擁有自由、暢通無阻、應有盡有及所有資源任你使用的無窮快感。

使用道具檢舉

返回列表發新帖
高級模式
BColorImageLinkQuoteCodeSmilies
您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明：本討論區是以即時上載留言的方式運作，對所有留言的真實性、完整性及立場等，不負任何法律責任。而一切留言之言論只代表留言者個人意見，並非本網站之立場，用戶不應信賴內容，並應自行判斷內容之真實性。於有關情形下，用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限，故不能完全監察所有留言，若讀者發現有留言出現問題，請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言，同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論，敬請自律。本網站保留一切法律權利。
回頂部