在ItemDataBound中FindControl(label,HyperLink) 定义字体的色彩!(:)简单的问题)

 1   If (e.Item.ItemType  =  ListItemType.AlternatingItem Or e.Item.ItemType  =  ListItemType.Item Or e.Item.ItemType  =  ListItemType.EditItem) Then
 2             Dim dc_name As HyperLink  =  CType(e.Item.FindControl( " dc_name " ), HyperLink)
 3             Select Case dc_name.Text
 4                 Case  " 新闻 "
 5                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #0000FF " )
 6                 Case  " 娱乐 "
 7                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
 8                 Case  " 体育 "
 9                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
10                 Case  " I T "
11                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #0000FF " )
12                 Case  " 体育 "
13                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
14                 Case  " 图片 "
15                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF0066 " )
16                 Case  " 文化 "
17                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #CC0000 " )
18                 Case  " 影音 "
19                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #CC00CC " )
20                 Case  " 生活 "
21                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
22                 Case  " 财经 "
23                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #009900 " )
24                 Case  " 军事 "
25                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #0000FF " )
26                 Case  " 技术 "
27                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #666666 " )
28                 Case  " 情感 "
29                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF0066 " )
30                 Case  " 游戏 "
31                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
32                 Case  " 商机 "
33                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #0000FF " )
34                 Case  " 就业 "
35                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #CC6600 " )
36                 Case  " 两性 "
37                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF0066 " )
38                 Case  " 体育 "
39                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #FF6600 " )
40                 Case  " 其他 "
41                     dc_name.ForeColor  =  dc_name.ForeColor.FromName( " #666666 " )
42             End Select

转载于:https://www.cnblogs.com/T_98Dsky/archive/2005/04/30/147981.html