Aide sur ComboboxRésolu

Question

Bonjour,

Voila, apres avoir recuperer un champ de ma base access dans mon combobox je voudrai afficher un autre champ dans un textbox par rapport à la sélection de mon combobox

J'ai le message d'erreur suivant : 
L'exception System.InvalidCastException n'a pas été gérée
  Message="Impossible d'effectuer un cast d'un objet de type 'System.String' en type 'System.Windows.Forms.TextBox'."
 
Si quelqu'un peux m'aider merci beaucoup

Voici mon code :

Private

Sub ComboBox1_SelectedIndexChanged(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles ComboBox1.SelectedIndexChanged

Dim MyConnexion 
As OleDbConnection = 
New OleDbConnection(
"Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Application.StartupPath & 
"\PROG.mdb;")

Dim Mycommand As OleDbCommand MyConnexion.CreateCommand()Mycommand.CommandText 

"SELECT * FROM PROG WHERE D‚signation = '" & ComboBox1.Text & 
"'"MyConnexion.Open()

Dim myReader 
As OleDbDataReader = Mycommand.ExecuteReader()myReader.Read()

If myReader.HasRows 
ThenTextBox1 = myReader(

"Fabricant")

End
If

myReader.Close()MyConnexion.Close()

End
Sub

jrivet · Accepted Answer

Salut,
Sur quelle ligne survient l'erreur????

En .NET il n'y a plus de propriété par défaut.
Ce qui veux dire que si tu met TextBox1 = cela ne veut plus dire comme avant forcément TextBox1.Text.
Il faut préciser chaque propriété que tu veux affecter.
Donc il te faut si veux modifier le Text de ton TextBox TOUJOURS préciser.
TextBox1.Text

@+: Ju£i?n
Pensez: Réponse acceptée

cs_chimi · Answer

ton erreur est ici

if
 myReader.HasRows 

Then

TextBox1 =  myReader(




"Fabricant"
)

End
If
fait ca

if
 myReader.HasRows 

Then

TextBox1. text  = myReader(




"Fabricant"
)

End
If

jbprogram · Answer

Je suis très fanatique de Les bases de la gestion de fichiersLundi 18 mars 2003&

Aide sur Combobox

3 réponses

Votre réponse

Discussions similaires