Code vb.net

Pacome.k Messages postés 15 Statut Membre -  
 Utilisateur anonyme -
Bonjour à tous, Respect à tous les grands de la programmation, moi je ne suis qu'un débutant avec quelques préoccupations. je travail petit à petit sur un gestionnaire de stock et je rencontre une difficulté. quand j'ouvre le combobox (catégorie produit) et fait le choix , les produits de cette catégorie s'affichent dans le combobox(LibelleProduit) et quand je clique sur un produit, il me donne des information du Fournisseur . sachant que un produit peut avoir plusieurs fournisseurs, je souhaiterai quand je clique sur un fournisseur du combobox(3) les informations tels que le prix du produit ...et tout le reste apparaitra dans les textbox. jusque là je n'arrive pas à le faire. aidez moi svp !

14 réponses

  1. Utilisateur anonyme
     
    Dans ma boule de cristal, je vois qu'il manque une pinte à la ligne 1664.

    Ha tu voulais une réponse sérieuse, ben il faut poser une question sérieuse...

    D’où viennent tes données ?
    Comment les lies tu aux combobox ?

    Montrer le ou les morceaux de codes de la récupération des données et de leurs distributions seraitune bonne chose, y’a « 36 » façons de faire, autant répondre avec ce que tu as fait.
    Ou t’expliquer pourquoi autrement pourrait être mieux.
    Voir ce petit tuto https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
    On pourra commencer à essayer de t’aider quand on aura des éléments.

    0
  2. Pacome.k Messages postés 15 Statut Membre
     
    Grand respect à vous tous, vous êtes nos devanciers et nos icones dans la programmation, infiniment merci d'apporter une attention à nos préoccupation. Respect à toi Whismeril !
    j'ais lié mon projet à une base Access nommée Gst
    0
  3. Utilisateur anonyme
     
    Ok, ça vient d’access, peux tu poster le code qui lit les tables ?
    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. Pacome.k Messages postés 15 Statut Membre
     
    je veux pouvoir obtenir quelque chose comme ça dans ce formulaire. merci pour votre aide !
    0
  6. Utilisateur anonyme
     
    Lors de ma première réponse, je t’ai mis un lien vers un tuto expliquant comment poster un code lisible.
    On commencera à essayer de t’aider quand tu l’auras posté correctement.
    0
  7. Pacome.k Messages postés 15 Statut Membre
     
    Public Class Modification_Produit
    
        'cette procedure permet d'ouvrir la table Produit et de selectionnner uniquement la catégorie du produit
        Dim conn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OleDb.12.0;data source=" & Application.StartupPath & "\Gst.accdb")
    
        Private Sub Modification_Produit_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            conn.Open()
            Dim cmd6 As New OleDb.OleDbCommand("select distinct CategorieProduit from Produit", conn)
            Dim dr6 As OleDb.OleDbDataReader = cmd6.ExecuteReader
            cmbAfficheCatego.Items.Clear()
            While dr6.Read()
                cmbAfficheCatego.Items.Add(dr6("CategorieProduit"))
            End While
            conn.Close()
    
    
            conn.Open()
            Dim cmd4 As New OleDb.OleDbCommand("select Fournisseur from Produit", conn)
            Dim dr4 As OleDb.OleDbDataReader = cmd4.ExecuteReader
            cmbAncienFournisseur.Items.Clear()
            While dr4.Read()
                cmbAncienFournisseur.Items.Add(dr4("Fournisseur"))
            End While
            conn.Close()
    
    
    
        End Sub
        ' la procédure suivant permet afficher en fonction de la categorie choisie, le produit 
    
        Private Sub cmbAfficheCatego_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbAfficheCatego.SelectedIndexChanged
            conn.Open()
            Dim cmd7 As New OleDb.OleDbCommand("select Distinct LibelleProduit from Produit where CategorieProduit='" + cmbAfficheCatego.Text + "'", conn)
            Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
            'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
            cmbDesignation.Text = ""
            cmbDesignation.Items.Clear()
            While dr7.Read()
                cmbDesignation.Items.Add(dr7("LibelleProduit"))
            End While
            conn.Close()
        End Sub
        'cette procedure permet d'afficher l'ancien prix du produit choisi et son code
    
        Private Sub cmbDesignation_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbDesignation.SelectedIndexChanged
            
            Dim cn As New OleDb.OleDbConnection
            Dim cmd As New OleDb.OleDbCommand
            Dim dr As OleDb.OleDbDataReader
            cn.ConnectionString = "Provider=Microsoft.ACE.OleDb.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn.Open()
            cmd.Connection = cn
            cmd.CommandText = "select * From Produit where LibelleProduit='" & cmbDesignation.Text & "'"
            dr = cmd.ExecuteReader
            While dr.Read
                txtAncienPU.Text = dr.GetValue(2)
                txtCodeProduit.Text = dr.GetValue(0)
                txtAncienPUV.Text = dr.GetValue(8)
                cmbAncienFournisseur.Text = dr.GetValue(6)
                txtAncienNbContenant.Text = dr.GetValue(3)
                txtAncienQteparcontenance.Text = dr.GetValue(4)
                txtAncienEmplacement.Text = dr.GetValue(7)
                txtancienStockmini.Text = dr.GetValue(9)
    
    
    
            End While
            ' après selection d'un produit, le curseur se place sur le nouveau prix. cette formule qui suit nous permet d'exécuter cette opération
            txtNouveauNom.Focus()
        End Sub
    
        Private Sub txtNouveauNom_TextChanged(sender As Object, e As EventArgs) Handles txtNouveauNom.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte txtNouveauNom est activée
            If txtNouveauNom.Text <> "" Then
                btnModifierNom.Enabled = True
            Else
                btnModifierNom.Enabled = False
            End If
        End Sub
    
        Private Sub txtNouveauPU_TextChanged(sender As Object, e As EventArgs) Handles txtNouveauPU.TextChanged
    
            ' ce code permet d'activer le bouton ModifierPU lorsque la zone de texte est activée et contien du numérique
    
            If IsNumeric(txtNouveauPU.Text) Then
                btnModifierPU.Enabled = True
            Else
                txtNouveauPU.Text = ""
                btnModifierPU.Enabled = False
            End If
    
    
    
        End Sub
    
        Private Sub btnModifierNom_Click(sender As Object, e As EventArgs) Handles btnModifierNom.Click
            'ce code permet de modifier le nom du produit, a la fin de la modification, il faut vider les champs de saisie
    
    
            Dim cn11 As New OleDb.OleDbConnection
            Dim cmd11 As New OleDb.OleDbCommand
            cn11.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn11.Open()
            cmd11.Connection = cn11
            cmd11.CommandText = " Update Produit set LibelleProduit='" & txtNouveauNom.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd11.ExecuteNonQuery()
            MsgBox("le Nom du Produit modifié avec succes", MsgBoxStyle.Information, "Modification du Nom")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
    
    
    
            'cmbDesignation.Items.Clear()
    
            'conn.Open()
            'Dim cmd7 As New OleDb.OleDbCommand("select LibelleProduit from Produit where CategorieProduit='" + cmbAfficheCatego.Text + "'", conn)
            'Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
            'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
            'cmbDesignation.Text = ""
            'cmbDesignation.Items.Clear()
            'While dr7.Read()
            'cmbDesignation.Items.Add(dr7("LibelleProduit"))
            'End While
            conn.Close()
    
    
    
    
    
    
    
    
        End Sub
    
        Private Sub btnModifierPU_Click(sender As Object, e As EventArgs) Handles btnModifierPU.Click
            'ce code permet de modifier le PU du Produit sélectionné, a la fin de la modification, il faut vider les champs de saisie
    
            'modification de l'"lement concerné dans la base
            Dim cn As New OleDb.OleDbConnection
            Dim cmd As New OleDb.OleDbCommand
            cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn.Open()
            cmd.Connection = cn
            cmd.CommandText = " Update Produit set PUProduit='" & txtNouveauPU.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd.ExecuteNonQuery()
            MsgBox("le PU du Produit modifié avec succes", MsgBoxStyle.Information, "Modification du PU")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
    
        End Sub
    
    
       
        
        Private Sub btnFournisseur_Click(sender As Object, e As EventArgs) Handles btnFournisseur.Click
            'modification de l'"lement concerné dans la base
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set Fournisseur='" & txtNvFournisseur.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("le Fournisseur du Produit modifié avec succes", MsgBoxStyle.Information, "Modification Fournisseur")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
    
           
    
    
        End Sub
    
        Private Sub txtNvFournisseur_TextChanged(sender As Object, e As EventArgs) Handles txtNvFournisseur.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte est activée
            If txtNvFournisseur.Text <> "" Then
                btnFournisseur.Enabled = True
            Else
                btnFournisseur.Enabled = False
            End If
        End Sub
        'modification de l'"lement concerné dans la base
        Private Sub btnNbdeContenant_Click(sender As Object, e As EventArgs) Handles btnNbdeContenant.Click
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set Nb_Contenant='" & txtNvnombrecontenant.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("le le nomre de contenant Produit modifié avec succes", MsgBoxStyle.Information, "Modification nb conenant")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
    
        End Sub
    
        Private Sub txtNvQteparContenant_TextChanged(sender As Object, e As EventArgs) Handles txtNvQteparContenant.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte  est activée
            If txtNvQteparContenant.Text <> "" Then
                btnQteparContenance.Enabled = True
            Else
                btnQteparContenance.Enabled = False
            End If
    
        End Sub
        'modification de l'"lement concerné dans la base
        
        Private Sub btnQteparContenance_Click(sender As Object, e As EventArgs) Handles btnQteparContenance.Click
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set Quantite='" & txtNvQteparContenant.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("le nombre de Produit modifié avec succes", MsgBoxStyle.Information, "Modification nb de produit")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
        End Sub
        'modification de l'"lement concerné dans la base
        Private Sub btnModifierPUV_Click(sender As Object, e As EventArgs) Handles btnModifierPUV.Click
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set PUVProduit='" & txtNvPUV.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("le prix unitaire de vente modifié avec succes", MsgBoxStyle.Information, "Modification PUV de produit")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
        End Sub
        'modification de l'"lement concerné dans la base
        Private Sub btnStockMini_Click(sender As Object, e As EventArgs) Handles btnStockMini.Click
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set StockMini='" & txtNveauStockmini.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("le stock mini modifié avec succes", MsgBoxStyle.Information, "Modification du stockmini du produit")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
        End Sub
        'modification de l'"lement concerné dans la base
        Private Sub btnEmplacement_Click(sender As Object, e As EventArgs) Handles btnEmplacement.Click
            Dim cn21 As New OleDb.OleDbConnection
            Dim cmd21 As New OleDb.OleDbCommand
            cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
            cn21.Open()
            cmd21.Connection = cn21
            cmd21.CommandText = " Update Produit set Emplacement='" & txtNvlEmplacement.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
            cmd21.ExecuteNonQuery()
            MsgBox("l'emplacement du Produit modifié avec succes", MsgBoxStyle.Information, "Modification de l'emplacement produit")
            cmbDesignation.Text = ""
            txtNouveauNom.Text = ""
            txtAncienPU.Text = ""
            txtNouveauPU.Text = ""
            txtCodeProduit.Text = ""
            txtAncienPUV.Text = ""
            cmbAncienFournisseur.Text = ""
            txtAncienNbContenant.Text = ""
            txtAncienQteparcontenance.Text = ""
            txtAncienEmplacement.Text = ""
            txtancienStockmini.Text = ""
            txtNvPUV.Text = ""
            txtNvFournisseur.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvnombrecontenant.Text = ""
            txtNvlEmplacement.Text = ""
            txtNveauStockmini.Text = ""
            txtNvQteparContenant.Text = ""
            cmbDesignation.Items.Clear()
        End Sub
    
        Private Sub txtNvPUV_TextChanged(sender As Object, e As EventArgs) Handles txtNvPUV.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte  est activée
            If txtNvPUV.Text <> "" Then
                btnModifierPUV.Enabled = True
            Else
                btnModifierPUV.Enabled = False
            End If
        End Sub
    
        Private Sub txtNvnombrecontenant_TextChanged(sender As Object, e As EventArgs) Handles txtNvnombrecontenant.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte est activée
            If txtNvnombrecontenant.Text <> "" Then
                btnNbdeContenant.Enabled = True
            Else
                btnNbdeContenant.Enabled = False
            End If
        End Sub
    
        Private Sub txtNvlEmplacement_TextChanged(sender As Object, e As EventArgs) Handles txtNvlEmplacement.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte txtNouveauNom est activée
            If txtNvlEmplacement.Text <> "" Then
                btnEmplacement.Enabled = True
            Else
                btnEmplacement.Enabled = False
            End If
        End Sub
    
        Private Sub txtNveauStockmini_TextChanged(sender As Object, e As EventArgs) Handles txtNveauStockmini.TextChanged
            ' ce code permet d'activer le bouton ModifierNom quand la zonne de text est activée
            If txtNveauStockmini.Text <> "" Then
                btnStockMini.Enabled = True
            Else
                btnStockMini.Enabled = False
            End If
        End Sub
        'afficher le fournisseur en fonction du produit selectionné
        Private Sub cmbAncienFournisseur_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbAncienFournisseur.SelectedIndexChanged
            conn.Open()
            Dim cmd7 As New OleDb.OleDbCommand("select Fournisseur from Produit where LibelleProduit='" + cmbAncienFournisseur.Text + "'", conn)
            Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
            'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
            cmbAncienFournisseur.Text = ""
            cmbAncienFournisseur.Items.Clear()
            While dr7.Read()
                cmbAncienFournisseur.Items.Add(dr7("Fournisseur"))
            End While
            conn.Close()
        End Sub
    
      
        
    End Class
    0
  8. Pacome.k Messages postés 15 Statut Membre
     
    j'ai essayé de suivre l'exemple de la source que vous m'avez envoyé...
    0
  9. Utilisateur anonyme
     
    Il faut choisir les balises avec le langage basic et poster le code à l’intérieur de celles ci
    0
  10. Utilisateur anonyme
     
    Pourquoi n’as tu pas codé de classe métier ?
    0
  11. Pacome.k Messages postés 15 Statut Membre
     
    j'aurai aimer que quand je selectionne le produit , tous les fornisseurs de ce produit apparaissent dans le combobox fournisseur et quand je clique sur ce fornisseur je vois afficher toutes les informations figurant dans l'image défini plus haut. c'est mon seul soucis qui est là !
    0
    1. Utilisateur anonyme
       
      Oui et donc pourquoi tu n'as pas codé de classe(s) métier?
      0
  12. Pacome.k Messages postés 15 Statut Membre
     
    j'ai pas de classe métier dans mon formulaire... je ne te saisi pas bien ! sois plus explicite en m'aidant
    0
    1. Utilisateur anonyme
       
      Je te conseille de lire ceci
      https://codes-sources.commentcamarche.net/forum/affich-10107769-message-a-tous-les-debutants-souvent-autodidactes#p10107769
      0
  13. Pacome.k Messages postés 15 Statut Membre
     
    Salut et Grand respect à toi pour l'attention que tu portes à ma préoccupation et le soucis manifeste de m'aider à acquérir un bon niveau en programmation vb.net .
    0
  14. Pacome.k Messages postés 15 Statut Membre
     
    vb.net est un défi pour mois sur tout que je développait auparavant mes applications sous uniquement, j'ai voulu monter en niveau avec un langage de programmation pour parfaire mes application. faut dire que dans ma position actuel je m'auto-forme. donc j'ai vraiment besoin de vous , de votre soutien, vos conseils et explications pour grandir dans ce milieu. merci, merci et encore merci. j'ai un numéro whatsapp qui est le numéro supprimé par la.modération sur le quel je peux recevoir du vocal. et des cours approfondir sur vb.net
    0
    1. Utilisateur anonyme
       
      Je pense que dans un premier temps le.cours de Tahé, te serait plus profitable.
      Mais c’est toi qui vois
      0