Keskustelu: Ohjelmointikysymykset: VB6: Datalist ongelma

Minulla on access tietokanta ja siinä olevien tietueitten nimet näkyvät Datalistillä. Olen tehnyt Lisää uusi, Tallenna ja Poista napit datalistille. Kun tallennan uuden tietueen tietokantaan nimellä, datalistin kohdistin hyppää aina listan ylimpää nimeen tallennuksen jälkeen. Luotu nimi menee normaalisti viimeiseksi.

Miten saisin sen niin että kohdistin jää aina sen nimen kohdalle datalist:llä, joka on juuri luotu tai nimen kohtaan jota on vain muokattu.

DataListillä on vähän huonosti hoidettu nuo riveihin osoittaminen VB6:ssa. BoundText taitaa olla ainoa, millä voit aktivoida halutun rivin listalta.

Private SelItem As String

Private Sub Command1_Click()
    ' Viedään kohdistin riville, joka sisältää halutun tekstin
    DataList1.BoundText = SelItem
End Sub

Private Sub DataList1_DblClick()
    ' Otetaan talteen teksti, joka on listalta valittu
    SelItem = DataList1.Text
    ' Haetaan listan tiedot uudestaan, jonka seurauksena kohdistin osoittaa listan ensimmäiseen tietoon
    DataList1.ReFill
End Sub