Le mot le plus long

Soyez le premier à donner votre avis sur cette source.

Vue 3 795 fois - Téléchargée 678 fois

Description

Bonjour à tous,

Ceci est mon premier code VB.net.

C'est une petite application qui permet de générer un tirage de lettres aléatoires ou d'entrer un tirage manuel,
Puis de rechercher les solutions parmi les mots dans le dictionnaire embarqué.

La recherche est limitée à 600 mots par catégories (3 lettres, 4 lettres, etc.).

Il est basé sur un projet que nous menons en commun sur VBA/Excel sur la réalisation d'un jeu
de lettres. Si cela vous interresse, les discussions autour du projet sont disponibles là http://codes-sources.commentcamarche.net/forum/affich-10019292-vba-excel-recursivite-jeu-du-boggle

Comme il s'agit de mon premier code VB.net, n'hésitez pas à mettre des commentaires ou des suggestions,
notamment sur les parties où je ne suis pas assez .net mais encore resté trop VB6/VBA,
ou s'il existe du "tout cuit" qui pourrait simplifier le code ou en améliorer la performance.

Merci d'avance.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
3
Date d'inscription
jeudi 5 janvier 2017
Statut
Membre
Dernière intervention
7 janvier 2017

Bonjour,
Effectivement, cette solution fonctionne parfaitement. J'ai eu beau chercher dans le code, mettre en débeugage complet, je n'ai pas compris ce qui ce passait. Même en rajoutant un control dans le formulaire et en le supprimant de suite, le beug est là. A suivre .... Merci pour tes recherches et ton aide
Messages postés
14777
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
25 septembre 2020
435 >
Messages postés
3
Date d'inscription
jeudi 5 janvier 2017
Statut
Membre
Dernière intervention
7 janvier 2017

De rien, c'est le premier code .Net de Carl.
Et il est complètement emprunt de VB6. Il y a peut être un truc qui se marche sur les pieds à cause de ça.

Par exemple, il accède aux contrôle du formulaire en écrivant la forme Shared (par exemple ici (Formulaire.DataGridView_Solutions) alors qu'il faudrait utiliser la référence de l'instance en cours.
Messages postés
3
Date d'inscription
jeudi 5 janvier 2017
Statut
Membre
Dernière intervention
7 janvier 2017

Merci pour ta réponse. En fait, dès que je rajoute quoique que ce soit sur la form principale, l'application se plante dès le chargement. C'est- vrai que ce n'est pas très important de rajouter un bouton "quitter", mais j'essaie de comprendre pourquoi il y a cette erreur d'index dans la fonction "effacer" alors que j'ai rien rajouté d'autre, même pas de code pour ce bouton.
Messages postés
14777
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
25 septembre 2020
435 >
Messages postés
3
Date d'inscription
jeudi 5 janvier 2017
Statut
Membre
Dernière intervention
7 janvier 2017

Ça passe par cette méthode qui doit effacer le datagridview alors que celui-ci n'est pas rempli

il suffit de remplacer la boucle comme suit
        'Effacer les résultats
        For i = 1 To Formulaire.DataGridView_Solutions.Rows.Count - 1
            For j = 1 To 8
                Formulaire.DataGridView_Solutions.Item(j - 1, i - 1).Value = ""
            Next j
        Next i


Par contre ce que je ne m'explique pas, c'est que ce bug n'apparait pas tant que l'on a pas touché au formulaire.

J'ai essayé plusieurs fois....
Messages postés
3
Date d'inscription
jeudi 5 janvier 2017
Statut
Membre
Dernière intervention
7 janvier 2017

Bonjour,
Je viens de télécharger ce projet et il fonctionne parfaitement. Par contre, j'ai voulu rajouter un bouton "Quitter" et là, le programme plante à l'exécution sur un problème d'index dans la fonction effacer_grille. J'ai essayé de mettre l'option stricte à on, mais là, j'ai des erreurs de compilation.
Afficher les 21 commentaires

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.