Свойство TextBox.InSelection (Access)

С помощью свойства InSelection можно определить, выбран ли элемент управления в форме в Конструкторе, или указать, выбран ли он. Для чтения и записи, Boolean.

Синтаксис

выражение. InSelection

выражение Переменная, представляющая объект TextBox .

Примечания

Когда элемент управления выбран, видны его маркеры размера, и пользователь может изменять его размер. Одновременно можно выбрать несколько элементов управления.

Пример

Следующая функция использует свойство 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 и обратная связь.