[Déplacé VB6 - VB.NET]Programme pour étude , Hasard ...Résolu

Question

Bonjour :-)

Je suis débutant en visual basic et jusqu'a maintenant j'ai toujours réussi a me débrouiller , Et je commence même a aider les plus débutant que moi ... 

Une amie m'a demander ( et malheureusement je lui refuse rien  ) 

si je pouvais creer un programme qui lui permettrais d'étudier le vocabulaire d'une langue étrangère ... 

Alors j'avais dans l'idée de creer , une première colonne qui contiendrais plein de textbox dans lequel elle insérerais les mot en français et une deuxiême colonne de textbox dans lequel elle insérerais les mot en anglais ( par exemple ) 

Bon jusque la c'est facile ...

Pour la suite je voudrais creer en bas de cette colonne , un label qui lorsque on clique sur un bouton , se transformerais en un des mots de la premiere colonne , au hasard bien entendu ... ( c'est ça que je ne sais pas faire ... ) et aussi que le programme vérifie que le mot correspond bien a son homologue anglais ... 

L'idéal serais que le programme propose de moins en moins les mots auquel on trouve facilement la réponse ... 

Un grand merci si vous pouvez m'éclairer :)

ucfoutu · Accepted Answer

Bonjour,
Quel que soit ton outil :
Il te faudra commencer par
- une base de données : un champ pour les mots français et un autre pour leur traduction.
Commence par cela.


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

Utilisateur anonyme · Answer

Bonsoir,

Je suis débutant en visual basic
Tu as posté dans la section vb6 du forum. C'est peut-être une erreur ?
vb6 est obsolète depuis 12 ans.

NB: Je pose cette question prudemment car j'ai eu un problème hier.

MRJulienROCK · Answer

Oh mince ... il s'agit en effet d'une erreur ... je vais recreer un poste dans la bonne section

MRJulienROCK · Answer

Bonjour , merci de m'avoir répondu malheureusement j'étais dans la mauvaise section ... 

J'ai creer les deux liste pour les base de donnée , sans problème , c'est après que je bloque ... Je me suis rendu sur une 20 aine de site différent sans trouver de réponse :s a tu une idée ?

Utilisateur anonyme · Answer

Un admin redirigera ce fil à la bonne place et supprimera le nouveau que tu as créé. 

Y a-t-il une correspondances entre les deux listes ?

ucfoutu · Answer

Ce ne sont pas des textboxes, qu'il te faut alors utiliser, mais, plus astucieusement, une listview (car permettent deux colonnes alors qu'une listbox n'en permet qu'une sous VB6)
Ensuite :
- dans la première colonne : les mots en français
- dans la seconde : leur traduction
- cache simplement la seconde colonne (largeur = 0)
commence par faire cela et reviens pour la suite.


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

ucfoutu · Answer

Ou encore un tableau à deux dimensions.
Mais d'où viennent donc les données, exactement ?


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

MRJulienROCK · Answer

En faite les donnée je ne les connais pas , l'idée serait que l'utilisateurs note lui même chaque mot en français et leurs traduction dans l'autre langue ... 

Après un mot de la colone serait tiré au hasard , et il faudrais noter la traduction , pour s'exercer ...

Utilisateur anonyme · Answer

Bonsoir ucfoutu,

Ce ne sont pas des textboxes, qu'il te faut alors utiliser, mais, plus astucieusement, une listview 
Si j'ai bien lu, c'est l'utilisateur qui doit saisir lui même les mots dans des 'textbox'.

et aussi que le programme vérifie que le mot correspond bien a son homologue anglaisCharger ces mots dans des contrôles est, me semble t-il inutile dans ce cas.

ucfoutu · Answer

Bonsoir, Banana32,
et comment alors faire cela ?
et aussi que le programme vérifie que le mot correspond bien a son homologue anglais ... 

Il faudra bien qu'existe une liste (ou un tableau) des mots et de leur traduction.
Ce que j'ai, moi, compris, c'est qu'il veut y tirer ensuite un mot français au hasard, demander à l'utilisateur la traduction et en vérifier l'exactitude (par rapport à la liste). 

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

NHenry · Answer

Bonjour, 

Un admin redirigera ce fil à la bonne place et supprimera le nouveau que tu as créé.
Banana32 est un devin :D

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

ucfoutu · Answer

Bonjour, NHenry,
Toi également si c'est toi qui a déplacé vers VB.Net 
A partir de quel indice qui m'a échappé ? 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

NHenry · Answer

Bonjour, 

Ucfoutu, nouveau (et défunt) message dans la catégorie .NET, c'est tout :)

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

MRJulienROCK · Answer

Lerci pour vos réponse !!! et encore désoler pour l'erreur , je vous join une capture d'écran de l'interface graphique de mon programme ...



Dans ce programme , j'aimerais que le Label 3 prennent le nom d'une des textbox au hasard  et le label 5 se transforme en Faux ou vrai en fonction de si l'utilisateur a bien mis la bonne réponse .

Utilisateur anonyme · Answer

NHenry  
On peut charger les mots dans un dictionary(of par exemple sans pour autant les afficher dans un contrôle. La clef étant le mot français et la valeur le mot anglais. La machine génère un nombre aléatoire compris entre 0 et la taille du dico - 1 et affiche la clef du dico correspondant à ce nombre. Lorsque l'utilisateur tape son mot, on compare la saisie avec la 'Value' du dico.

MRJulienROCK · Answer

Charger es mots dans un dictionnary ? explique le principe s-il te plait :-)

Utilisateur anonyme · Answer

Bon allez un petit exemple vite fait :
Option Strict On
Public Class Form1
    Dim rd As New Random

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Dim dico As New Dictionary(Of String, String)
        dico.Add("chat", "cat")
        dico.Add("chien", "dog")
        dico.Add("souris", "mouse")
        Dim alea As KeyValuePair(Of String, String) = dico.ElementAt(rd.Next(0, dico.Count))

        MessageBox.Show(alea.Key & Environment.NewLine & alea.Value)
    End Sub
End Class

MRJulienROCK · Answer

Ok super j'ai compris ...

Mais comment faire pour qu'il prennent un des mot du dictionnary au hasard ?

Utilisateur anonyme · Answer

Dans l'exemple alea.Key est le mot choisi au hasard dans le dico (exécute le code ci-dessus plusieurs fois tu comprendras)
Une fois la saisie terminée tu devras comparer cette dernière avec alea.Value

Remarque : j'ai choisi un dictionary parce que l'utilisateur peut aussi taper un mot français dans une zone. Il suffira de faire ceci pour trouver la traduction :
If dico.ContainsKey(mot_saisi) Then
      MessageBox.Show("traduction de " & mot_saisi & " => " & dico(mot_saisi))
End If

MRJulienROCK · Answer

Oui j'ai executer le logiciel et en effet , une msgbox apparait avec une case et son équivalent !!! 
Et au hasard en plus :) merci beaucoup je commence a comprendre ...

Mais est ce que je peux adapter ce code , pour que le label 3 se transforme au mot en français (au hasard) a ce moment la l'uilisateur devras noter la traduction , et ensuite le logiciel vérifie si la traduction est bonne ...

Utilisateur anonyme · Answer

Bon, je te donne un code tout fait (oui je sais il faut pas le faire) à tester avec un textbox1 et un label1.
Tu peut l'étudier et l'adapter ensuite à ton projet.
Option Strict On
Public Class Form1
    Dim rd As New Random
    Dim dico As New Dictionary(Of String, String)
    Dim solution As String
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        dico.Add("chat", "cat")
        dico.Add("chien", "dog")
        dico.Add("souris", "mouse")
        NouveauMot()
    End Sub

    Private Sub NouveauMot()
        Dim alea As KeyValuePair(Of String, String) = dico.ElementAt(rd.Next(0, dico.Count))
        Label1.Text = alea.Key
        solution = alea.Value
    End Sub

    Private Sub TextBox1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
        If e.KeyCode = Keys.Enter Then
            If TextBox1.Text = solution Then
                MessageBox.Show("bravo!")
            Else
                MessageBox.Show("pas bon!")
            End If
            TextBox1.Text = ""
            NouveauMot()
        End If
    End Sub

End Class

MRJulienROCK · Answer

Super merci à toi !!! 

je vais tester ça , l'étudier et le rajouter a mes notes concernant visual basic ... 

Je te tiens au courant :D

ucfoutu · Answer

Ce n'est toutefois pas au hasard que, faute d'une craie base de données, j'avais proposé l'utilisation d'une listview (qui, elle, permet d'enregistrer d'autres données).
Je suggère qu'on relise jusqu'au bout le tout premier message du demandeur, en particulier sa dernière phrase. 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

Utilisateur anonyme · Answer

@ucfoutu
en particulier sa dernière phraseJ'ai la fâcheuse tendance de lire en diagonale.

On peut faire avec une simple List(Of dans laquelle on ajoute des instances d'une classe (mais ceci sort d'une discussion pour débutants).

Mais je te laisse lui expliquer à ta manière. 

Voici quand même un code pour illustrer mon propos :
Option Strict On
Public Class Form1
    Dim rd As New Random

    Dim MaListe As New List(Of MaClasse)

    Dim solution As MaClasse

    'classe mots
    Public Class MaClasse
        Public MotFrancais As String
        Public MotAnglais As String
        Public Rang As Integer
        'bien sur, on peut rajouter des tas d'informations dans cette classe (nom, verbe, conjonction...)
    End Class


    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        'faire une boucle ici pour le chargement des mots
        'ici j'ajoute les mots manuellement dans MaListe
        MaListe.Add(New MaClasse With {.MotFrancais "chien", .MotAnglais "dog", .Rang = 0})
        MaListe.Add(New MaClasse With {.MotFrancais "chat", .MotAnglais "cat", .Rang = 0})
        MaListe.Add(New MaClasse With {.MotFrancais "souris", .MotAnglais "mouse", .Rang = 0})

        'premier mot à afficher
        NouveauMot()
    End Sub

    Private Sub TextBox1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
        If e.KeyCode = Keys.Enter Then
            If TextBox1.Text = solution.MotAnglais Then
                MessageBox.Show("bravo!")
                'quand la solution est bonne, on décrémente par exemple le rang de 1
                solution.Rang -= 1
            Else
                'quand la solution n'est pas trouvée, on incrémente de 1
                MessageBox.Show("pas bon!")
                solution.Rang += 1
            End If
            TextBox1.Text = ""
            NouveauMot()
        End If
    End Sub


    Private Sub NouveauMot()
        'on peut ici inventer un algorithme qui sélectionne (ou pas) un mot en fonction de son rang

        'sélection au hasard d'une instance de MaClasse de la liste
        solution = MaListe.Item(rd.Next(0, MaListe.Count))
        Label1.Text = solution.MotFrancais

    End Sub
End Class

ucfoutu · Answer

Bonjour, Banana32,
Expliquer quelle partie sans que MRJulienROCK n'ait préalablement acquis une aisance minimum ? 
Ce serait peine perdue à ce stade, d'une part, et, d'autre part, cela relèverait pratiquement totalement de la conception (avant de parler développement) !
A ce stade, donc, il va falloir se contenter de lui exposer la logique d'un mécanisme.
- une listvieaw ou un tableau dynamique à 3 colonnes  : colonne 1 mot français - colonne 2 traduction - colonne 3 = nombre de tirage de ce mot
- pour proposer un mot : tirage aléatoire d'un rang dans la listview (ou le tableau) == >> montrer ce nom dans un label et demander à l'utilisateur sa proposition de traduction (dans une textbox)
- chaque fois que réponse bonne : augmenter de 1 la valeur en colonne 3
En rappelant qu'il suffit d'avoir mémorisé le rang pour tout gérer convenablement.
Voilà pour ce qui est de la partie "élémentaire".
Ce ne sera que lorsqu'il aura passé ce cap-là (maîtrise de tout cela), qu'il pourra aller au-delà !
Je lui conseille dans un premier temps de se montrer moins "gourmand" et de se contenter de ne plus tirer un mot au hasard s'il a déjà fait l'objet de plus de x bonnes réponses (il suffit alors de supprimer de la listview ( plus facile qu'avec un tableau dynamique ) l'article du rang traité si le nombre en colonne 3 est( supérieur ou égal à x). Il ne risquera alors plus d'être tiré aléatoirement de nouveau.

Le passage à l'étape plus "ambitieuse", par contre  (celle qui consisterait en une "chance dégressive" de tirage d'un mot (en fonction de la connaissance de ce mot déjà acquise par l'"élève") est une affaire bien plus complexe, qu'il ne saurait comprendre ni aborder tant qu'il n'aura pas d'abord su passer l'étape "simple" proposée.
Il lui faudra alors nécessairement tirer au hasard, mais dans une liste (à chaque fois reconstituée) constituée d'une répétition des mots, chaque mot un nombre de fois à calculer individuellement pour lui donner son pourcentage de chances (décroissant, donc) d'être "tiré" ensuite.
Voilà voilà !
Il est clair que l'on ne peut aller plus loin sans que MRJulienROCK ne se soit familiarisé avec la gestion d'une listview.
Amitiés.
________________________
Réponse exacte ?  => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

MRJulienROCK · Answer

Un grand merci a vous deux pour vos réponses plus que complète !!! 

Je vais déjà essayer de finir mon programme , si en faite il tire déjà un mot au hasard et le demande , la c'est déjà pas mal je trouve ...

En effet l'idée que la chance que chaque mot "connus " régresse est gourmande et si elle est trop compliquée pour un débutant comme moi , alors j'abandonnerais ...

Ucfoutu tu me conseille de me familiariser avec les listview ? je vais de ce pas me renseigner et essayer de maitriser ce nouvel élément ...

MRJulienROCK · Answer

Voila j'ai finis une première version du logiciel 

assez simple je vous l'accorde ... 

Dites moi ce que vous en pensez et comment je peux l'améliorer ... 

Programme

ucfoutu · Answer

Je ne pense pas, MRJulienROCK, que beaucoup courront le risque de télécharger puis lancer un exe (qui pourrait d'ailleurs être pollué à ton insu) 
N'as-tu point remarqué que les sources déposés sur le forum ne sont jamais accompagnés d'un exécutable ? Seul le source (et pour ces raisons-mêmes de sécurité, pardi).


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

MRJulienROCK · Answer

Ah mince oui je suis complétement c** 

cependant je ne peux pas supprimer mon poste ... 
Oublier mon avant dernier poste !!!  :D

Revenons au chôse sérieuse pense tu que avec une listview j'aurais un meilleur résultat ?

ucfoutu · Answer

penses-tu que avec une listview j'aurais un meilleur résultat

Ben ... meilleur que quoi ? (en te rappelant que l'on n'a pas regardé ton exe et qu'on ignore totalement ton résultat actuel ) !

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

MRJulienROCK · Answer

Mon programme est donc constitué de deux colonne de groupbox que l'utilisateur doit remplir , la première colone contient les mot français , la deuxième les mot en étranger ... 

Lorsqu'on clique sur un bouton " s'entrainer " les deux colonnes préalablement remplie disparaissent ( j'ai utiliser .visible = false ) et le un label se transforme en un des texte remplis dans une des textbox ... dans la textbox a coté du label l'utilisateur dois deviner la traduction 

Si il a bon , une message box " bravo " s'affiche , sinon une message box " pas bon "

J'ai aussi fait un bouton pour que l'utilisateur puisse voir les colonne mais sans pouvoir les modifier ...

Utilisateur anonyme · Answer

en te rappelant que l'on n'a pas regardé ton exe
Heu... si, moi je l'ai regardé

MRJulienROCK · Answer

Ah bon

Utilisateur anonyme · Answer

J'obtiens l'erreur suivante :
Un élément avec la même clé à déjà été ajouté

MRJulienROCK · Answer

Ah oui merci !!!!!! j'ai cette erreur lorsque deux textbox d'une colonne ont le meme mot , ou le même caractère ... mais je n'arrive pas a résoudre cette erreur

MRJulienROCK · Answer

Re bonjour :) j'ai une autre question assez capitale , mais surement beaucoup plus simple

Comment passez d'une textbox a l'autre avec la touche entrée ?

Je viens de passez une heure a chercher sur tout les site que je trouvais , a essayer toutes les solution , mais pas une seule ne m'a donné un résultat concluant ... 

Peut être parce que la plupart des réponse concernais d'ancienne version de visual basic ...

Un moment j'ai crus trouver la solution mais , il passais a la textbox suivante en supprimant le contenu de la première  je suis découragé c'est un petit détail mais j'y tiens ...

NHenry · Answer

Bonjour, 

"Un moment j'ai crus trouver la solution mais , il passais a la textbox suivante en supprimant le contenu de la première"
Avec quel code ?

Regardes l'événement KeyPress et la méthode Focus()

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

MRJulienROCK · Answer

Je pense que c'était justement cette méthode ... pourrais tu me donner un site ou les deux méthode sont détaillée ?

NHenry · Answer

Bonjour, 

L'aide de VB est explicative, mais, j'attends toujours le code que tu as essayé pour cela afin de comprendre pourquoi il y a un problème.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site

ucfoutu · Answer

Patince, patience, ami NHenry...
ça va "viendre" ... Quand ? je ne sais pas ... (comme dans la chanson, ... tu sais ? ...)


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ

MRJulienROCK · Answer

Le problème est que j'essayais une série de code , et puis supprimais quand ça n'allais pas ^^ 

donc la je suis en trains de rechercher celui qui n'allais qu'a moitié ...

Utilisateur anonyme · Answer

j'essayais une série de code
Essayer des codes piochés à droite ou à gauche n'aide pas.
Ce qu'il faut faire, c'est le construire toi-même en se servant de l'aide et en comprenant ce qui se passe.
On commence par des choses simples et de difficulté croissante.
Je vois que tu es curieux, continue comme ça

MRJulienROCK · Answer

D'accord , mais chez moi l'aide de visual basic ne fonctionne pas , j'ai pourtant installé l'aide locale , mais je ne parviens pas a l'atteindre , je ne suis pourtant pas complétement idiot je sais comment lancer un truc que j'ai installé , mais je pensais que ce que j'avais installé s'insererais dans le menu "aide" de VB 

Oui je suis curieux et j'adore la programmation avec visual basic depuis que je l'ai découverte donc j'essaye d'en savoir plus ...  mais c'est compliqué :'(

Utilisateur anonyme · Answer

En principe, il faut aller dans le menu repéré par un point d'interrogation et faire 'afficher l'aide'.
La première fois un menu apparaîtra te demandant de fournir des informations avant l'installation ou l'utilisation de l'aide.
Ensuite, pendant la saisie du code (curseur positionné sur une instruction par exemple), l'aide sur l'élément concerné s'affiche en appuyant sur F1.

MRJulienROCK · Answer

OK... j'ai aussi en entendu parler de programme qui traduisait en language vb les actions du clavier ... c'est utile ?

[Déplacé VB6 -> VB.NET]Programme pour étude , Hasard ...

45 réponses

Votre réponse

Discussions similaires