Erreur Tentative de division par zéro.

miska59 - 21 avril 2017 à 20:03 - Dernière réponse : NHenry 14128 Messages postés vendredi 14 mars 2003Date d'inscriptionModérateurStatut 16 avril 2018 Dernière intervention
- 21 avril 2017 à 20:39
Bonsoir,

le but de ce programme c'est entrer un mot , il m'affiche avec des chiffres du mot.

voici le code :
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        For i = 48 To 57
            str_list.Add(i)
        Next
        For i = 97 To 122
            str_list.Add(i)
        Next
        For i = 65 To 90
            str_list.Add(i)
        Next
        For i = 1 To 1000000000000
            If TextBox1.Text = bruteForce(i, str_list) Then
                TextBox2.Text = i
            End If
        Next
    End Sub

    Private Function bruteForce(ByVal position As Integer, ByVal list As List(Of String)) As String
        Dim ModList As New List(Of Decimal)
        Dim lecture As String = ""
        While position >= 0
            <gras>ModList.Add(position Mod list.Count)</gras> ' erreur Tentative de division par zéro.
            position -= position Mod list.Count
            position /= list.Count
            position -= 1
        End While
        For a = ModList.Count - 1 To 0 Step -1
            lecture += list(ModList(a))
        Next
        Return lecture
    End Function


Pouvez-vous me dire pourquoi m'affiche ceci dans ModList.Add(position Mod list.Count) , il m'afficher ce message.
merci de votre réponse
Afficher la suite 

1 réponse

Répondre au sujet
NHenry 14128 Messages postés vendredi 14 mars 2003Date d'inscriptionModérateurStatut 16 avril 2018 Dernière intervention - 21 avril 2017 à 20:39
+1
Utile
Car list est vide donc list.Count=0
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de NHenry

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.