Page.InSelection 屬性 (存取)

使用 InSelection 屬性來判斷或指定是否選取「設計」檢視中表單上的控制項。 可讀寫的 Boolean。

語法

表達。選擇內

詞 代表 Page 物件的變數。

註解

選取控制項時，會顯示其大小調整控點，而且使用者可以調整大小。 一次可選取一個以上的控制項。

範例

下列函數會使用 InSelection 屬性來判斷是否已選取表單上的 strControlName 控制項。

若要測試此程式碼，請將 IsControlSelected 函式程式碼貼到 Northwind 範例資料庫中程式碼模組的 [宣告] 區段中，在 [設計] 檢視中開啟 [客戶] 表單，然後選取 CompanyName 控制項。 在 [偵錯] 視窗中輸入下列行。

? IsControlSelected (Forms!Customers, "CompanyName") 
 
Function IsControlSelected(frm As Form, _ 
 strControlName As String) As Boolean 
 Dim intI As Integer, ctl As Control 
 If frm.CurrentView <> 0 Then 
 ' Form is not in Design view. 
 Exit Function 
 Else 
 For intI = 0 To frm.Count - 1 
 Set ctl = frm(intI) 
 If ctl.InSelection = True Then 
 ' Is desired control selected? 
 If UCase(ctl.Name) = UCase(strControlName) Then 
 IsControlSelected = True 
 Exit Function 
 End If 
 Else 
 IsControlSelected = False 
 End If 
 Next intI 
 End If 
End Function

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。