Comment ouvrir simultanement 2 formulaire?

Question

Problem1:
salut j'ai 2 formailaire: fond et acceuil:
je voudrait que mon formulaire Fond s'ouvre en meme temps que mon forulaire Accueil .
Acceueil etant au desus de fond
Problem2:

 A ce qui parrait j'ai finit mon travail.du moins apres ces deux pb.
je voudrait prot&#233;ger l'acces &#224; mes bases la base data(acces aux table) et l'acces au code qui sait comment faire?

Booba

jrivet · Answer

Salut,

Je ne sais pas si ca peut repondre a ta question mais:

Load Fond
Load Accueil
Fond.show
Accueil.Show

Ca a pour effet d'ouvrir les deux. mais de pouvoir naviguer entre Fond et accueil.
Si tu veux garder le Focus juste sur Accueil sans que l'on puisse cliquer sur Fond : Accueil.Show VbModal.

Voila j espere que cela peu t'aider un peu

Pour la question 2: Aucune id&#233;e

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

sergeszebe · Answer

salut julien l&#224; je suis en VBA  access.
donc je sais pas si &#231;a marchera


Booba

jrivet · Answer

Re,

oups vraiment desole, effectivement je ne suis pas sur que ca marche.
Pourquoi as tu besoin du Form Fond

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

sergeszebe · Answer

en fait j'ai un grand fon beau et bleu! et je voudrais que le petit forlulaire d'acceuil ou il ya le choix des menu soit juste au desus .
les 2 s'ouvrant en meme temps.


Booba

jrivet · Answer

Re,

Tu n a qua mettre ton Fond Beau et Bleu dans le Formulaire Accueil. (tu change la taille d'Accueil)

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

PCPT · Answer

salut, sans rien changer, tu peux attacher ton formulaire dans ton fond (en espérant que je ne répète pas Julien ^^) voici un exemple en VB6 ' -------- ' Frm_Bleu ' -------- ' ' ' CETTE FORM NE CONTIENT PAS DE BOUTON Option Explicit ' Private Declare Function SetParent Lib "user32" _ (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long ' Private Sub Form_Load() Me.WindowState = 2 'vbMaximised Load Frm_Accueil Call SetParent(Frm_Accueil.hWnd, Me.hWnd) Frm_Accueil.Show End Sub ' ----------- ' Frm_Accueil ' ----------- ' ' Option Explicit Private Sub Form_Unload(Cancel As Integer) Unload Frm_Bleu End Sub Coloration syntaxique automatique [AFCK] ++ PCPT [AFCK]

sergeszebe · Answer

salut! je comprend la logique mais en vba je ne sais pas comment interpr&#233;ter en code.


Booba

PCPT · Answer

ummm,

pure supposition : la syntaxe doit &#234;tre &#224; peu pr&#232;s similaire.

remplacer les &#233;v&#232;nements Form par Userform... apr&#232;s il faut voir dans
les propri&#233;t&#233;s. perso je n'en sais pas beaaucoup plus sur VBA.

Comment ouvrir simultanement 2 formulaire?

8 réponses

Discussions similaires