1樓：匿名使用者
private sub command1_click()if cint(text1.text) mod 2 = 0 thenmsgbox "文字框內的數值為偶數！", , "提示"
else
msgbox "文字框內的數值為奇數！", , "提示"
end if
end sub
private sub command2_click()dim a as integer
action1:
randomize
a = cint(rnd * 100)
if a < 1 or a > 100 thengoto action1
end if
text2.text = a
'text1.text = text2.text '該**開啟後，直接將生成的隨機數輸出到text1
end sub
2樓：匿名使用者
1.dim a as integera=text1.text
if a mod 2 = 0 thentext2.text="是偶數"
else text2.text="是奇數"
end if
編寫一個程式，判斷任意輸入的整數的奇偶性。
3樓：匿名使用者
整數的奇偶
來性？是判斷數字是奇數還源是偶數嗎？
只要除以2餘數為0的就是偶數，不為0就是奇數。也不知道你是要哪種語言程式設計，簡單寫下：
t= x mod 2 //x是輸入的整數，t用來存放餘數 這條也可以直接寫到if的判斷條件裡去，就省一行**了
if(t) 輸出「這是一個奇數」
else 輸出「這是一個偶數」
4樓：匿名使用者
不知道你用的什麼語言，只要判斷下，輸入的整數除了0以外的數，對2取模是否為0就好了！
5樓：匿名使用者
這個就一個ｉｆ判斷就可以了呀
ｉｆ（ ｉ％２＝＝０）ｅｌｓｅ
6樓：匿名使用者
以下示例是用c++編的#includeusing namespace std;void main()
7樓：polaris北斗
c語言bai的du？zhi
#include
void main()
VB程式求幫忙，求大神幫忙一個超級簡單VB程式程式碼編寫 跪求！
用timer控制元件,設interval 1000然後在事件處理過程中檢查 if second now 0 then 0秒 end if if minute now 59 then 59分 end if 如果用do迴圈,會霸佔cpu資源,結果就想當於死迴圈.dim mytime mytime tim...
怎麼高效完成作業謝謝了，大神幫忙啊
阿k丶 怎樣幫助孩子提高學習效率 心理學家研究發現，學習時間長並不等於學習效果就好，要提高學習效率，就要先了解孩子的學習心理規律，處理好學與玩的關係。在休息日，我們經常可以看到家長抱著望子成龍的心理，送孩子去上各種各樣的學習班，孩子們幾乎沒有時間自由自在地玩耍。有個孩子叫小龍，天資聰穎，家長覺得光在...
怎樣懲罰老師？謝謝了，大神幫忙啊
手機使用者 這多半取決於你家長的態度 如果小朋友你的父母親有法律意識，學歷 素質較高 並且夠開明 你可以直接跟他們反應這個問題讓他們幫助你伸張正義。要知道，老師打學生是我國法律明令禁止的！我國 未成年人保 第13條第2款規定 學校應當關心 愛護學生 對品行有缺點 學習有困難的學生，應當耐心教育 幫助...