把100 300之間所有可以被7整除的數,在窗體上顯示出來

2021-12-28 07:07:12 字數 4128 閱讀 9471

1樓:墨爾本冰

private sub command1_click()dim i as integer

for i = 100 to 300

if i mod 7 = 0 then

print i

end if

next

print

end sub

你必過,必須的!

2樓:匿名使用者

private sub command1_click()for i = 100 to 300

if i mod 7 = 0 then me.print inext

end sub

step 7肯定不行的

3樓:

for i = 105 to 300 step 7if i mod 7 = 0 then

console.writeline(i)

end if

next

//我這個效率比樓上的快80%.因為少迴圈很多次,哈哈

4樓:錘子錘子大錘頭

for i as integer = 100 to 300if i mod 7 = 0 then

label1.text += i.tostring() & " "

end if

next

計算100~300之間所有能被3和7整除的數之和如何用vb書寫

5樓:影者東昇

private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.

click

dim sum as integer

sum = 0

dim i as integer

for i = 100 to 300

' 如果能被3整除且被7整除,則累加

if 0 = i mod 3 and 0 = i mod 7 then

sum = sum + i

end if

next i

msgbox(sum)

end sub

6樓:匿名使用者

for i=100 to 300

if n mod 3=0 and n mod 7=0 thensum=sum+n

end if

next

vb 程式設計 計算100~300之間所有能被3和7整除的數之和,求**

7樓:匿名使用者

sum = 0

for i = 100 to 300

if i mod 21 = 0 then

sum = sum + i

end if

next

==>優化一點:

sum = 0

for i = 100 to 300

if i mod 21 = 0 then

sum = sum + i

i = i + 20

end if

next

vb程式設計題:單擊窗體,在窗體上顯示1~200之間既能被5整除又能被7整除的數的和

8樓:匿名使用者

private sub form_click()dim i as long, a as longa = 0

for i = 1 to 200

if i mod 5 = 0 and i mod 7 = 0 then

print i

a = a + i

end if

next

print "以上是同時被5和7整除的數,和=" & aend sub

9樓:精樸電池

' 單擊窗體函式裡面的**:

dim i as integer ' 從1~200dim count as integer ' 儲存所求的和for i=1 to 200

if (i mod 5 = 0) and (i mod 7 = 0) then

count = count + i

end if

next i

10樓:

for迴圈1到200,執行除5為ture再除7 ,ture就壘加到變數裡。

**就不給了,很簡單。

編寫vb程式段求200-300之間既能被3整除又夢被7整除的數,並求出所有數之和存入

11樓:小李無刀

dim a as integer

a=0for i=200 to 300

if int(i/3)=i/3 and int(i/7)=i/7 then

a=a+i

end if

next

msgbox a

12樓:魚魚

private sub form clickodimi as integer,sum as integersum=0

for i=200to 300

if i mod3=0 and i mod 7=0 thenprint i

sum=sum+i

end if

next

print sum

end sub

vb程式設計單擊窗體,求200到300之間既能被3整除又能被7整除的數

13樓:喜歡種蘑菇

private sub form_click()

dim i as integer

for i = 200 to 300

if (i mod 3 = 0) and (i mod 7 = 0) then print i

next i

end sub

擴充套件資料:

vb基本特點:

1、vb 的中心思想就是要便於程式設計師使用,無論是新手或者專家。vb使用了可以簡單建立應用程式的gui 系統,但是又可以開發相當複雜的程式。

vb 的程式是一種基於窗體的視覺化元件安排的聯合,並且增加**來指定元件的屬性和方法。因為預設的屬性和方法已經有一部分定義在了元件內,所以程式設計師不用寫多少**就可以完成一個簡單的程式。

過去的版本里面 vb 程式的效能問題一直被放在了桌面上,但是隨著計算機速度的飛速增加,關於效能的爭論已經越來越少。

2、窗體控制元件的增加和改變可以用拖放技術實現。一個排列滿控制元件的工具箱用來顯示可用控制元件(比如文字框或者按鈕)。每個控制元件都有自己的屬性和事件。

預設的屬性值會在控制元件建立的時候提供,但是程式設計師也可以進行更改。很多的屬性值可以在執行時候隨著使用者的動作和修改進行改動,這樣就形成了一個動態的程式。

舉個例子來說:窗體的大小改變事件中加入了可以改變控制元件位置的**,在執行時候每當使用者更改視窗大小,控制元件也會隨之改變位置。在文字框中的文字改變事件中加入相應的**,程式就能夠在文字輸入的時候自動翻譯或者阻止某些字元的輸入。

3、vb 的程式可以包含一個或多個窗體,或者是一個主窗體和多個子窗體,類似於作業系統的樣子。有很少功能的對話方塊視窗(比如沒有最大化和最小化按鈕的窗體)可以用來提供彈出功能。

4、vb 的元件既可以擁有使用者介面,也可以沒有。這樣一來伺服器端程式就可以處理增加的模組。

5、vb 使用引數計算的方法來進行垃圾收集,這個方法中包含有大量的物件,提供基本的物件導向支援。因為越來越多元件的出現,程式設計師可以選用自己需要的擴充套件庫。

6、vb 使得大量的外界控制元件有了自己的生存空間。大量的第三方控制元件針對 vb 提供。vb 也提供了建立、使用和重用這些控制元件的方法,但是由於語言問題,從一個應用程式建立另外一個並不簡單。

14樓:愛笑的無聊之氣

dim i as integer

for i = 201 to 300

if ((i mod 3)= 0 ) and ((i mod 7) = 0)

print (cstr(i))

sum=sum + i

end if

next

print sum

iPhone7怎麼把所有資料同步到iPhone

沒有這個功能,軟體之間有協議才可以同步交換資料 把7的資料備份在電腦上,在匯入到8 這個可以直接用icloud備份,用新手機登入icloud就可以了 新建備bai份可以把iphone6的所有資料du同步到iphone8,可以使zhi用itunes。2014年9月10日凌晨dao1點,蘋果秋季新品釋出...

1到10000之間能被5和7整除的數有多少個

5和7互質,所以能被5和7整除,則必然能被35所整除。所以 1到10000之間能被5和7整除的數有 285 個。能被5整除的2000 1 1999個 不包括10000的話 能被7整除的有1428個 10000 7取整 能被35整除的有285個。則1999 1428 285 3142個。在1 1000...

我被所有親戚還有父母輕視。他們把我當傻子。可以用什麼方法報復他們?他們歧視為什麼成了教我

既然這樣你為什麼還要跟他們呆在一起。長輩說你不是歧視你,他們是恨鐵不成鋼,有的家長是處於逆境激勵。但是因人而異,你要更努力才好,讓他們刮目相看 男孩女孩呀 怎麼會被輕視呢 被所有人看不起。我被所有親戚還有父母輕視。在親人沒有地位。他們把我當傻子。可以用什麼方法報復?不管你用什麼方法報bai復,只du...