ik moet alle gehele delers bepalen van een getal dat ik ingegeven heb?
ik denk dit op te lossen met een for-lus maar het lukt me niet?
Wil of kan iemand mij helpen?
huidige code (niet werkend)
Public Class Form1
Private Sub cmdGeheleDelers_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdGeheleDelers.Click
Dim getal As Integer = (txtgetal.Text)
Dim teller As Integer = 1
For i = getal / 2 To 1
If getal Mod i = 0 Then
Dim geheledeler As Integer
geheledeler = getal / teller
txtgeheleDelers.Text = geheledeler & vbNewLine
teller += 1
End If
Next
End Sub
End Class
ik denk dit op te lossen met een for-lus maar het lukt me niet?
Wil of kan iemand mij helpen?
huidige code (niet werkend)
Public Class Form1
Private Sub cmdGeheleDelers_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdGeheleDelers.Click
Dim getal As Integer = (txtgetal.Text)
Dim teller As Integer = 1
For i = getal / 2 To 1
If getal Mod i = 0 Then
Dim geheledeler As Integer
geheledeler = getal / teller
txtgeheleDelers.Text = geheledeler & vbNewLine
teller += 1
End If
Next
End Sub
End Class