2. 創建控件
對于程序員來說,用例子說話是最好的方式來提供解決方案,我將在頁面上動態的放置一些標簽(label)和文本框(textbox),這些文本框里頭放置的是從dataset取到的數據,同時我把這些文本框放置到一個表格的相應單元格里,可以實現有序的放置,首先在頁面添加一個table。然后根據需要創建不同的列數和行數,如下為動態創建這些文本框的代碼:
Dim i As Integer
For i = 0 To IntRowCount - 1
Dim r As TableRow = New TableRow()
Dim c1 As TableCell = New TableCell()
Dim myLabel1 As Label = New Label()
‘這里設置該label的ID,對于不同的label,必須設置成不同的ID,我這里設置成前綴lbl1加字段名的組合,例如lbl1xlmc等。
myLabel1.ID = "Lbl1" & Trim(OleDsField.Tables("Field").Rows(i).Item("column_name")).ToString()