TextBox.InSelection Property

Access Developer Reference

You can use the InSelection property to determine or specify whether a control on a form in Design view is selected. Read/write Boolean.

Syntax

expression.InSelection

expression   A variable that represents a TextBox object.

Remarks

When a control is selected, its sizing handles are visible and it can be resized by the user. More than one control can be selected at a time.

Example

The following function uses the InSelection property to determine whether the strControlName control on a form is selected.

To test this code, paste the IsControlSelected function code in the Declarations section of a code module in the Northwind sample database, open the Customers form in Design view, and select the CompanyName control. Then enter the following line in the Debug window:

Visual Basic for Applications
  ? 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