※ 引述《nowstop (傷心咖啡店之歌)》之銘言：
: 標題: [請益] 急！老師又丟了一個題目給我們了..help
: 時間: Fri Dec 3 09:10:54 2004
:
: 題目： 請寫一個程式 輸入一個數字 n
: print
: 1！= ？
: .
: n！= ？
Private Sub Form_Click()
n = InputBox("請輸入數字", "階層計算")
For a = 1 To n
x = 1
For y = 1 To a
x = x * y
Next y
Print a & "!=" & x
Next a
End Sub
以上的可以跑不過不嚴僅 要自己設限制 ex: 保證輸入的是正整數,第2次print前清空..
: ※ 發信站: 批踢踢實業坊(ptt.cc)
: ◆ From: 192.192.105.232
: 噓 advicer:這邊不是讓你要作業用的! 140.123.254.21 12/03
不過除了作業 現在也很少會在用vb吧
: 噓 needhope:作葉要自己寫~ 163.23.225.206 12/03
作業是要自己寫 不過不會就是要問阿
: 噓 cawQQ:連迴圈都不會? 61.219.111.117 12/03
會的話他還來問幹什麼.............
我滿不希望看到這種要求別人幫忙寫作業的文章 不過這也是最快能幫到你的方式
我比較希望你看完之後 自己推敲一下寫法 自己練習看看 順便看看精華區的東西
當然 以上那些噓人的 留點口德吧 問問題 你不想答也就算了 這樣噓別人 真的不太好
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.34.184.39