'*** Status ***'
Dim lblStatus As Label = CType(e.Row.FindControl("lblStatus"),Label)
IF Not IsNothing(lblStatus) Then
IF e.Row.DataItem("Status") = "1" Then
lblStatus.Text = "AAA"
Else IF IF e.Row.DataItem("Status") = "2" Then
lblStatus.Text = "BBB"
Else
lblStatus.Text = "CCC"
End IF
End IF