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