vb程式設計輸入月份,輸出正確的季節,用迴圈語句。 2冬季,5為春

2022-05-31 23:05:27 字數 3632 閱讀 9345

1樓:旅初彤

private sub command1_click()

label3.caption = ""

dim month as integer

if text1.text = "" then

msgbox "請輸入月份!"

else

if val(text1.text) > 12 or val(text1.text) < 1 then

text1.text = ""

msgbox "你輸入的月份不合法!"

else

for i = 1 to val(text1.text)

if val(text1.text) = 12 or val(text1.text) = 1 or val(text1.text) = 2 then

label3.caption = "冬"

else

if val(text1.text) = 3 or val(text1.text) = 4 or val(text1.text) = 5 then

label3.caption = "春"

else

if val(text1.text) = 6 or val(text1.text) = 7 or val(text1.text) = 8 then

label3.caption = "夏"

else

if val(text1.text) = 9 or val(text1.text) = 10 or val(text1.text) = 11 then

label3.caption = "秋"

end if

end if

end if

end if

next i

end if

end if

end sub

編寫vb程式 輸入一個月份,輸出季節(春夏秋冬) 謝謝大佬 就詳解

2樓:二哥哥

給你說下思路吧;

接收控制檯輸入的月份(1-12之間);

寫一個while迴圈,判斷這個輸入的數字是幾,如果是1,輸出春,結束迴圈;如果是2,輸出春,結束迴圈;......如果是12,輸出冬,結束程式;for迴圈也是可以的,那麼就是判斷輸入的數字是在哪個範圍內,假設是1-3中的的一個,輸出春....

vb程式設計共12題,高手請進,做完後有賞分

3樓:匿名使用者

題目太多,分數太少.....

如果每道題目50分的話,pm給我你的郵箱

4樓:匿名使用者

汗 樓上的 還真的做的..真有這閒情

5樓:匿名使用者

=.=很嚇人。沒時間做

6樓:匿名使用者

不知道樓主到底拿這些題來做什麼.

暑假作業??

vb程式設計s=1+(1+2)+(1+2+3)+(1+2+3+4)+...+(1+2+3+4+...+n)用for單迴圈求前30項的和

7樓:匿名使用者

vb程式設計

程式設計是編寫程式的中文簡稱,就是讓計算機為解決某個問題而使用某種程式設計語言編寫程式**,並最終得到相應結果的過程。

為了使計算機能夠理解人的意圖,人類就必須要將需解決的問題的思路、方法、和手段通過計算機能夠理解的形式告訴計算機,使得計算機能夠根據人的指令一步一步去工作,完成某種特定的任務。這種人和計算機之間交流的過程就是程式設計。

程式設計:設計具備邏輯流動作用的一種逗可控體系地【注:程式設計不一定是針對計算機程式而言的,針對具備邏輯計算力的體系,都可以算程式設計】

例子:①比如編寫一段**程式②編寫一個控制裝置體系。

vb程式設計。輸入整數n,計算1!+2!+3!….+n!的值,並在窗體上輸出。要求分別用for,while 兩種迴圈實現

在c語言中 語句 printf("%d%d%%d%d",1+2,5/2,-2*4,11%3)是怎樣運算的

8樓:匿名使用者

先算1+2=3,這個沒什麼要說的

再計算 5/2=2(整型數與整型數計算,結果也為整型數.5/2=2.5,取整得2)

再計算 -2*4=-8,這個也沒什麼要說的

最後 11%3=2(11/3取餘數) 關於取餘計算.我想說一下,就是隻有整型數才能進行取餘計算. 特殊情況,如果m小於n,m%n=m.

輸出框輸出的是32-82(沒有空格)

還想說一下關於printf的問題.就以本題為例.如果%d的個數少於輸出項的個數,則多餘的項不輸出.如果%d的個數多於輸出項的個數.則多項的%d會輸出不定值.

還有,就是printf是按從左向右的順序輸出的.但是輸出項部分.是以從右向左的順序運算的.

也就是說.本例中.是先運算11%3=2,最後運算1+2=3,但是輸出時,還是自左向右.

這點需要注意...(函式引數的計算順序是自右向左)

關於習題嘛.我覺得你到書店裡買一本好點的二級習題就可以了.最重要的是反覆的做,自己總結知識點.不然.做再多的習題,也沒有用.

祝你成功!

9樓:匿名使用者

在函式裡,引數是從右向左進行的

int a=5;

printf("%d %d",a,++a);

結果是6 6

注意:在某些編譯器中是從左向右

vb程式設計題設計程式求s=1/2+3!/4+......+(n-1)!/n 的值並輸出,其中n是從鍵盤輸入大於1的正整數 5

10樓:

function out(n)

for i=1 to n

baiout=out+cj(i-1)/i

next

end function

function cj(n)

for i=1 to n

cj=n*i

next

end function

for n=1 to 5

隨便du寫的

zhi 對不對不曉dao得回

你自己答算

11樓:李清塵

private b,n as intergerprivate function jc(m as interger) as interger

jc = 1

if m > 1 then

for i = 1 to m

jc = jc * i

next i

end if

end function

private sub text1_keydown(keycode as integer, shift as integer)

n = text1.text

if keycode = 13 then

for j = 1 to n

b = b + jc(j) / j

next j

end if

msgbox b , vbok + vbinformation , "輸出"

end sub

用vb程式設計任意輸入數輸出其中最大值

private sub command1 click a val inputbox 請輸入第一個數 b val inputbox 請輸入第二個數 print 你輸入的數分別是 a 和 bprint 其中較大數是 if a b then print a else print b end if end ...

VB,輸入一段英文,根據出現頻率的高低輸出出現前五的單詞

這些英文是用空格隔開的麼?dim zimu 26 b 26 as integer,str as string dim a as byte,temp as integerstr lcase textbox1.text for i 1 to 26 zimu i 0 next for i 1 to len...

程式設計序,輸入實數x的值,按下列公式計算並輸出y值解方程

include using namespace std int main else else cout include double fun double x for test int main 編一個程式,輸入實數x的值,按下列公式計算並輸出y值 include double fun double...