【正文】 演講完畢，謝謝觀看！。n 4．參照 。n 2．參照 。指針?biāo)傅挠涗浱杗 If 0 Thenn (2) = 記錄：目前在第 條記錄 n End Ifn ……n End Subn ② 當(dāng)導(dǎo)入數(shù)據(jù)時，第 2個窗格顯示了導(dǎo)入的總記錄數(shù)，在導(dǎo)入菜單的 Click事件里編寫如下代碼：n Private Sub import_Click()n ……n (2) = 已導(dǎo)入，現(xiàn)在共有 條記錄 n ……n End Subn ③ 在 DataGrid1控件里移動光標(biāo)時，第 2個窗格顯示當(dāng)前記錄數(shù)，在 DataGrid1控件的 RowColChange事件里編寫如下代碼：n Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)n ……n (2) = 記錄：目前在第 條記錄 n ……n End Sub 狀態(tài)欄的設(shè)計n （ 2）在狀態(tài)欄的第 3個窗格里顯示當(dāng)前用戶n 用戶登錄時輸入了用戶名，將值帶入 Form11窗體里，因此在 Form_Load事件里編寫如下代碼：n Private Sub Form_Load()n ……n (3) = 當(dāng)前用戶 : g_usern End Subn 編寫完事件后，運行程序時狀態(tài)欄顯示相應(yīng)的信息如圖 517所示。n （ 1）狀態(tài)欄的前兩個窗格信息：總記錄數(shù)和當(dāng)前指針的記錄數(shù)n ① 單擊 ListView1的每 1項時，狀態(tài)欄的前兩個窗格分別顯示當(dāng)前處理的數(shù)據(jù)表的總記錄數(shù)和當(dāng)前指針的記錄數(shù)，在 ListView1控件的Click事件里編寫如下代碼：n Private Sub ListView1_Click()n ……n 39。 表 510 “窗格 ”選項卡的屬性設(shè)置索引 關(guān)鍵字 樣式 有效性 說明1 q1 0sbrText 有效 當(dāng)前窗體中數(shù)據(jù)的總記錄數(shù)2 q2 0sbrText 有效 當(dāng)前指向的記錄數(shù)3 q3 0sbrText 有效 當(dāng)前用戶4 q4 3sbrIns 無效 當(dāng)前鍵盤上的 Insert狀態(tài)5 q5 5 sbrTime 有效 當(dāng)前時間 狀態(tài)欄的設(shè)計n 3．編寫事件代碼n 窗格對象是一個以 1為底的集合，可以用 Item屬性引用指定的窗格對象，格式如下：n (index)n 其中， index是窗格的索引號。n （ 4）單擊 “插入窗格 ”按鈕，依次加入所需的各個窗格，如圖 516所示。n （ 2）選中 StBar1控件，單擊右鍵，在彈出菜單中選擇 “屬性 ”菜單項，彈出 “屬性頁”對話框。n 1．添加 StatusBar控件n 在上節(jié)中介紹了在工具箱中添加 StatusBar控件的方法，這里不再贅述。n “企業(yè)資質(zhì)管理系統(tǒng) ” 狀態(tài)欄的設(shè)計n 在 “企業(yè)資質(zhì)管理系統(tǒng) ”中利用狀態(tài)欄顯示系統(tǒng)運行時的一些信息，包括當(dāng)前運行的各個數(shù)據(jù)表的總記錄數(shù)，當(dāng)前指針的記錄數(shù)，當(dāng)前用戶、當(dāng)前鍵盤上的 Insert狀態(tài)和當(dāng)前時間。2 sbrContents調(diào)整 Panel 大小以適合它的目錄，但是其寬度決不會低于 MinWidth 屬性指定的寬度。取值如表 59所示： 表 59 Panel對象的 AutoSize屬性取值值 常數(shù) 描述0 sbrNoAutoSize缺省設(shè)置， Panel不能自動調(diào)整大小，其寬度由 Width 屬性指定。n “斜面 ”：對應(yīng)于 Panel對象的 Bevel屬性，用來設(shè)置 Panel對象的斜面樣式。7 sbrKana 當(dāng)激活滾動鎖定時，用黑體顯示字母 KANA；而當(dāng)滾動鎖定停用時，顯示暗淡的字母。5 sbrTime 以系統(tǒng)格式顯示當(dāng)前時間。 3 sbrIns 當(dāng)激活插入鍵時，用黑體顯示字母 INS；而當(dāng)停用插入鍵時，顯示暗淡的字母。1 sbrCaps 當(dāng)激活 Caps Lock 時，用黑體顯示字母 CAPS；而當(dāng)停用 Caps Lock 時，顯示暗淡的字母。 表 57 Panel對象的 Style屬性設(shè)置值 常數(shù) 描述0 sbrText 缺省設(shè)置。取值如表 56所示： 表 56 Panel對象的 Alignment屬性取值值 常數(shù) 描述 0 sbrLeft 文本左對齊 1 sbrCenter 文本居中 2 sbrRight文 本右對齊 狀態(tài)欄的設(shè)計 n “樣式 ”：對應(yīng)于 Panel對象的 Style屬性，用來設(shè)置窗格的樣式。n “實際寬度 ”：對應(yīng)于 Panel對象的 Width屬性，表示窗格的當(dāng)前寬度，Width屬性值總是反映窗格的實際寬度，并且不能小于 MinWidth屬性值。當(dāng) AutoSize屬性被設(shè)置為 1時，使用 MinWidth屬性可以防止窗格因自動調(diào)整大小被調(diào)整到太小的寬度。該標(biāo)識符在整個 Panel對象集合的標(biāo)識符中必須惟一。n “工具提示文本 ”：對應(yīng)于 Panel對象的 ToolTipText屬性，用于設(shè)置相應(yīng)的窗格的提示信息，運行時鼠標(biāo)指向該窗格時會出現(xiàn)該提示字符串。n “文本 ”：對應(yīng)于 Panel對象的 Text屬性，用于設(shè)置要在窗格中顯示的文本。n “索引 ”：對應(yīng)于 Panel對象的 Index屬性，表示添加的 Panel對象的索引值，該索引值由添加次序決定。 “窗格 ” 選項卡用來添加 “窗格 ”（ Panel）對象，以及設(shè)置每個 “窗格 ”對象的各種屬性，其中一些屬性如下： 圖 515 StatusBar控件的 “屬性頁 ”對話框的 “窗格 ”選項卡 狀態(tài)欄的設(shè)計n “插人窗格 ”按鈕：每次單擊該按鈕可以在狀態(tài)欄上添加一個窗格。運行時，當(dāng)鼠標(biāo)指向工具欄時，鼠標(biāo)指針顯示成該屬性定義的形狀。n “鼠標(biāo)指針 ”：對應(yīng)于工具欄的 MousePointer屬性。 圖 514 StatusBar控件的 “屬性頁 ”對話框的 “通用 ”選項卡 狀態(tài)欄的設(shè)計n ④ 設(shè)置 “通用 ”選項卡的屬性，其中一些屬性如下：n “樣式 ”：對應(yīng)于工具欄的 Style屬性，用于決定工具欄按鈕的外觀樣式。n （ 1）創(chuàng)建 StatusBar控件n 利用 StatusBar控件創(chuàng)建狀態(tài)欄的步驟如下：n ① 在工具箱中 StatusBar控件加入到窗體中，生成 StatusBar1控件。 圖 513 工具箱中的 Statusbar 控件 狀態(tài)欄的設(shè)計n 2．使用狀態(tài)欄控件制作狀態(tài)欄n 使用狀態(tài)欄控件 StatusBar可以很容易地設(shè)計出具有 Windows風(fēng)格的狀態(tài)欄。n 狀態(tài)欄的設(shè)計n 1．添加狀態(tài)欄控件（ Statusbar）n 制作狀態(tài)欄需要添加一個 Active控件： Statusbar 控件。 按鈕代碼。添加 39。 按鈕代碼。添加 39。 按鈕代碼。添加 39。 按鈕代碼。添加 39。 按鈕代碼。添加 39。 按鈕代碼。添加 39。 圖 512 “通用 ”選項卡的設(shè)置 工具欄的設(shè)計n 接著選擇 “按鈕 ”選項卡，添加工具欄的按鈕，各按鈕的屬性設(shè)置如表 55所示。n 2．創(chuàng)建 Imagelist控件n 按前面介紹的方法在工具箱中選擇一個 Imagelist控件放在窗體中，定義該控件的名稱為 ToolbarIcons，在 ToolbarIcons控件的 “屬性頁 ”對話框選擇 “圖像 ”選項卡，單擊 “插入圖片 ”按鈕，依次加入所需的各個圖標(biāo)，如圖 511所示。 工具欄的設(shè)計n “企業(yè)資質(zhì)管理系統(tǒng) ” 工具欄的設(shè)計n 在 “企業(yè)資質(zhì)管理系統(tǒng) ”中提供給用戶便捷操作的工具欄，下面結(jié)合 “企業(yè)資質(zhì)管理系統(tǒng) ”介紹工具欄的設(shè)計步驟。 n ⑦ 設(shè)置完 Toolbar控件的 “屬性頁 ”對話框中的值，單擊 “確定 ”按鈕，即生成了系統(tǒng)的工具欄。n ⑥ 設(shè)置 “圖片 ”選項卡n 當(dāng)在 “通用 ”選項卡的 “鼠標(biāo)指針 ”設(shè)置