Combobox Item wird nicht angenommen!

nawiat · 09/12/2013, 20:38

hey Leutz ^^

Ich komm einfach nicht drauf was ich hier Falsch mache ;D eigendlich kann man in so wenig Zeilen ja nichts Falsch machen XD

Code:

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        If ComboBox16.Items(0) Then
            TextBox1.Text = ("http://avw.mdr.de/livestreams/mdr_figaro_live_128.m3u")
            MsgBox(ComboBox16.SelectedItem.ToString() & " wurde ausgewählt")
        Else
            MsgBox("Du hast kein Radiosender ausgewählt")
        End If

        If ComboBox16.SelectedItem IsNot Nothing Then

        End If

    End Sub

wenn ich jetzt ausführe sagt VB das:

"Ungültige Konvertierung von der Zeichenfolge MDR Figaro in Typ Boolean."
und macht das gelb:

Code:

If ComboBox16.Items(0) Then

bitte helft mir leute soll ein Webradio Player werden ^^

Schlüsselbein · 09/12/2013, 20:41

Eine If-Abfrage erwartet einen boolschen Ausdruck und kein Objekt, welches von Items(x) zurückgegeben wird.

nawiat · 09/12/2013, 20:43

habe versucht es so zu machen

Dim tst As String = ComboBox16.Items(0).ToString

das drüber aber es geht immer noch nicht :/ kann mir jemand sagen wie ich das realisieren kann ?

ich will einfach nur haben, wenn das erste Item in der Box ausgewählt wurde und ich den Button drücke das er dann den ablauf so macht wie oben ^^
das muss doch zu machen sein, ich bin Azubi und muss das für meine Ausbildung alles mal in erfahrung bringen ^^

snow · 09/12/2013, 20:53

Du musst einen boolschen Typen erhalten. Ich nehme an, du willst überprüfen, ob in der ComboBox etwas ausgewählt ist?

Das dürfte so gehen:

Code:

If Not String.IsNullOrEmpty(ComboBox16.Items(0).ToString()) Then
' dein Zeugs
Else
' Fehler
EndIf

nawiat · 09/12/2013, 20:57

ihr seit die besten XD danke, vielen dank.
Danke @snow911

Code:

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        If Not String.IsNullOrEmpty(ComboBox16.Items(0).ToString()) Then
            TextBox1.Enabled = True
            TextBox1.Text = ("http://avw.mdr.de/livestreams/mdr_figaro_live_128.m3u")
            TextBox1.Enabled = False
            MsgBox(ComboBox16.SelectedItem.ToString() & " wurde ausgewählt")

        ElseIf Not String.IsNullOrEmpty(ComboBox16.Items(1).ToString()) Then
            TextBox1.Enabled = True
            TextBox1.Text = ("http://avw.mdr.de/livestreams/mdr_thueringen_live_128.m3u")
            TextBox1.Enabled = False
            MsgBox(ComboBox16.SelectedItem.ToString() & " wurde ausgewählt")

        End If

    End Sub

wenn ich es nun so mache um alles auf zu zählen ( die Sender ) dann sagt er zwar an was ausgewählt wurde aber nimmt immer den ersten link in die Textbox1 :/

dragonheart11 · 09/13/2013, 08:57

Steht in der combobox was bestimtes? Oder immer was anderes?
Wenn das combobox item immer die selben items hat also immer die selben namen, dann mah das hier:

If combobox16.text = "text vom item" then

End if

So habs ich immer gemacht

Edit:

Wenn es immer ein anderer text pro item ist mach das ganze mit einer listbox:

If combox.items(0) then
listbox1.selectedindex(0)
Textbox1.text = listbox1.selecteditem
End if

In der listbox listest du die stream links so zu das sie zum jeweiligen combobox item passen

nawiat · 09/13/2013, 18:40

danke @dragonheart11
hat super geklappt, mit beiden Tipps ^^

danke leute !