查詢 VB 程式設計累積問題

是要加乙個週期，而是要知道週期數。

你是這個意思嗎？

剛開始 text1=2 text=3

單擊一次 text3=5

第二次 - text1=x text2=x 再次點選 - text3=x+x+5

如果是這樣的話。

text3 的 txt 屬設定為 0

然後在加法命令中的“click”事件中。

private sub cmdleijia_click()end sub

就是這樣，如果還要多想點的話，我不能輸入字母，我什麼都不寫，只要告訴你積累的方法就行了，其實就是text1和text2的總和，加上text3的原始值，就實現了積累。

由於資料量小，邏輯關係簡單，可以用公式實現，不需要VBA在B2單元格中輸入公式。

b1+a1，然後下拉公式。

在單元格 C2 中輸入公式。

if（（c1+a2）>1500,16，（c1+a2）），然後下拉滾輪公式。

在單元格 d2 中輸入公式。

if（（d1+a2）>4500,16，（d1+a2）），然後下拉公式。

希望對你有用，如果你覺得，如果沒有渣滓的脊梁了解請嗨

public function b(byval n as integer)

if n = 1 then

b = 1else

b = b(n - 1) *n

end if

end function

private sub command1_click()dim n as integer

n == b(n)

end sub

您可以在此處輸入 10，其中 n<=170。 也就是說，它只能數到170！，在大的溢位。

for j=2 to 88

sum = sum + j

next j

msgbox "2 88 之間的數字之和等於" & sum