導讀 關于vb編寫100至999的水仙花數，vb水仙花數編程這個問題很多朋友還不知道，今天小六來為大家解答以上的問題，現在讓我們一起來看看吧！1、
關于vb編寫100至999的水仙花數，vb水仙花數編程這個問題很多朋友還不知道，今天小六來為大家解答以上的問題，現在讓我們一起來看看吧！
1、首先雙擊桌面圖標啟動 visual basic 6.0。
2、2、然后新建工程，選擇標準EXE。
3、3、選擇完工程后，點擊打開，就可以新建一個exe工程了。
4、4、然后雙擊 FORM1 窗體，在彈出的代碼窗體中復制該代碼到 Form_Click() 事件中。
5、5、代碼：If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Thenn = n + 1If (n Mod 5) = 0 ThenPrint a & b & cElsePrint a & b & c,End IfEnd IfNext cNext bNext aPrint Chr(13) & Chr(13) & "三位數中水仙花數個數為" &n。
6、最后運行這樣就完成了。
本文分享完畢，希望對大家有所幫助。
標簽：
免責聲明：本文由用戶上傳，如有侵權請聯系刪除！