DataTables(
"产品").Save()
DataTables("订单").AllowEdit
= False
既然是集合，我们就可以通过For Each语句遍历集合中所有元素。
例如下面的代码，列出所有DataTable的名称：
For
Each
dt As
DataTable
In
DataTables
Output.Show(dt.Name)
Next
DataTables的属性：
- Count
用于返回DataTable的数量。
- AllowEdit
是否允许编辑数据。
默认为True，如果将此属性设为False，将锁定所有DataTable，相当于单击菜单中的“查阅模式”按钮。
- PreserveEditMode
逻辑型，是否进入编辑模式。
例如：
Output.Show(
"总表数:"
& DataTables.Count)
DataTables.AllowEdit
= False '锁定所有表,进入查阅模式
DataTables.AllowEdit
= True
只有DataTables和DataTable的AllowEdit属性都为True的情况下，我们才能够在DataTable中输入数据。
DataTables的方法：
-
Save
保存所有表，等同于单击菜单中的“保存”按钮。
- Contains
判断是否存在指定名称的DataTable，如果存在，则返回True，否则返回False
- RejectChanges
撤销自打开文件或最近一次保存以来的全部修改。
- Load
加载表，这个方法的使用会在动态加载这一章进行介绍
- Unload
卸载表，这个方法的使用会在动态加载这一章进行介绍
例如：
DataTables.
Save()
'保存所有表
If DataTables.Contains("统计表1")
'如果存在统计表1
MessageBox.Show("此表已经存在")
End If