![](https://www.cnblogs.com/Images/OutliningIndicators/ContractedBlock.gif)
![](https://www.cnblogs.com/Images/OutliningIndicators/ExpandedBlockStart.gif)
html
1
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:datalist id="datalist1" Width="690px" BorderStyle="None" ShowFooter="False" GridLines="Both"
2
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
Runat="server">
3
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<HeaderTemplate>
4
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<table style="FONT-WEIGHT: bold; FONT-SIZE: 9pt; COLOR: white; FONT-FAMILY: 新細明體">
5
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<tr>
6
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center">傳票單號</td>
7
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center">入帳日期</td>
8
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center">傳票狀態</td>
9
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: right">本幣借方</td>
10
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: right">本幣貸方</td>
11
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 60px; TEXT-ALIGN: center">審核</td>
12
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</tr>
13
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</table>
14
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</HeaderTemplate>
15
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<AlternatingItemStyle BackColor="#DBC4C4"></AlternatingItemStyle>
16
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<ItemTemplate>
17
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<table style=" FONT-SIZE: 9pt; FONT-FAMILY: 新細明體">
18
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<tr>
19
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center ">
20
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:linkbutton ID="accno" Runat=server text='<%#databinder.eval(container.dataitem,"傳票單號") %>' CommandName="select" />
21
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</td>
22
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center "><%# container.dataitem("入帳日期")%></td>
23
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: center; "><%# container.dataitem("傳票狀態")%></td>
24
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: right; "><%# container.dataitem("本幣借方")%></td>
25
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 120px; TEXT-ALIGN: right; "><%# container.dataitem("本幣貸方")%></td>
26
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td style="WIDTH: 60px; TEXT-ALIGN: center; ">
27
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:CheckBox ID="cb" Runat=server Checked='<%# Databinder.eval(container.dataitem,"審核") %>' /></td>
28
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</tr>
29
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<tr>
30
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<td colspan="6">
31
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:DataGrid ID="Datagrid1" Runat="server" AutoGenerateColumns="False" Font-Name="新細明體" Font-Size="9pt"
32
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
GridLines="Both" BorderStyle="None">
33
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<Columns>
34
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="seq" HeaderText="序" ItemStyle-Width="10px" ItemStyle-HorizontalAlign="center"></asp:BoundColumn>
35
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="acccode" HeaderText="科目" ItemStyle-Width="60px"></asp:BoundColumn>
36
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="accname" HeaderText="科目名稱" ItemStyle-Width="100px"></asp:BoundColumn>
37
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="remark" HeaderText="摘要" ItemStyle-Width="200px"></asp:BoundColumn>
38
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="ckind" HeaderText="幣別" ItemStyle-Width="40px" ></asp:BoundColumn>
39
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="cramt" HeaderText="原幣借方" ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign=Right></asp:BoundColumn>
40
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="dramt" HeaderText="原幣貸方" ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign=Right></asp:BoundColumn>
41
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="crate" HeaderText="匯率" ItemStyle-Width="50px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign=Right></asp:BoundColumn>
42
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="camt" HeaderText="本幣借方" ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign=Right></asp:BoundColumn>
43
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<asp:BoundColumn DataField="damt" HeaderText="本幣貸方" ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign=Right></asp:BoundColumn>
44
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</Columns>
45
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</asp:DataGrid></td>
46
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</tr>
47
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</table>
48
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</ItemTemplate>
49
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
<HeaderStyle BorderStyle="None" BackColor="#B58383"></HeaderStyle>
50
![](https://www.cnblogs.com/Images/OutliningIndicators/None.gif)
</asp:datalist>
Code:
page_load事件:
...
datalist1.DataSource = dt
datalist1.DataBind()
datalist1.Visible = True
Dim accno As String
For inta = 0 To datalist1.Items.Count - 1
accno = CType(datalist1.Items(inta).FindControl("accno"), LinkButton).Text
Dim datagrid1 As DataGrid = CType(datalist1.Items(inta).FindControl("datagrid1"), DataGrid)
...
datagrid1.DataSource = dt
datagrid1.DataBind()
datagrid1.Visible = False
Next
datalist1_ItemCommand事件:
Dim dg As DataGrid = CType(e.Item.FindControl("datagrid1"), DataGrid)
If dg.Visible = True Then
dg.Visible = False
Else
dg.Visible = True
End If