在窗口放置一個(gè)MSHFlexGrid1控件（注意：在標(biāo)準(zhǔn)工具箱沒(méi)有這個(gè)控件，需要你自己添加，方法是點(diǎn)擊【工程】菜單，在下拉菜單再點(diǎn)擊【部件】，在對(duì)話框中勾選Microsoft FlexGrid con

在窗口放置一個(gè)MSHFlexGrid1控件（注意：在標(biāo)準(zhǔn)工具箱沒(méi)有這個(gè)控件，需要你自己添加，方法是點(diǎn)擊【工程】菜單，在下拉菜單再點(diǎn)擊【部件】，在對(duì)話框中勾選Microsoft FlexGrid control 6.0 (SP6)選項(xiàng)即可。），如果你還需要其他控件，繼續(xù)添加，這里我們僅僅添加一個(gè)MSHFlexGrid1控件。

要顯示或隱藏子記錄，你必須有數(shù)據(jù)庫(kù)，這里我們采用Access數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)中包含兩個(gè)數(shù)據(jù)表，一個(gè)是父記錄表，一個(gè)是子記錄表，父記錄表可以包含很多字段，同樣子記錄表中也可以包含很多字段，但是必須強(qiáng)調(diào)的一點(diǎn)：父記錄表中的其中一個(gè)字段必須和子記錄表中的一個(gè)字段不論大小、數(shù)據(jù)類型、字段名稱、默認(rèn)值都應(yīng)該完全一樣，這是父記錄連接子記錄的依據(jù)，具體的數(shù)據(jù)表我這里就不給出，根據(jù)你自己的需要設(shè)置吧。

設(shè)置顯示、隱藏子記錄的方法

在VB界面的工程屬性窗口，右擊已經(jīng)存在的窗口名稱，在彈出的菜單中選擇【添加】-【Data Environment】這樣在你的程序中就添加了一個(gè)數(shù)據(jù)環(huán)境設(shè)計(jì)器DataEnvironment1，點(diǎn)擊DataEnvironment1，在設(shè)計(jì)窗口有一個(gè)Connection1的項(xiàng)目，右擊Connection1項(xiàng)目，選擇lt;屬性gt;，在出現(xiàn)的對(duì)話框中選擇lt;連接gt;選項(xiàng)卡，點(diǎn)擊（使用連接字符串）選項(xiàng)，再點(diǎn)擊【編譯…】按鈕，安裝要求創(chuàng)建文件數(shù)據(jù)源，最后在編譯按鈕前的文本框中就可以顯示你選擇的文件數(shù)據(jù)源了（包括數(shù)據(jù)源、數(shù)據(jù)源的連接方式等等，這部分不是本文探討的重點(diǎn)，不再詳述）。好了創(chuàng)建了數(shù)據(jù)連接，我們基本上完成了一半工作，下面你必須雙擊Connection1項(xiàng)目，在Connection1項(xiàng)目下面增加了一個(gè)Command1項(xiàng)目，右擊Command1項(xiàng)目，選擇屬性，在對(duì)話框的通用選項(xiàng)卡中的數(shù)據(jù)庫(kù)對(duì)象選擇“表“，對(duì)象名稱中選擇“父記錄表”，然后點(diǎn)擊【確定】按鈕即可。

哈哈！父記錄表的所有字段全部顯示在Command1項(xiàng)目下了！再雙擊Command1項(xiàng)目，在Command1項(xiàng)目下面增加了一個(gè)Command2項(xiàng)目，右擊Command2項(xiàng)目，選擇屬性，在對(duì)話框的通用選項(xiàng)卡中的數(shù)據(jù)庫(kù)對(duì)象選擇“表“，對(duì)象名稱中選擇“子記錄表”，緊接著，你必須設(shè)置父記錄和子記錄的關(guān)聯(lián)，選擇關(guān)聯(lián)選項(xiàng)卡，在父字段選擇要和子記錄關(guān)聯(lián)字段名，在子字段選擇和父記錄關(guān)聯(lián)的字段名，選擇后點(diǎn)擊【添加】按鈕，這樣父記錄和子記錄就設(shè)置了相互關(guān)聯(lián)了，然后點(diǎn)擊【確定】按鈕即可。

哈哈！子記錄表的所有字段全部顯示在Command2項(xiàng)目下了！

好了到這里數(shù)據(jù)環(huán)境設(shè)計(jì)已經(jīng)完成，接下來(lái)我們必須將我們剛剛設(shè)計(jì)的數(shù)據(jù)環(huán)境加載到MSHFlexGrid1控件，就界面轉(zhuǎn)換到窗體的設(shè)計(jì)窗口，點(diǎn)擊MSHFlexGrid1控件，在MSHFlexGrid1控件的屬性對(duì)話框找到DataSource屬性，就其屬性設(shè)置為DataEnvironment1，將DataMember屬性值設(shè)置為Command1，好了，我們已經(jīng)將數(shù)據(jù)環(huán)境加載到MSHFlexGrid1控件了。

對(duì)MSHFlexGrid1控件進(jìn)行連接設(shè)置

僅僅將數(shù)據(jù)環(huán)境加載到MSHFlexGrid1控件還不夠，接下來(lái)我們要對(duì)MSHFlexGrid1控件進(jìn)行連接設(shè)置，因?yàn)槲覀冃枰⒏赣涗浐妥佑涗浀年P(guān)聯(lián)，這必須在MSHFlexGrid1控件的帶區(qū)進(jìn)行設(shè)置，具體方法是：右擊MSHFlexGrid1控件，在出現(xiàn)的列表中，選擇屬性，在屬性對(duì)話框中選擇帶區(qū)選項(xiàng)卡，這時(shí)出現(xiàn)的帶區(qū)是帶區(qū)0，在下面的列表框中出現(xiàn)“父記錄表”中所有字段，如果你不想將有些字段顯示在MSHFlexGrid1控件中，你可以將不顯示字段前面的勾去掉即可，這樣父記錄就設(shè)置完成了。接下來(lái)設(shè)置子記錄，點(diǎn)擊帶區(qū)下拉框的小三角，選擇帶區(qū)為帶區(qū)1，在下面的列表框中出現(xiàn)“子記錄表”中所有字段，如果你不想將有些字段顯示在MSHFlexGrid1控件中，你可以將不顯示字段前面的勾去掉即可，另外，這樣子記錄就設(shè)置完成了。

整個(gè)設(shè)置已經(jīng)完成，現(xiàn)在你點(diǎn)擊運(yùn)行按鈕（即小三角），怎么樣？你的父記錄前面是不是出現(xiàn)了 、-號(hào)的展開收縮項(xiàng)？到這里就完成了。

注意：上面所說(shuō)的“父記錄表”和“子記錄表”是為敘述方便而臨時(shí)命名的，根據(jù)你的數(shù)據(jù)庫(kù)不同，父記錄和子記錄數(shù)據(jù)表名稱不同，進(jìn)行修改即可。如果你需要調(diào)整列寬，在代碼窗口使用(X) 數(shù)字進(jìn)行調(diào)整，其中X是需要調(diào)整的列代號(hào)（0-整個(gè)列數(shù)）。