一個“拆分”的網(wǎng)格使最終用戶對相同的數(shù)據(jù)可以擁有多個視圖。例如，假設(shè)有一個由十個字段組成的大表。在這種情況下，在控件中察看的記錄集將有十列寬，除非窗體非常寬，否則用戶將無法同時看見所有列的內(nèi)容。更進(jìn)一步，假設(shè)用戶只對第一列和最后一列感興趣（例如，第一列是名字，最后一列是電話號碼）。為了能同時看到在兩端的列（不重新安排列的順序），可以對網(wǎng)格進(jìn)行拆分?！ ?
創(chuàng)建一個 Split 對象
在設(shè)計時，可以創(chuàng)建一個拆分，具體步驟是：右鍵單擊網(wǎng)格，單擊“編輯”，再單擊右鍵，然后單擊“拆分”。通過右鍵單擊該控件，并單擊“屬性”來顯示“屬性頁”對話框，可以編輯這個拆分?？梢允褂谩安鸱帧边x項(xiàng)卡來自定義拆分。要刪除一個拆分，右鍵單擊該拆分，并單擊“刪除”。
在運(yùn)行時，最終用戶也可以通過單擊位于這個網(wǎng)格控件的左下邊的右邊的選項(xiàng)卡，以手工方式來拆分該網(wǎng)格（除非不允許這個操作），如下圖所示：
默認(rèn)情況下，DataGrid 控件包含一個 Split 對象。防止最終用戶添加拆分的代碼為：
DataGrid1.Splits(0).AllowSizing = False
在程序中添加和刪除拆分
DataGrid 控件包含一個 Split 對象的集合。要在程序中添加拆分，可以使用 Add 方法，如下所示：
DataGrid1.Splits.Add 1
注意 Add 方法需要新的拆分索引作為其參數(shù)。要添加一個拆分，應(yīng)將這個索引參數(shù)設(shè)置為 Splits 集合的 Count 屬性值?！ ?
使用 Split 集合的 Add 方法，可以在程序中按照所實(shí)際需要添加拆分。由于添加多于兩個以上的拆分將使網(wǎng)格很難使用，可以使用該集合的 Count 屬性來限制拆分的數(shù)目?！?
If DataGrid1.Splits.Count < 3 Then ' 添加一個拆分。
DataGrid1.Splits.Add DataGrid1.Splits.Count
End If
使拆分同步
當(dāng)拆分多于一個時，可能希望控制這些拆分如何滾動。例如，在一個具有三個拆分的網(wǎng)格中，可以決定只讓第一個和第三個拆分同步，而讓中間的拆分獨(dú)立地滾動。要同步任何兩個（或多個）拆分，只需將每個 Split 對象的 ScrollGroup 屬性設(shè)置為同一個值。
' 使第一個和第三個 Split 對象同步。
With DataGrid1
.Splits(0).ScrollGroup = 1
.Splits(1).ScrollGroup = 2
.Splits(2).ScrollGroup = 1
End With
通過設(shè)置 Scrollbars 屬性，使同步的拆分組只顯示一個滾卷?xiàng)l，從而進(jìn)一步自定義拆分的外觀。
控制 Tab 鍵和箭頭鍵的行為
使用 WrapCellPointer、TabAcrossSplits、以及 TabAction 屬性，可以決定當(dāng)最終用戶按下 tab 鍵或箭頭鍵時網(wǎng)格的行為。
在這三個屬性中，TabAction 屬性級別最高，它決定 WrapCellPointer 和 TabAcrossSplits 這兩個屬性是否能生效。TabAction 有三個設(shè)置值： Control Navigation、Column Navigation 和 Grid Navigation。當(dāng)該屬性設(shè)置為 Control Navigation 時，按 tab 鍵將根據(jù) TabIndex 將焦點(diǎn)切換到下一個控件。這一設(shè)置優(yōu)先于 WrapCellPointer 和 TabAcrossSplits。
WrapCellPointer 屬性決定在任何單個的拆分中 tab 鍵和箭頭鍵的行為。如果該屬性設(shè)置為 True，且當(dāng)前單元位于最后一列，這時最終用戶按 tab 鍵則使第一列的下一行變成當(dāng)前的單元。不過，如果當(dāng)前單元位于最后一行的最后一列時，這時就沒有地方可以“換行”。
TabAcrossSplits 屬性決定當(dāng)網(wǎng)格中存在兩個或多個拆分時 tab 和箭頭鍵的行為。如果該屬性設(shè)置為 True，且當(dāng)前單元位于任何一個拆分的最后一列，則按 tab 或箭頭鍵將使當(dāng)前單元“跳” 到下一個拆分的第一列。當(dāng)前單元仍保持相同的行位置?！ ?
注意 如果 WrapCellPointer 和 TabAcrossSplits 屬性都設(shè)置為 True，則只有當(dāng)前單元位于最后一個拆分的最后一列時才會換行。這時當(dāng)前單元將換到第一個拆分的第一列中的下一行。
自定義列集合
每一個 Split 對象都有一個 Columns 屬性，允許用戶來操作一個 Column 對象的集合。通過這樣做，可以更改每個 Split 對象的外觀。例如，可以用一個拆分包含顯示姓氏字段和名字字段的兩個列，而第二個拆分則顯示電話字段和地址字段。要實(shí)現(xiàn)這一目標(biāo)，需要將其它的每一列的 Visible 屬性設(shè)置為 False，如下所示：
' 枚舉 Columns 集合，對每一個 Column 對象的 DataField 屬性
' 進(jìn)行測試。如果測試失敗，則隱藏這一列。
Dim i As Integer
' 隱藏除 ProductName 列之外的所有列。
For i = 0 To DataGrid1.Splits(0).Columns.Count - 1
If DataGrid1.Splits(0).Columns(i).DataField <> "ProductName" Then
DataGrid1.Splits(0).Columns(i).Visible = False
End If
Next i
' 隱藏除 UnitPrice 列之外的所有列。
For i = 0 To DataGrid1.Splits(0).Columns.Count - 1
If DataGrid1.Splits(1).Columns(i).DataField <> "UnitPrice" Then
DataGrid1.Splits(1).Columns(i).Visible = False
End If
Next I
