📄 grid10.aspx
字号:
<%@ Import Namespace="System.Data" %>
<html>
<script language="VB" runat="server">
Function CreateDataSource() As ICollection
Dim dt As DataTable
Dim dr As DataRow
Dim i As Integer
'创建一个数据表
dt = New DataTable
dt.Columns.Add(New DataColumn("IntegerValue", GetType(Integer)))
dt.Columns.Add(New DataColumn("StringValue", GetType(String)))
dt.Columns.Add(new DataColumn("CurrencyValue", GetType(Double)))
'用For循环对行数据进行赋值
For i = 1 To 9
dr = dt.NewRow()
dr(0) = i
dr(1) = "Item " & i.ToString()
dr(2) = 1.23 * (i + 1)
'增加行数据到数据表
dt.Rows.Add(dr)
Next
'返回数据表的视图
Dim dv as DataView = New DataView(dt)
CreateDataSource = New DataView(dt)
End Function
Sub Page_Load(sender As Object, e As EventArgs)
'进行数据绑定
If Not IsPostBack Then
MyDataGrid.DataSource = CreateDataSource()
MyDataGrid.DataBind
End If
End Sub
Sub Button1_Col1Vis(sender As Object, e As EventArgs)
MyDataGrid.Columns(1).Visible = Not MyDataGrid.Columns(1).Visible
Label1.Text = "字符串字段的visible属性被设置为：" & MyDataGrid.Columns(1).Visible.ToString
End Sub
</script>
<body>
<h3><font face="Verdana">在DataGrid中隐藏字段的例子</font></h3>
<form runat=server>
<ASP:DataGrid id="MyDataGrid" runat="server"
BorderColor="black"
BorderWidth="1"
GridLines="Both"
CellPadding="3"
CellSpacing="0"
Font-Name="Verdana"
Font-Size="8pt"
HeaderStyle-BackColor="#aaaadd"
AutoGenerateColumns="false"
>
<Columns>
<asp:BoundColumn HeaderText="整型" DataField="IntegerValue" />
<asp:BoundColumn HeaderText="字符串类型" DataField="StringValue"/>
<asp:BoundColumn HeaderText="货币类型" DataField="CurrencyValue" DataFormatString="{0:c}" ItemStyle-HorizontalAlign="right" />
</Columns>
</asp:DataGrid>
<br>
<asp:Button id="Button1" Text="变换字符串字段的visible属性" OnClick="Button1_Col1Vis" runat="server" />
<br>
<asp:Label id="Label1" runat="server" />
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -