求n的阶乘【VB代码实现】
生活随笔
收集整理的這篇文章主要介紹了
求n的阶乘【VB代码实现】
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
求
For語句實現
Private Sub Command1_Click()Dim s As Long, n As Integer, i As Integern = Val(Text1.Text)s = 1For i = 1 To ns = s * iNext iLabel4.Caption = Str(s) End SubDo While語句實現
Private Sub Command1_Click()Dim s As Long, n As Integer, i As Integern = Val(Text1.Text)s = 1i = 1Do While i <= ns = s * ii = i + 1LoopLabel4.Caption = Str(s) End Sub學習要求:
1、讀懂題意,根據每一項的變化寫出通項公式。
2、設定相應的變量來解決問題,理解各變量的作用。
轉載于:https://www.cnblogs.com/daveylin/p/6944020.html
總結
以上是生活随笔為你收集整理的求n的阶乘【VB代码实现】的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: c语言中int的取值范围_c语言入门(1
- 下一篇: VS2012/VS2013安装教程