簡單的VB程式設計用while和if寫程式

2022-10-09 01:45:12 字數 989 閱讀 8529

1樓:匿名使用者

這個程式效率很高, 給幾個結果

k n1 22 43 11。。。 。。。

10 12367

。。。 。。。

20 272400600private sub form_load()end sub

private sub command1_click()sn = 0

k = val(text1.text)

j = 1

while sn <= k

sn = sn + 1 / j

j = j + 1

wend

text2.text = str(j - 1)end sub

2樓:匿名使用者

你是不是想要給定一個k,想要算出最小的n值?

那麼應該是

while sn>cdbi(text1.text)n=n+1

sn=sn+1/n

wend

迴圈結束後 n 就是你要的結果

3樓:紅山人

'注意:k值不能大於12

private sub command1_click()dim k as single, n as double, sn as single

k = val(text1)

n = 0

sn = 0

while sn < k

n = n + 1

sn = sn + 1 / n

wend

if sn > k then

text2 = n

end if

end sub

4樓:匿名使用者

題目和要求寫的清楚一點,你這樣沒法判斷

簡單的c 程式設計fori 1 i100 i和i 1 for i100 i有什麼區別

你這語法應該是這樣 for int i 1 i 100 i 這個從1迴圈到99。i 1 for i 100 i 這個也是從1迴圈到99,沒有區別,也不會死迴圈。區別是變了i的使用範圍不一樣,一個在for內起作用,一個在for內,for外都可以用。i 1 for i 100 i 寫成 i 1 for ...

C語言中的 i和i 的區別,C語言程式設計中的 i和i 有什麼區別?

c語言是 cdecl呼叫方式,copy所以函式bai引數是從右往左入棧,先du壓棧zhi的當然先計算,而在壓棧的過程中後置i i 是不dao會改變i的值的,它只會儲存在一個臨時變數裡面,前置的 i i 會直接改變i的值,所以就得到實驗 的結果了!看結果是從右往左算的,其實研究這個沒什麼意義。不同的編...

vb題 程式設計計算100以內素數的和

private sub command1 click dim i as integer,j as integer,k as integer for i 2 to 100 for j 2 to i if i mod j 0 then exit for end if next if i j then k...