用VB 求 1到100的奇數(shù)和 和 偶數(shù)和的函數(shù)怎么寫(xiě)
用VB 求 1到100的奇數(shù)和 和 偶數(shù)和的函數(shù)怎么寫(xiě)
用function去寫(xiě)
用function去寫(xiě)
其他人氣：330 ℃時(shí)間：2019-08-20 06:44:41
優(yōu)質(zhì)解答
在窗口上建立一個(gè)按鈕： Function Total(Num1, Num2) As String 'Num1 為奇數(shù)和 'Num2 為偶數(shù)和 For i = 1 To 100 If i Mod 20 Then Num1 = Num1 + i Else Num2 = Num2 + i End If Next Total = "奇數(shù)和：" & Num1 & " 偶數(shù)和：" & Num2 End Function Private Sub Command1_Click() Me.Print Total(a, b) End Sub
我來(lái)回答
類(lèi)似推薦
- 用VB寫(xiě)出1-100的所有奇數(shù)和偶數(shù)和
- 二、 編寫(xiě)一個(gè)vb函數(shù)過(guò)程,用以判斷一個(gè)數(shù)是奇數(shù)還是偶數(shù).
- 100以?xún)?nèi)的奇數(shù)和偶數(shù)之和代碼 VB
- vb中求1-100之間的偶數(shù)和奇數(shù)還有能被3和5同時(shí)整除的數(shù)的程序應(yīng)該怎么編寫(xiě)
- VB:產(chǎn)生30個(gè)1-100之間的隨機(jī)數(shù),統(tǒng)計(jì)并輸出其中奇數(shù)和偶數(shù)的個(gè)數(shù)
- what are your_relationship with Johnson,a man of humor?a.actual,b.real c.true.
- 把一個(gè)平行四邊形的底擴(kuò)大3倍,高擴(kuò)大2倍,得到的平行四邊形的面積是原來(lái)的多少倍?
- 丹麥屬于哪個(gè)國(guó)家
- 中國(guó)傳統(tǒng)的名山大川 其中的作文 順便寫(xiě)一篇這樣的作文 急須 快
- 五光十色指數(shù)字幾?、
- 英語(yǔ)翻譯
- 我的生日是8月30號(hào)用英語(yǔ)怎么說(shuō)?
猜你喜歡
- 1This lock cannot be .you need a key這句英文翻譯成中文是什么意思啊
- 2vegetable ago bag change gentle again go page按讀音分類(lèi) - - - - - - - -
- 3一個(gè)牧場(chǎng)上長(zhǎng)滿了牧草,牧草每天都勻速生長(zhǎng)地生長(zhǎng).這些牧草可供5只羊吃30天,或者可供7只羊吃20天.
- 4集合P＝{x|y＝x+1}，集合Q＝{y|y＝x?1}，則P與Q的關(guān)系是（ ?。?A.P=Q B.P?Q C.P?Q D.P∩Q=?
- 5形容忘記了吃飯和睡覺(jué)的成語(yǔ)有什么?
- 6在同一時(shí)間同一地點(diǎn)的樓高和影長(zhǎng) 成不成比例 并說(shuō)明理由
- 7使3x+5y=k+2和2x+3y=k成立,且xy的和等于12,求k的值
- 8怎么用天平測(cè)一個(gè)大頭針的質(zhì)量 和一杯食用油的質(zhì)量.一定要寫(xiě)具體步驟、兩個(gè)問(wèn)題分開(kāi)寫(xiě)
- 9與朱元思書(shū)中的奇山的特點(diǎn)是什么?
- 10紅領(lǐng)巾微心愿應(yīng)該寫(xiě)什么
- 11I read your article ___ the school magazine(介詞）
- 12我正在等一場(chǎng)地震把土豆從地里翻出來(lái),翻譯成英語(yǔ)