1樓：匿名使用者
修改如下，請仔細對照，以從中感受知識與方法：
private sub command1_click()dim x as integer
dim sum as integer
dim i as integer
dim flag as boolean
dim n as integer
n = 0
sum = 0
x = 1000
dodebug.print x
flag = true
for i = 2 to x - 1
if x mod i = 0 then
flag = false
exit for
end if
next i
if flag then
sum = sum + x
n = n + 1
if n = 5 then
exit do
end if
end if
x = x - 1
loop while x >= 3
print sum
end sub張志晨
2樓：地對空飛毛腿
你還！做乙個素數的程式
應該會吧
做一一維陣列
n/2一直到/sqr(n)
求出所有素數
然後排序
隨便你從小到大還是從大到小
取最前面5個（或最後）
相加的結果是4919。
題庫管理系統的外文文獻，畢業設計要用。vb+sql····相關的外文文獻還有譯文··急急急
3樓：匿名使用者
這樣型別的文章 我知道怎麼寫 老師有問題 包修改 包通過
↓↓↓↓↓下面可以和我聯絡
vb:求解試題六，其中a=b:b=r:r=a mod b是什麼意思 答案是cdbb
4樓：
你的字很漂亮！
第一次單擊command1：
a = 28, b = 36
r = a mod b = 28 mod 36 = 28 這個應該沒有任何問題，r 就是整除之後的餘數。
那麼進入do迴圈：a = b，那麼a變成了36，b = r，那麼b變成了28，r = a mod b = 36 mod 28 = 8
因為r = 8<>0，所以迴圈繼續：
進入do迴圈後：a = b = 28, b = r = 8 , r =a mod b = 28 mod 8 = 4
因為r = 4<>0，所以迴圈繼續：
進入do迴圈後：a = b = 8, b = r = 4, r = a mod b = 8 mod 4 = 0
因為r=0，所以迴圈終止，最終f(m,n) = 4。
然而，因為引數a和b都是傳值傳遞，所以m,n的值不會受到function函式的兩個引數的影響，m=28,n=36
所以，第一問，答案是c，如果省略byval或者改成byref即，傳址傳遞，那麼a和b兩個引數就擁有了修改其他過程區域性變數值得功能，也就是m,n會隨著a,b的變化而變化。
所以，第二問，答案是d，而第三問答案是 4,8,4，答案是b
第四問，你再按剛才推算一遍即可：
m = 54,n = 42
r = 54 mod 42 = 12
a = 42 , b = 12, r = 42 mod 12 = 6
a = 12, b = 6 , r = 12 mod 6 = 0 結束
那麼f(54,42) = 6 , m = 12, b = 6
5樓：匿名使用者
:冒號用於將兩條以上的語句寫在一行上，這裡冒號只是多條語句的分隔符。
怎麼用vb程式設計題庫查答案
6樓：司馬刀劍
把題庫作為乙個字串，然後就是對字串的查詢處理問題了！可以使用index，left，right，mid等字串處理函式！
當輸入題目後，就在題庫字串中查詢匹配的題目，然後根據字元特徵碼提取答案出來就好了
計算機二級選擇題只出題庫裡面的題目嗎
計算機二級每年考試題目都是由題庫裡的題進行修改的，有些題目甚至一樣，考前你把書本大致的看下，多做幾套題，然後認真核對，把錯的地方弄懂，然後下模擬軟體熟悉下流程，基本都能過 hao大森 計算機二級每年考試題目都是由題庫裡的題進行修改的。全國計算機等級考試 nationalcomputerrankexa...
VB題目，求大佬解，vb題目求大佬解答
private sub form click dim j as long,i as long,t as string,t1 as string,t2 as string,s as string me.cls t 9 t2 space 8 s t2 t1 t t1 t2me.print s for j...
VB題目求大佬幫忙，VB題目求大佬幫忙
手機樂淘類人猿 都把人家大佬逼成什麼樣子啦！ 題目根本就看不清楚 不清楚，換高畫質。 這個 看不清楚，沒辦法幫您了 何秋秋奔跑吧 看不清，無法幫助你 看不清楚，愛莫能助 我覺得，對於愛情，沒必要太過講究，那更多是人生中的驚喜，有也好，沒也罷，最重要的還是陪伴。 旅瀾 emmmmmmmmmmmm 酷彥...