La tua label non esiste nella pagina, esiste nel controllo contenitore...
un modo per "prenderla" e smandrupparla è:
codice:
Protected Sub DataList1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles DataList1.ItemDataBound

        Dim lblId As Label = e.Item.FindControl("idLabel") 'qui metti l'id della tua label
                                                                          
        If lblId IsNot Nothing Then
            Select Case lblId.Text  
                Case "1"                  'qui io ho dei "numeri", tu metti il tuo testo. 
                                             'Attento, questo è Case sensitive, fai Upper 
                                             ' (o lower) di tutti e due....
                    lblId.ForeColor = Drawing.Color.Green
                                             'ti consiglio di impostare anche un colore di sfondo adeguato...
                Case "2"
                    lblId.ForeColor = Drawing.Color.Red

                Case Else
                    lblId.ForeColor = Drawing.Color.Blue
            End Select
        End If
    End Sub