MousePointer 屬性可以和 Screen 對象一起用于指定或確定當(dāng)前顯示的鼠標(biāo)指針類型。Integer 型,可讀寫。
expression 必需。返回“應(yīng)用于”列表中的一個對象的表達(dá)式。
MousePointer 屬性為 Integer 型值,表示下列指針之一:
設(shè)置 |
說明 |
0 |
(默認(rèn)值)形狀由 Microsoft Access 確定 |
1 |
常規(guī)選擇(箭頭) |
3 |
文本選擇(I 型指針) |
7 |
垂直調(diào)整大?。?、北方向) |
9 |
水平調(diào)整大?。|、西方向) |
11 |
系統(tǒng)忙(沙漏) |
注釋 如果將 MousePointer 屬性設(shè)為上表中沒有列出的整數(shù),則該屬性值會被設(shè)置為 0。
僅在使用 Visual Basic 時才能設(shè)置 MousePointer 屬性。
MousePointer 屬性將影響鼠標(biāo)指針在整個屏幕上的外觀。某些自定義控件也有 MousePointer 屬性,設(shè)置該屬性可以指定鼠標(biāo)指針位于該控件上時如何顯示。
可以將 MousePointer 屬性值設(shè)為 11,顯示沙漏圖標(biāo),表明應(yīng)用程序正忙。也可以讀入 MousePointer 屬性來確定正在顯示何種圖標(biāo)。鼠標(biāo)指針顯示沙漏圖標(biāo)非常有用,可以避免用戶在系統(tǒng)正忙的時侯誤按命令按鈕。
將 MousePointer 屬性值設(shè)為 11 和將 True (-1) 參數(shù)值賦給 DoCmd 對象的 Hourglass 方法是等效的。相反,將 True 參數(shù)值賦給 Hourglass 方法也會將 MousePointer 屬性值設(shè)為 11。
下面的示例將鼠標(biāo)指針改為沙漏圖標(biāo)。
Screen.MousePointer = 11