Function GetControlByName(ByRef oForm As System.Windows.Forms.Form, ByVal sControlName As String) As System.Windows.Forms.Control Dim oCtrl As System.Windows.Forms.Control oCtrl = oForm.Controls(sControlName) If oCtrl Is Nothing Then For Each oCtrl In oForm.Controls.Find(sControlName, True) If oCtrl.Name.Equals(sControlName) Then Return oCtrl Next Else Return oCtrl End If Return Nothing End Function
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.