設計讓列表頁有序號

aspx

code-behine

Protected Sub ListView1_ItemDataBound(sender As Object, e As System.Web.UI.WebControls.ListViewItemEventArgs) Handles ListView1.ItemDataBound
        If e.Item.ItemType = ListViewItemType.DataItem Then
            Dim lvdi As ListViewDataItem = CType(e.Item, ListViewDataItem)
            Dim drv As DataRowView = CType(lvdi.DataItem, DataRowView)
            Dim Literal1 As Literal = CType(e.Item.FindControl("Literal1"), Literal)
            Literal1.Text = lvdi.DataItemIndex + 1
        End If
 End Sub