鼠标移动，改变datagrid颜色
类别: ASP.NET教程 
Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs)
If e.Item.ItemType = ListItemType.Item Or _
e.Item.ItemType = ListItemType.AlternatingItem Then
\'---------------------------------------------------
\' Add the OnMouseOver and OnMouseOut method to the Row of DataGrid
\'---------------------------------------------------
e.Item.Attributes.Add("onmouseover", "this.style.backgroundColor=\'Silver\'")
e.Item.Attributes.Add("onmouseout", "this.style.backgroundColor=\'white\'")
End If
End Sub
Sub DataGrid2_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs)
If e.Item.ItemType = ListItemType.Item Or _
e.Item.ItemType = ListItemType.AlternatingItem Then
\'---------------------------------------------------
\' Add the OnMouseOver and OnMouseOut method a Cell (Column) of DataGrid
\'---------------------------------------------------
e.Item.Cells(1).Attributes.Add("onmouseover", "this.style.backgroundColor=\'#DDEEFF\'")
e.Item.Cells(1).Attributes.Add("onmouseout", "this.style.backgroundColor=\'white\'")
\'---------------------------------------------------
\' Change the Mouse Cursor of a particular Cell (Column) of DataGrid
\' (Or you may do it for a whole Row of DataGrid :)
\'---------------------------------------------------
e.Item.Cells(3).Style("cursor") = "hand"
\'---------------------------------------------------
\' Add the OnClick Alert MessageBox to a particular Cell (Column) of DataGrid
\'---------------------------------------------------
e.Item.Cells(3).Attributes.Add("onclick", "alert(\'You click at ID: " & e.Item.Cells(0).Text & "!\');")
End If
End Sub
If e.Item.ItemType = ListItemType.Item Or _
e.Item.ItemType = ListItemType.AlternatingItem Then
\'---------------------------------------------------
\' Add the OnMouseOver and OnMouseOut method to the Row of DataGrid
\'---------------------------------------------------
e.Item.Attributes.Add("onmouseover", "this.style.backgroundColor=\'Silver\'")
e.Item.Attributes.Add("onmouseout", "this.style.backgroundColor=\'white\'")
End If
End Sub
Sub DataGrid2_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs)
If e.Item.ItemType = ListItemType.Item Or _
e.Item.ItemType = ListItemType.AlternatingItem Then
\'---------------------------------------------------
\' Add the OnMouseOver and OnMouseOut method a Cell (Column) of DataGrid
\'---------------------------------------------------
e.Item.Cells(1).Attributes.Add("onmouseover", "this.style.backgroundColor=\'#DDEEFF\'")
e.Item.Cells(1).Attributes.Add("onmouseout", "this.style.backgroundColor=\'white\'")
\'---------------------------------------------------
\' Change the Mouse Cursor of a particular Cell (Column) of DataGrid
\' (Or you may do it for a whole Row of DataGrid :)
\'---------------------------------------------------
e.Item.Cells(3).Style("cursor") = "hand"
\'---------------------------------------------------
\' Add the OnClick Alert MessageBox to a particular Cell (Column) of DataGrid
\'---------------------------------------------------
e.Item.Cells(3).Attributes.Add("onclick", "alert(\'You click at ID: " & e.Item.Cells(0).Text & "!\');")
End If
End Sub
- 上一篇: .NET 三种 序列化方式
- 下一篇: .NET真面目（上）
