Discussion :

[amat-info]

bonjour a tous
je suis amateur et j'essaye de creer des application a titre personnel pour mieux gerer mes taches professionnel
j'ai beaucoup apprit de ce forum et mille merci
je debute avec mon premier probleme
mon appli demare avec une date que l'utilisateur choisi (dtpicker) je voudrais que cette date soit reporter sur les autres form (ex:menu saisie)
et encore merci et j'ai beaucoup d'autres questions

[ProgElecT]

Bienvenue sur DVP

Il te faut un module.BAS ou tu déclares une variable Public de type Date
Dans ce module tu écris une Sub de démarrage (souvent appelée Main)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Public DateChoisie As Date
 
Public Sub Main()
'pour optenir une date choisie par l'utilisateur
Form1.Show 1
'tant que l'utilisateur n'a pas fermé le Form1, le programme attend ici
'la suite du code est donc en attente
Form2.Show
End Sub

Dans l'éditeur VB6, Alt+P 2 fois de suite, Projet ==> Propriété de Projetxxx.
Tu renseignes la liste ==> Objet de démarrage en choisissant le "Sub Main", confirmer par le bouton Ok.

Un Form (Form1) sur lequel est déposé le DTPicker

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Option Explicit
 
'Form1, Form de démarrage ou l'utilisateur choisi la date
Private Sub Form_Unload(Cancel As Integer)
'renseigne la variable au moment de sa fermeture
DateChoisie = DTPicker1.Value
End Sub

Un Form (Form2) qui est le Form suivant le choix de date de l'utilisateur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Form_Load()
'Form2
'La variable DateChoisie a été renseigné dans le Form de démarrage (Form1)
'donc elle est disponible durant tout le programme pour tous les Forms
End Sub

[amat-info]

merci a vous mais je n'ai pas tres bien saisie comment faire un module
je suis amateur et merci encore

[ProgElecT]

je n'ai pas tres bien saisie comment faire un module .....

Dans l'éditeur VB6, Alt+P => " Projet ", Alt+m => " Ajouter un module ".

Il me semble que ce lien Une série de tutoriel sur la Programmation en VB6 devrait te rendre service.