'列-表結構 DataCol '行-表數據 DataRow DataTables("訂單").AllowEdit = False '禁止編輯表 DataTables("訂單").DataCols("折扣").SetFormat("0.0") '格式化折扣列 DataTables("訂單").DataRows(0).Locked = True '鎖定第一行

DataTable

'DataTables("訂單").AllowEdit = False '禁止編輯表 'DataTables("訂單").DataCols("折扣").SetFormat("0.0") '格式化折扣列 'DataTables("訂單").DataRows(0).Locked = True '鎖定第一行'Dim dr As DataRow = DataTables("訂單").DataRows(0) 'Dim rq As Date = dr("日期") 'Dim sl As Integer = dr("數量") 'dr("產品") = "PD01"Dim Total As Integer For Each dr As DataRow In DataTables("訂單").DataRowsTotal = Total + dr("數量") Next Output.Show(Total)

DataTable與Table:

Table是用于顯示數據的表格控件,是數據展示者.
DataTable是原始的數據表.
DataTable理解為一個倉庫,從廠家進的貨(從后臺加載數據)存放在倉庫中;
Table就像一個展廳,從倉庫中提取符合條件的數據,按指定的順序(Filter和Sort)展示給客戶.
主表和活動表

'MianTable單擊表標題選中的表 'CurrentTable返回輸入焦點所在的表 'MainTable = Tables("訂單") '設置主表 Output.Show("活動表:" & CurrentTable.Name) Output.Show("主表:" & MainTable.Name)

Table

'隱藏訂單表的金額列 Tables("訂單").Cols("金額").Visible = False 'Row和Current Dim r1 As Row = Tables("訂單").Rows(0) Dim r2 As Row = Tables("訂單").Current '獲取當前行,焦點所在行 Output.Show(r1("產品")) Output.Show(r2("產品")) '返回當前行的索引 Output.Show(Tables("訂單").Position) 'DataRow的RowState屬性 Dim dr As DataRow = Tables("訂單").Current.DataRow If dr.RowState = DataRowState.Added ThenOutput.Show("當前行是新增行") ElseIf dr.RowState = DataRowState.Modified ThenOutput.Show("當前行是修改行") ElseOutput.Show("未修改行") End If

總結

以上是生活随笔為你收集整理的Foxtable编程的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。