Propriété TextBox.InSelection (Access)

utilisez la propriété InSelection pour déterminer ou spécifier si un contrôle de formulaire en mode Création est sélectionné. Boolean (en lecture/écriture).

Syntaxe

expression. InSelection

expression Variable qui représente un objet TextBox .

Remarques

Lorsqu’un contrôle est sélectionné, ses poignées de redimensionnement sont visibles et il peut être redimensionné par l’utilisateur. Vous pouvez sélectionner plusieurs contrôles en même temps.

Exemple

Dans l'exemple suivant, la propriété InSelection permet de déterminer si le contrôle strControlName d'un formulaire est sélectionné.

Pour tester ce code, collez le code de fonction IsControlSelected dans la section Declarations d’un module de code de l’exemple de base de données Northwind, ouvrez le formulaire Clients en mode Création et sélectionnez le contrôle CompanyName . Entrez la ligne suivante dans la fenêtre Débogage.

? 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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.