1樓:匿名使用者
因為你是從1到99奇數相加,所以i=1 to 99 step 2。
command_click()名字錯了,少了一個1,應command1_click()
private sub command1_click()dim i, sum
sum = 0
for i = 1 to 99 step 2sum = sum + i
next i
msgbox sum
end sub
2樓:匿名使用者
這個題是需要先i=i+1,然後再next i不過通常for迴圈我們不這麼用,可以在for 後面直接跟步長,就是這樣
for i=1 to 99 step 2
預設步長是1
也可以用do 迴圈
dim i as integer
i=1do
sum=sum+1
i=i+2
loop
3樓:匿名使用者
不對,for i = 1 to 99
這裡改一下,for i = 1 to 99 step 2
加上步長加2,這樣才是1+3+5.....
4樓:
private sub command_click()dim i, sum
sum = 0
for i = 1 to 99 step 2sum = sum + i
next i
msgbox sum
end sub
5樓:乁
next i + 1?
用vb迴圈結構怎麼求1+3+5+…+99
6樓:匿名使用者
dim sum as integer
sum=0
for i=1 to 99 step 2
sum=sum+i
next i
print sum
1-2+3-4+5-…+99-100的值。vb程式的**是怎樣的?
7樓:匿名使用者
看到都復覺得羞制恥,這麼多人bai亂髮程式來du騙分,丟臉zhi,以下是正確答
dao案
private sub form_click()me.cls
dim i, sum as single
for i = 1 to 100
sum = sum + i * (-1) ^ (i - 1)next i
print sum
end sub
8樓:匿名使用者
vb的:
private function js()dim s, i as integer
for i = 1 to 100 step 1if i mod 2 = 0 then
s = s - i
else
s = s + i
end if
next
js = s
end function
9樓:匿名使用者
main() }
10樓:
dim s%
fh=1
for i =1 to 100 step 1s=s+i
fh = -fh
next i
用vb程式語言編寫程式s=1+3+5+7........+999?謝謝
11樓:匿名使用者
private sub command2_click()for i = 1 to 999 step 2o = o + i
next
msgbox o
end subprivate sub command3_click()
n = text1.text
for i = 2 to int(sqr(n))if n mod i = 0 then
msgbox "不是素數"
exit sub
end if
next i
msgbox "是素數"end sub
12樓:匿名使用者
1、2用迴圈3 用個自定義函式
vb程式設計題目,求1+3+5+7+...+99的和.並寫出程式**
13樓:匿名使用者
dim i as integer
dim j as integer
private sub form_click()for i=1 to 99 step 2
j=i+j
next i
print j
end sub
vb用for語句程式設計,計算1-3+5-7+...-99+101的值
14樓:可軒
private sub command1_click()dim i%, k%, sum%
sum = 1
for i = 2 to 51
k = i * 2 - 1
if i mod 2 = 0 then
k = -1 * k
end if
sum = sum + k
next i
print "sum = " & sum
end sub
執行結果,顯示 sum = 51
15樓:網海1書生
dim n as integer, k as integer, s as integer
k = 1
for n = 1 to 101 step 2s = s + k * n
k = -k
next
msgbox s
用VB編寫一個鬧鐘程式
做一個簡單的鬧鐘程式很簡單的。我這裡不用if語句。首先我們在窗體上新增一個標籤控制元件,再畫一個 鬧鐘 將鬧鐘得interval屬性改為1000,雙擊鬧鐘,進入鬧鐘的 檢視,編寫 private subtimer1 timer timeend sub就行了。謝謝。dimttime s asinteg...
用VB設計程式中遇到的問題,用VB設計程式中遇到的一個問題
哦,這樣的話應該先畫一個按鈕。預設命名command1。這裡舉例x y x y 然後 sub command1 click dim a as long 宣告a變數 a x y x y 記住不要加 if a 某值 then msgbox 等於這個值 else msgbox 不等於這個值 end if ...
用VB編寫的程式是不是都是win32應用程式
可以!首先要相信,只有你想不到,沒有你做不到。vc博大精神。現在就說一下我的思路 1 首先要遠端注入,因為這是跨程序的訪問資料,因此,如果不注入的話,是很難從一個程序直接訪問另一個程序的空間的,因為每個程序都有自己私有的4g空間。注入的方法很多,不說了。2 列舉所有的瀏覽器子視窗。enumchild...