1樓：岔路程式緣
private sub form_click()form1.autoredraw = truedim t, a, s, n, j, h
t = val(text1.text)
s = 0
j = 0
h = 1
a = (-1) ^ j / h
do while abs(a) >= t
s = s + a
j = j + 1
h = 1
for n = 1 to 2 * j + 1h = h * n
next n
a = (-1) ^ j / h
loop
text2.text = format(s, "0.00000000")
end sub
已經執行過。
2樓：
建議提問前先搜尋，很多問題已經有人問過
這是我前幾天的回答
private sub form_click()dim i as long, s as double, d as double, f as double, k as integer, t as double
t = val(text1.text)
i = 1
s = 0
f = i
k = 1 '符號，比(-1) ^ (n + 1)節約很多時間do s = s + k / f
k = -k
debug.print s;
i = i + 2
f = f * (i - 1) * i
loop while 1 / f >= ttext2.text = round(s, 8)end sub
vb裡一道題求解，求解VB一道題 最好解釋每一步
迮悅 private sub command1 click text1.visible falseend sub private sub command2 click text1.text vb程式設計 text1.visible true text1.fontsize 16 end sub pri...
物理題求解急有高分及追加
1p 1gh1 0 1 p 2gh2 0 2 1 2 2 1得 2 1 p 1 2gh 0 2 1 p 0 1 2 2 1 gh 2設水的密度為 a浸沒彈簧秤讀數f，f gva agva 則va f a g 只要求得 a就行了，b在頁面上平衡後，露出體積 總體積 7 12 bgvb g 5 12 v...
VB引用的問題（高分求解）VB題目求解
dll有兩種。一種是active dll這種dll內部包含是類或者類庫 這種dll可以通過vb的引用對話方塊引用進來。還有一種是windows的標準dll 這種dll內部包換的是匯出函式 這種dll的使用方式是像普通的api函式。想必你一定用過windows api函式吧。api函式的使用方法是這樣...