Séléction d'une Combobox

Fermé
black_heart Messages postés 346 Date d'inscription dimanche 3 août 2008 Statut Membre Dernière intervention 31 janvier 2016 - 5 mars 2014 à 11:33
Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 - 7 mars 2014 à 00:04
Bonjour,

je veux séléctionner à partir d'un combobox la liste des clients de ma base de donnée , une fois j'ai séléctionné le nom du client , ses coordonnées m'affiche ( tél , mail , adresse ) .

2 réponses

Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 20
5 mars 2014 à 23:39
Bonjour,

Je veux bien tenter de t'aider, mais si tu veux que je t'aide, il faudra y aller pas à pas afin de faire les choses correctement.

Première étape, tu vas créer un projet de type classe que tu nommeras ClientEntite

Dans ce projet, tu auras une classe que tu nommeras ClientEnt.

Dans cette classe, tu détails tous les champs de ta BD.

Je te fournie un exemple après le souper.

K
0
Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 20
Modifié par Kalissi le 7/03/2014 à 00:09
Salut,

Désolé pour hier j'ai eu une visite inattendu après souper.

Bon si tu veux, je suis prêt à t'aider pas à pas pour créer une
application qui contient un minimum de structure organique.

Si tu trouve le modèle que je t'ai envoyé complexe, je peux
comprendre car je n'ai pas appris cela en un jour. Mais si tu
veux apprendre à programmer en VB.Net, il te faudra un minimum
de connaissances en architecture organique.

Les modèles sur les quels je travaille au boulot ont plus de 12 couches
dans une architecture orienté services (AOS) ou WEB Services (WEBS).
Et chaque couche peut-être diviser en plusieurs classes.

Alors ça dépend de ce que tu veux faire.

Si tu effectue des recherches sur les mots clés :

DAL ( Data Access Layer )
CDA ( Control Data Access)
UAD ( Unité d'Accès aux Données )

Tu verras qu'il existe un minimum de 4 couches pour une application standard.
Alors dis moi ce que tu souhaite, continuer à développer selon une architecture
minimum ou accéder directement à ta BD à partir de ton formulaire.

Quel que soit ton choix, je te propose ici la première étape pour une structure
organique minimum.

Première étape, répliquer tous les champs de ta table dans une DLL, une classe.
un projet, une solution.

Voici un exemple :


#Region " Importations des Espaces de noms des classes utilisées. "

Imports System.Runtime.Serialization

#End Region

''' <summary>
''' Description de la classe ClientENT
''' </summary>
''' <remarks><pre>
''' Systême : Application de base
''' Module : 01
''' Classe : ClientENT
''' Réalisé par : Kalissi
''' Date de création : 2011-01-01 04:00:00
'''
''' Méthodes publiques : Facultatif
'''
''' Propriétés publiques : Facultatif
'''
''' Évênements publiques : Facultatif
'''
''' </pre>
''' <history>
''' -------------------------------------------------------------------------------
''' Code Date Programmeur Description
''' -------------------------------------------------------------------------------
''' 1234567 2014-03-06 Kalissi Création initial
''' </history>
''' -------------------------------------------------------------------------------
''' </remarks>
<Serializable()> _
Public Class ClientEnt

#Region "--- Attributs ---"

Private zNomClient As String = String.Empty
Private zNoCivique As String = String.Empty
Private zRue As String = String.Empty
Private zVille As String = String.Empty
Private zEtat As String = String.Empty
Private zCodePostal As String = String.Empty
Private zTelephone As String = String.Empty

#End Region

#Region "--- Propriété ---"

Public Property NomClient() As String
Get
Return Me.zNomClient
End Get
Set(ByVal value As String)
Me.zNomClient = value
End Set
End Property

Public Property NoCivique() As String
Get
Return Me.zNoCivique
End Get
Set(ByVal value As String)
Me.zNoCivique = value
End Set
End Property

Public Property Rue() As String
Get
Return Me.zRue
End Get
Set(ByVal value As String)
Me.zRue = value
End Set
End Property

Public Property Ville() As String
Get
Return Me.zVille
End Get
Set(ByVal value As String)
Me.zVille = value
End Set
End Property

Public Property Etat() As String
Get
Return Me.zEtat
End Get
Set(ByVal value As String)
Me.zEtat = value
End Set
End Property

Public Property CodePostal() As String
Get
Return Me.zCodePostal
End Get
Set(ByVal value As String)
Me.zCodePostal = value
End Set
End Property

Public Property Telephone() As String
Get
Return Me.zTelephone
End Get
Set(ByVal value As String)
Me.zTelephone = value
End Set
End Property

#End Region

#Region "--- Constructeur ---"

''' <summary>
''' Constructeur par défault
''' </summary>
''' <remarks></remarks>
Public Sub New()

End Sub

#End Region

End Class

K
0