1樓：
private sub command1_click()dim i as integer, s as integer, n as integer
for i = 1 to 100
if i mod 5 + i mod 7 = 0 then n = n + 1: s = s + i
next
print "(1,100)之間同時被5和7整除的數的個數："; nprint "它們的和："; s
end sub
2樓：小羅哥
option explicit
dim k as integer
dim s as integer
dim d as integer
private sub command1_click()for k = 1 to 100
if k mod 5 = 0 and k mod 7 = 0 then
s = s + 1 『個數
d = d + k 』他們的和
end if
next
end sub
3樓：大偉話熱點
temp=o；j=o
for i = 1 to 100
if i mod 5 =0 and i mod 7 = 0then
next
print(temp)
print(j)
如何隨機取出1 100之間的數，如何隨機取出1 100 之間的乙個數
關於隨機數，請參看以下資料 rnd 函式 描述 返回乙個隨機數。語法 rnd number number 引數可以是任意有效的數值表示式。說明 rnd 函式返回乙個小於 1 但大於或等於 0 的值。number 的值決定了 rnd 生成隨機數的方式 如果 number 為 rnd 生成 小於零 每次...
vb程式設計 急求 隨機產生n個1 100之間的數（包含1和
新增乙個command控制項即可，如下 private sub command1 click dim a 5 z,s,max,min as integer print 生成的數字 for i 1 to 5 陣列裡面有5個不同數值a1,a2,a3,a4,a5，此處i的最大值n對應dim中的a n 可以...
交流輸出9v1100ma的變壓器可以用9v1000ma的變壓
倫鳳銘 這就要看變壓器的負荷需要多大的電流了。負荷電流小於1000ma時，可以代替 負荷電流大於1000ma時，變壓器小一點，屬於小馬拉大車，盡量不代替。9v 1000ma的變壓器可以代替3v 900ma的充電器嗎？ 買歡悅 充電器首先要看電壓是否一致，其次看最大充電電流，電壓不一致，超高的話會損壞...