Comment intégrer un formulaire dans un autre formulaire

Contenu du snippet

Voici une fonction qui pourrait intéresser certains parmi la communauté VB. Comment créer une relation 'Parent-Enfant' entre objects. Exemple de cette fonction: intégrer un formulaire dans un autre formulaire (plus ou moins comme un formulaire MDI). Mais il est possbile de faire cela avec d'autres objets. Testez le code et vous verrez...

Source / Exemple :


'DECLARATION API
Private Declare Function SetParent Lib "user32" _
  (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
  
Public Function FormWithinForm(oParent As Object, _
   oChild As Object)

'Cette fonction permet d'afficher un formulaire dans un autre formulaire.
'Il est toutefois possible d'utiliser cette fonction pour afficher une sorte de contrôle enfant dans un container. 

On Error Resume Next

SetParent oChild.hwnd, oParent.hwnd
FormWithinForm = (Err.Number = 0 And Err.LastDllError = 0)

End Function

Conclusion :


Utilisation (Il faut 2 formulaires):

MyForm2.Show
FormWithinForm Me, MyForm2

A voir également

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.