Afin de contouner le pb signalé dans 1 message précédent (lié à datasource),
j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable
Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel.
Les données sont bien affichées dans la combobox, mais la liste ne laisse
apparaitre qu'un seul item à la fois avec la barre de défilement verticale
(ce qui fait ultra moche).
Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance,
Stéphane
PS : j'ajoute les items ainsi :
Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
Afin de contouner le pb signalé dans 1 message précédent (lié à datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel. Les données sont bien affichées dans la combobox, mais la liste ne laisse apparaitre qu'un seul item à la fois avec la barre de défilement verticale (ce qui fait ultra moche). Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance, Stéphane
PS : j'ajoute les items ainsi : Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
combobox_item.Add(code)
Next
Nouvelle façon de faire, problème identique : toujours qu'une seule ligne
d'affichée dans la liste déroulante au lieu de 8 au maximum.
Dim code(DataTable1.Rows.Count - 1) As String
Dim combobox_item As ComboBox.ObjectCollection = New
ComboBox.ObjectCollection(Me.ComboBox1)
"Stéphane" <nsolsapvaemrgne@npooswpearm-m.fr> a écrit dans le message de
news: %23G7J6PTLJHA.6128@TK2MSFTNGP02.phx.gbl...
Bonjour,
Toujours des soucis avec ces Combobox.
Afin de contouner le pb signalé dans 1 message précédent (lié à
datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable
Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel.
Les données sont bien affichées dans la combobox, mais la liste ne laisse
apparaitre qu'un seul item à la fois avec la barre de défilement verticale
(ce qui fait ultra moche).
Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance,
Stéphane
PS : j'ajoute les items ainsi :
Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
Afin de contouner le pb signalé dans 1 message précédent (lié à datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel. Les données sont bien affichées dans la combobox, mais la liste ne laisse apparaitre qu'un seul item à la fois avec la barre de défilement verticale (ce qui fait ultra moche). Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance, Stéphane
PS : j'ajoute les items ainsi : Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
combobox_item.Add(code)
Next
Problème réglé : installation de VB Express 2008.
Comme ca, plus besoin de remplir les items manuellement !
Je vais réutiliser les propriétés DataSource and co, et FormattingEnabled.
Stéphane
"Stéphane" a écrit dans le message de news: %
Nouvelle façon de faire, problème identique : toujours qu'une seule ligne d'affichée dans la liste déroulante au lieu de 8 au maximum.
Dim code(DataTable1.Rows.Count - 1) As String
Dim combobox_item As ComboBox.ObjectCollection = New ComboBox.ObjectCollection(Me.ComboBox1)
Afin de contouner le pb signalé dans 1 message précédent (lié à datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel. Les données sont bien affichées dans la combobox, mais la liste ne laisse apparaitre qu'un seul item à la fois avec la barre de défilement verticale (ce qui fait ultra moche). Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance, Stéphane
PS : j'ajoute les items ainsi : Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
combobox_item.Add(code)
Next
Problème réglé : installation de VB Express 2008.
Comme ca, plus besoin de remplir les items manuellement !
Je vais réutiliser les propriétés DataSource and co, et FormattingEnabled.
Stéphane
"Stéphane" <nsolsapvaemrgne@npooswpearm-m.fr> a écrit dans le message de
news: %23skadXTLJHA.5952@TK2MSFTNGP03.phx.gbl...
Nouvelle façon de faire, problème identique : toujours qu'une seule ligne
d'affichée dans la liste déroulante au lieu de 8 au maximum.
Dim code(DataTable1.Rows.Count - 1) As String
Dim combobox_item As ComboBox.ObjectCollection = New
ComboBox.ObjectCollection(Me.ComboBox1)
"Stéphane" <nsolsapvaemrgne@npooswpearm-m.fr> a écrit dans le message de
news: %23G7J6PTLJHA.6128@TK2MSFTNGP02.phx.gbl...
Bonjour,
Toujours des soucis avec ces Combobox.
Afin de contouner le pb signalé dans 1 message précédent (lié à
datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable
Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel.
Les données sont bien affichées dans la combobox, mais la liste ne laisse
apparaitre qu'un seul item à la fois avec la barre de défilement
verticale (ce qui fait ultra moche).
Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance,
Stéphane
PS : j'ajoute les items ainsi :
Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)
Afin de contouner le pb signalé dans 1 message précédent (lié à datasource), j'ai testé différement :
Le combobox n'est plus lié à 1 DataTable Je renseigne donc les items du Combobox au chargement du Form.
Le problème, cette fois ci, est visuel. Les données sont bien affichées dans la combobox, mais la liste ne laisse apparaitre qu'un seul item à la fois avec la barre de défilement verticale (ce qui fait ultra moche). Pourtant, la propriété MaxDropDownItems est égale à 8.
Une idée pour solutionner ce problème visuel ?
Merci d'avance, Stéphane
PS : j'ajoute les items ainsi : Dim code As String
Dim combobox_item As ComboBox.ObjectCollection
For Each r As DataRow In au.DataTable1.Rows
code = r.Item(au.DataColumn_Table1_Code)
combobox_item = New ComboBox.ObjectCollection(Me.ComboBox1)