怎樣用For/Next語句編寫程序讓數值N從一個文本框中輸入,求1+2!/ 2+3!/3+...+N!/N的值,並輸出到一個Label中呢?
工具/原料
Visual Basic 6.0
方法/步驟
①在Form1窗體中的適當位置畫出2個Label框、1個Text框,以及1個Command按鈕(預先對Caption等屬性進行設置,方便直觀)。
②雙擊“運算”按鈕,在彈出的代碼框中鍵入如下代碼(複製注意分行):
Private Sub Command1_Click()Dim n As Integern = Val(Text1.Text)t = 1For i = 1 To n t = i * t s = s + t / i Next iLabel3.Caption = sEnd Sub
③最後點擊運行試試吧(不相信結果的話就拿稿紙慢慢驗證哦)!
注意事項
注意分行、空格以及字符格式
本次用的For/Next語句,更多運用請詢問baidu