Dopo un bel po, sono arrivato a questo mezzo obrobrio:
codice:
Me.ScoutTableAdapter.Fill(Me.DBaseDataSet.Scout)
Dim dvScout As New DataView(Me.DBaseDataSet.Scout, _
"[Abilitato in lista rapida] = True", _
"NomeLista ASC", _
DataViewRowState.OriginalRows)
ScoutComboBox.DataSource = dvScout
ScoutComboBox.DisplayMember = "NomeLista"
ScoutComboBox.ValueMember = "id_scout"
dvScout.AllowEdit = True
' Rende la colonna "NomeLista" di non sola lettura
Me.DBaseDataSet.Scout.NomeListaColumn.ReadOnly = False
dvScout.Item(0)(0) = 0
dvScout.Item(0)(4) = "NOME AGGIUNTO"
dvScout.AddNew()
dvScout.AllowEdit = False
Me.DBaseDataSet.Scout.NomeListaColumn.ReadOnly = True
ma ho queste tre esigenze che non conciliano con quanto fatto:
1) Non riesco ad aggiungere più di un "NOME AGGIUNTO":
codice:
...
dvScout.Item(0)(0) = 0
dvScout.Item(0)(4) = "NOME AGGIUNTO"
dvScout.Item(1)(0) = 0
dvScout.Item(1)(4) = "NOME2 AGGIUNTO"
dvScout.AddNew()
...
poiche da errore: "Impossibile Impostare NomeLista";
2) Vorrei poter trasformare la colonna "id_scout", che nel db è il contatore, in una stringa nell'assegnazione 'ValueMember', perche ai NOMI AGGIUNTI non voglio associare un valore numerico, ma bensi dei codici a stringhe;
3) Gli elementi aggiunti che non vengano mischiati a quelli dal database (come fa ora), ma vorrei aggiungerli in testa al MenùList [come si farebbe col Insert(0,"Testo da aggiungere") ].
Grazie a tutti!