Dim n As Integer
Private Sub Form_Click()
If n / 2 = 0 Then
Print "n是偶數(shù)"
Else
Print "n是奇數(shù)"
End If
End Sub
Private Sub Form_Load()
n = InputBox("請輸入整數(shù)：")
End Sub
二、 編寫一個VB函數(shù)過程,用以判斷一個數(shù)是奇數(shù)還是偶數(shù)
二、 編寫一個VB函數(shù)過程,用以判斷一個數(shù)是奇數(shù)還是偶數(shù)
數(shù)學(xué)人氣：255 ℃時間：2019-10-27 03:15:49
優(yōu)質(zhì)解答
我來回答
類似推薦
- 二、 編寫一個vb函數(shù)過程,用以判斷一個數(shù)是奇數(shù)還是偶數(shù).
- vb中求1-100之間的偶數(shù)和奇數(shù)還有能被3和5同時整除的數(shù)的程序應(yīng)該怎么編寫
- VB:產(chǎn)生30個1-100之間的隨機數(shù),統(tǒng)計并輸出其中奇數(shù)和偶數(shù)的個數(shù)
- 用VB 求 1到100的奇數(shù)和 和 偶數(shù)和的函數(shù)怎么寫
- 用VB寫出1-100的所有奇數(shù)和偶數(shù)和
- can you speak English中文什么意思
- 兩個容器,一個容器為15升,另一個為8升,如何利用他們從一桶油中倒出6升來?
- Idon't is.pig翻譯成中文
- 幾個俗語的意思或者是它比喻什么?
- -8x的立方=27 解方程
- It's a good idea for sb to do sth.所有知識點
- It is not difficult to get to school 為什么既有be動詞又
猜你喜歡
- 1請各位英語高手幫我總結(jié)下各類詞的用法：
- 2英語中的狀語和語文中的狀語用法一樣嗎?
- 3一物體在一高度釋放,若在下落的一瞬間被子彈擊中,其落地時間與自由下落時相同；若在下落到一半高度時被擊中,時間要變短,為什么?
- 4直徑5mm 長度2500mm的黃銅求重量
- 5The little boy wants a white T-shirt.改為一般疑問句
- 6奧數(shù)題（移動一根火柴棒）
- 7“裁”字查字典去掉部首查幾畫
- 8某電器商場原有電視機和洗衣機工720臺,電視機售出1/2后,剩下的電視機和原有洗衣機
- 9誰能找一篇找一篇簡單一點的2分鐘左右的英語新聞
- 10一千萬加一千萬等于幾
- 11方程x平方－2根號2x+2=0
- 12解方程:5分之19乘5分之21-4x=25分之139