---
title: "Fel i listbox när det inte finns någonting att fylla"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/40943-fel-i-listbox-när-det-inte-finns-någonting-att-fylla"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "saw"
published: "2002-04-05T17:27:26.000Z"
updated: "2002-04-06T10:27:12.000Z"
replies: 4
views: 232
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/40943-fel-i-listbox-när-det-inte-finns-någonting-att-fylla"
---

# Fel i listbox när det inte finns någonting att fylla

## #1 — saw, 2002-04-05T17:27Z

Hur löser jag det här?
I listbox3 så finns det ett antal sångtitlar. När man klickar på dom så fylls lista4 upp i form av datum. Det skall bli lite mera avacerat sedan, men vi stannar där.
Om det nu är som så att en sångtitel inte har något datum, då får jag error. Hur löser jag det.
Här är koden:

```
    List4.Clear
Set minDB = OpenDatabase("f:\saw\databas\stat.mdb")
Set mittRS1 = minDB.OpenRecordset("SELECT t_SongTitlar.titel_Id, t_SongTitlar.songtitel, t_Datum.Datum FROM t_SongTitlar INNER JOIN t_Datum ON t_SongTitlar.titel_Id = t_Datum.Sång_ID WHERE songtitel = '" & List3.Text & "'   ORDER BY songtitel", dbOpenDynaset)
    Do While Not mittRS1.EOF
    
    If IsNull(mittRS1!datum) Or Len(mittRS1!datum) = 0 Then
               List4.AddItem "0"
    Else
        List4.AddItem mittRS1!datum
    End If
        mittRS1.MoveNext
        Loop
    Label5.Caption = "IdNr: " & mittRS1!titel_id
    List4.ListIndex = 0
mittRS1.Close
```

Hoppas på hjälp   :p

Permalänk: https://www.webforum.nu/p/40943

## #2 — Insider, 2002-04-05T19:38Z

Hur ser Error-meddelandet ut?

Permalänk: https://www.webforum.nu/p/638657

## #3 — saw, 2002-04-05T22:41Z

Jag får medellande om:
Runtime error 380
Invalid property value.
Jag har upptäckt att den kommer av denna raden:
List4.ListIndex = 0
Jag har också gjort som så att i ifsatsen där jag kollar om mittRS1!datum är tomt, så har jag sat:
Exit sub.

Det hjälpte en hel den.
Om jag bortkommenterar raden List4.ListIndex = 0 så får jag inga fel, men bär jag inte ha med den raden?  :q

Permalänk: https://www.webforum.nu/p/638748

## #4 — Insider, 2002-04-05T22:56Z

Vad vill du göra med den raden då?

Du kan ju alltid lägga in en till If-sats och kolla om det finns nåt i listan innan du kör Listindex=0.

Permalänk: https://www.webforum.nu/p/638756

## #5 — saw, 2002-04-06T10:27Z

Jo jag gör så, tack ör din hjälp.  :e

Permalänk: https://www.webforum.nu/p/638819

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/40943-fel-i-listbox-när-det-inte-finns-någonting-att-fylla