1樓:寂靜深闌斜
簡要說說。
8.先通過彈出的對話窗,把值賦給x,然後根據iif()語句給y賦值。這段程式中,iif(x>=0,1-2*x,1+x)語句是先判斷x>=0是否為真,如果為真,則將1-2*x的值賦給y,否則賦1+x的值。
最後列印出y的值,所以x的值為3的話,列印結果為-5。
9.這段程式呢是個do until的迴圈體,先執行迴圈語句i=i+3:x=x+5,再判斷是否達到退出迴圈條件i>7。
開始被賦值12,執行完迴圈語句後i為15,x為12,滿足退出迴圈條件。退出迴圈後,i和x的值就被輸出到文字框中,即為15、12。
10.先通過int(rnd()+4)給x賦值。首先rnd()這個函式是產生0到1之間的某個小數(包括0),int()這個函式是取乙個數的整數部分,所以int(rnd()+4)結合使用產生的值是4,並賦給了x。
然後select case x語句根據x的取值來決定輸出是什麼,由於x為4,所以輸出case 4下面跟著的一條語句print 「good」,列印結果為good。
11.這也是個迴圈體,do while型,但它是先進行條件判斷,滿足條件再執行迴圈語句。x最開始賦值為0,滿足x<60,進入迴圈,執行一遍x=(x+3)*(x+4)和n=n+1(這裡n沒有賦初值,我就預設為0啦)後,x為12,n為1。
然後接著進行條件判斷,仍然滿足x<60,所以再執行一遍迴圈語句,之後x為240,n為2。然後再判斷條件,x<60不滿足,所以就退出迴圈。再把n、x的值輸出到文字框1、2(str()函式是把乙個數值量變為乙個字元量),再把x+n的值輸出到文字框3。
所以三個框的值依次為2、240、242。
12.x先賦值為869,然後執行a=x mod 10,mod 為取餘數運算,x mod 10即為x除以10後的餘數),a=9。然後b=(x mod 100)\10,這裡\為取商運算,x mod 100結果為69,69除以10後商為6,所以b為6。
最後c=x\100,即為8,之後文字框2輸出a*100+b*10+c,結果為968。所以這段程式就是把輸入的乙個三位數倒著輸出去。
注意下次別一次問5個題。。。會累死答題的。
五道vb程式分析題,答案有,求大神給分析一下程式過程,急! 40
2樓:金華阿呆
8、輸入乙個數x,如果x>=0,則y=1-2*x,bai否則的du話y=1+x
9、迴圈,直到i大於
zhi7,每次迴圈i增加3,x增加5
10、rnd函式是返dao回乙個0—1之間的隨機數專,屬所以取整後x為4(只取整數部分),輸出結果必為good
11、迴圈,每一次迴圈x=(x+3)*(x+4),n為迴圈次數,迴圈直到x>=60為止,輸出n,x及和
12、x為字元框內數字,a為x除10求餘,b為x除10求餘後再除以10,c為x除100,因為均為整數型,所以最後結果都必須取整(四捨五入)
分析vb程式結果
3樓:匿名使用者
第6題首先s是乙個靜態變數,初始值為0,第一次輸入6,6>5,所以執行語句s = s + x,得到text的值為6
第二次輸入5,執行語句s = s + x,因為s為靜態變數,此時的s=6,得到text的值為11,依此類推做下去就可以了,第三次輸入4,執行語句s = s * x,得到結果為44,第四次輸入3,執行語句s = s + x,得到結果為132.
第7題private sub command1_click()
dim a(2 to 7) as integer
dim b as integer
for b = 2 to 7
a(b) = b 『從這條語句可以看出,a(2)=2,a(3)=3......a(7)=7
next b
text1.text = a(b - 2) 』此時的b=8,即求a(6)的值,為6
end sub
第8題y = iif(x >= 0, 1 - 2 * x, 1 + x) 輸入3,x>=0為真,輸出的值為1-2*x,即 -5
iif(expr, truepart, falsepart)
expr 用來判斷真假的表示式,如為真,則返回值為第二個引數,為假,返回值為第三個引數。
第9題dim ias integer, a as integer
k = 0
for i= 1 to 6
ifi>3 then 『判斷a是否大於3,大於3則a+5,小於等於3則a+2
a = a+ 5
else
a = a+ 2
end if
next i
printi, a
這道題簡單點說就是:a+5執行3次,a+2執行3次,得到最終結果為21
第10題
這個很簡單
1 2 3 4 5
6 7 8 9 10
4樓:92豬哥
6、s= 132 7、6 8、-5 9、9 21
10、1 2 3 4 5
6 7 8 9 10
【高分】5道vb程式題目,有勞各位幫忙解答一下
5樓:
1.private sub form_click()
x = 5
for i = 1 to 20 step 2
x = x + i \ 5
next i
print x
end sub
單擊窗體,將5作為初始值給x,然後以i為計數進行迴圈,從i=1迴圈到i=20,每迴圈一次i+2(這個是關鍵),就是一共迴圈10次,這10次中i分別為1,3,5,7,9,11,13,15,17,19
每次迴圈x=x+i\5
第一次迴圈x=5+1\5
第二次迴圈x=5+1\5+3\5
以次類推 10次之後x=5+5/1+5/3+...+5/19
算出來x=21
2.private sub form_click()
for i = 1 to 4
x = 4
for j = 1 to 3
x = 3
for k = 1 to 2
x = x + 6
next k
next j
next i
print x
end sub
這道題有3個迴圈過程,迴圈的開始順序是從外往裡,當最裡面的迴圈結束後重複次裡面的迴圈,然後重複再次裡面的迴圈...一直到最外層迴圈結束.我們拆開來看
先迴圈i,i=1的時候x=1,這時候進入第二個迴圈
再迴圈j,i=1,j=1的時候x=3
最後迴圈k,i=1,j=1,k=1的時候x=x+6,即x=9
k需要迴圈2次結束,i=1,j=1,k=2時x=x+6=9+6=15
因為k是最裡面的迴圈,所以k迴圈結束後應該結束迴圈次裡面的j
j需要迴圈3次,每次j的迴圈都包括了2次k的迴圈
i=1,j=2,k=1時x=9
i=1,j=2,k=2時x=15
i=1,j=3,k=1時x=9
i=1,j=3,k=2時x=15
j迴圈完了之後是i的迴圈,依次類推
但是這道題目由於i和j的迴圈過程都包含了賦值,所以i和j的迴圈就可以忽略了,因為不管你之前怎麼迴圈,最後一次迴圈都會重新賦值給你剛才迴圈運算出來的數,所以我們只要迴圈k就行了
最後的結果是15,不知道lz的21是怎麼出來的-.-
3.private sub form_click()
a = 0
for i = 1 to 2
for j = 1 to 4
if j mod 2 <> 0 then
a = a + 1
end if
a = a + 1
next j
next i
print a
end sub
又是雙迴圈的題目,i=1,j進行1-4的迴圈
第二句a=a+1寫在if判斷之外,意為無論判斷結果如何a都要在原基礎上+1,迴圈4次即a一共要在if判斷的基礎上+4
if判斷之內的a=a+1則是滿足判斷條件"j能整除2"時候才執行的
j=1,3時無法整除2.a分別等於1,2
加上前面無視判斷的+4,a等於6
然後i=2,進行第二次迴圈,過程與第一次完全一樣
最終結果是12
4.private sub form_click()
dim a(5)
for i = 0 to 4
a(i) = i + 1
t = i + 1
if t = 3 then
print a(i)
a(t - 1) = a(i - 2)
else
a(t) = a(i)
end if
if i = 3 then a(i + 1) = a(t - 4)
a(4) = 1
print a(i)
next i
end sub
執行過程很簡單,先對i進行迴圈,在每一次迴圈中賦值給陣列a(5)中對應的元素(第1次迴圈則a(0)=1,第2次則a(1)=2,依次類推),在對陣列a的賦值完成後,對t進行賦值,t的值和對應的a的值是一樣的
這個步驟完了之後對t進行判斷,如果t=3的話(i=2時t=3)就列印對應的a(2),並且在列印完後讓a(2)=a(i-2)=a(2-2)=a(0)=1;如果t≠3,則a(t)=a(i)
這樣判斷完了之後判斷i,如果i=3的話則a(4)=a(t-4)=a(0)=1
在以上各項都進行完了之後賦值,讓a(4)=1並列印a(i)
注意過程中有兩個列印步驟,乙個需要判斷乙個是隨迴圈就列印不用判斷的
i=0時列印出a(0)=1
i=1時列印出a(1)=2
i=2時先列印出滿足判斷的a(2)=3,再列印判斷後經過重新賦值的a(2)=1
i=3時列印出a(3)=4
i=4時列印出重新賦值過的a(4)=1
最後就以12
3141
的形式出現了
5.option base 1
dim a() as integer, m as integer
private sub command1_click()
m = inputbox("請輸入乙個正整數")
redim a(m)
end sub
private sub command2_click()
m = inputbox("請輸入乙個正整數")
redim a(m)
end sub
option base是定義陣列預設下界的乙個功能,題目中的語句option base 1即意思為你定義的陣列序號是從1開始的,如a(1).a(2),...
單擊command1後輸入10,則定義了乙個陣列a(10),包括了從a(1)到a(10)的十個元素.
單擊command2後重新定義了陣列a,剛才定義的10個元素全部被釋放掉了,重新定義出來乙個陣列a(5),包括從a(1)到a(5)的5個元素.
(這道不一定對哦~很理論的..):)
五道解方程,五道解方程附答案
大哥,你能把問題寫清楚了麼,就像問題一,它求什麼啊。五道解方程附答案 一 5道解方程題。4 5 x 7 3 2x 1 3 2 3 1 3 8 x 33 8 4x 5 3 7 35 3 4 5 x 3 10 二 5道簡便運算題。三 5道三步計算題。五道解方程帶答案 方程 1 48 4x x18 2 5...
五道爺是什麼神
五道爺是從陽間通向陰間的一個執事。在人們去世以後,死亡人的家屬們都會去村子外面的五道廟裡面為已經死去的人燒到頭紙,也被叫做是燒買路錢,意思是向死者宣告他在陽間的生活已經結束,並且正式向陰間的五道爺去報道。五道爺在接收到來自死者的報告以後再轉報給自己的上級城隍爺,並且說明有一個陽間的子民來到了陰曹地府...
胡說為什麼不是三道五道,而是八道呢
八道,即八正道,一稱八聖道 為佛教三十七道品中的一類。它主要論述通向涅磐的八種正確方法和途徑。而聽不懂佛法,又看不懂佛文的人,把胡人講解佛經說成是 胡說八道 胡說八道是乙個漢語成語,拼音是h shu b d o,胡,中國古代對西 北部少數民族的稱呼,亦指胡僧。後來 胡人來說八道經 就指人沒根據的瞎吹...