No Output on a Label

Public Class Form2

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Public Sub qc_OnQuote(ByVal sender As Object, ByVal args As QuoteEventArgs)

        Dim str As String = args.ToString
        Dim bidask As String() = str.Split(" ")
        MsgBox(bidask(1) & " / " & bidask(2))
        Label8.Text = "" & bidask(1) & " / " & bidask(2)
    End Sub

    Private Sub ComboBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.TextChanged
        Try
            Dim syms As String = ComboBox1.Text
            Dim sym As String() = syms.Split(",")
            Dim qc As QuoteClient = New QuoteClient(******, "*******", "**.***.***.***", ****)
            AddHandler qc.OnQuote, AddressOf Me.qc_OnQuote
            qc.Connect()
            qc.Subscribe(sym(0))
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub