女朋友的作業，我沒時間接觸VB，想請各位幫忙寫個小程式。
uj5u.com熱心網友回復：
設錄入為N從 for i = 1 to int(sqr(N)) 回圈處理
如果 N/i = int(N/i) 說明N能被i整除， 則 i 和 N/i 都是 N的因子，進行輸出 （注意i=N/i的情況），繼續回圈下一個直至結束
如果你用C，這件事情很簡單。
代碼就不給了，畢竟那是你的女朋友。
另外你的截圖里，既然1算其中一個因子，為毛45不算？
uj5u.com熱心網友回復：
主要是我也不會
uj5u.com熱心網友回復：
所以，問問題的時候就不要先把自己弄得很無辜的樣子，顯得你會，只不過是語言不通的問題。這就像在和朋友聊天的時候說：我有一個朋友balabalabala……你們覺得他應該怎么做。 一聽就知道這是說自己的事情，大家七嘴八舌識破不戳破而已。
uj5u.com熱心網友回復：
代碼:
Private Sub Command1_Click()
Dim colDivisors As New Collection
Dim i As Integer
For i = 1 To Text1 - 1
If Text1 Mod i = 0 Then
colDivisors.Add i
End If
Next
Label2.Caption = "共有" & colDivisors.Count & "個因子."
Text2 = ""
For i = 1 To colDivisors.Count
Text2 = Text2 & colDivisors(i) & " "
Next
End Sub
運行示例:
下載地址:
鏈接：https://pan.baidu.com/s/1Bvgp_Y0_jqFWKDJw7Nht6g
提取碼：bv95
uj5u.com熱心網友回復：
謹記大佬教誨。我承認是真的不會
uj5u.com熱心網友回復：
原來是非技術區的,玩笑而已.uj5u.com熱心網友回復：
會C語言的人不會VB，就好像開大卡車的司機說自己不會開小汽車一樣奇怪。我記得學C語言的時候，老師都會讓大家做一個Basic的解釋器。對于合格的C程式員，別說Basic了，做一個Basic的解釋程式都應該不是問題才對。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/35155.html
標籤：非技術類
上一篇：VB