1樓：匿名使用者
多簡單的問題啊！函式不能巢狀定義你把程式改成private function jiecheng(n as integer) as long
dim result as long
dim i as integer
result = 1
for i = 1 to n
result = result * i
next i
jiecheng = result
end function
vate sub command1_click()printed jiecheng(100)end sub
就可以了！
2樓：匿名使用者
private function jiecheng(n as integer) as long
dim result as long
dim sum as long
dim i as integer
result = 1
sum = 0
for i = 1 to n
result = result * i
sum = sum + result
next i
jiecheng = sum
end function
你這是個函式，怎麼還套在控制元件裡啊。
把function去掉了。
3樓：匿名使用者
private sub command1_click()msgbox jiecheng(100)
end function
private function jiecheng(n as integer) as long
dim result as long
dim sum as long
dim i as integer
result = 1
sum = 0
for i = 1 to n
result = result * i
sum = sum + result
next i
jiecheng = sum
4樓：真正的喜羊羊
private sub publicbutton1_click()testfunc1()
end sub
public function testfunc1(n as integer) as long
//這裡求階乘
end function
vb 任意輸入一個1到100以內的整數,並求出它的階乘
5樓：小先
貌似把s定義成double型別就行了，自定義的格式不是個好習慣
vb中用過程求1到100的幹階乘和
6樓：元小翠
程式如下
dim x,y
y=1for x=1 to 100
y=x*y
next
三要素？其實你程式設計沒必要在意這些事情。如果非要說的話，事件也應該算是有吧，三要素是：事件源、事件、響應
◆事件源：發生該事件的是哪個物件？例如，哪個按鈕會被單擊，或哪個窗體被載入（即事件實際發生的位置）。
◆事件：將要發生什麼事情，以及您希望響應什麼事情？識別事件是非常重要的，因為許多控制元件都會觸發多個事件。
◆響應：當事件發生時，您希望執行哪些程式語句
vb中，求1到n階乘的和是什麼？
vb求1到n的階乘
vb中求1到n階乘的和
7樓：捌零老陳
sum = 0
temp = 1
for i = 1 to n
sum = sum + temp * i
temp = temp * i
next
在vb當中編寫好程式計算100的階乘，但是得到的結果如何表示為標準的答案，不要科學計數法表示？
8樓：匿名使用者
你首先掌握vb中；
整型變數 integer ，能夠存放數字的範圍，長整型變數 long ，能夠存放數字的範圍。
然後，用一般的計算器，大約估算一下，100的階乘是多少大？就明白了。
你從1開始乘以2，乘以3 ，......，看看能夠乘到哪個數？
用VB求1到100奇數和出現的問題
private sub command1 click dim i as integer,s as integeri 1 s 0 while i 99 s s i i i 2 wend msgbox s 1 3 5 99 str s end sub 你應該是用i來控制迴圈，用s來求和，如果你用s i ...
求簡單的VB作業，求用VB解答
題目都沒有，如何寫，瞎寫嗎？寫 x y z 嗎？dim b as integer private sub command1 click if 123456 falseprint hello falseelsemsgbox 密碼錯誤 1 b b 1 if b 3 then msgbox 你沒有機會了 ...
c語言求1到10的階乘的和，C語言求1到10的階乘的和
你試試把for後的兩句放在for語句中 因為你的程式當c大於2時 d始終只能得一次值 而不會累加 而且你把應a d定義為長整型 我自己寫的中間的你試試 for i 0 i 11 i for j i j 0 j s j sum s 其中s sum都是長整型 用手機上回的 簡單寫了下 希望能看懂 還有你...