on enregistre les données dans des tableaux puis on verse les tableaux dans un fichier .txt après lorsqu'on veut une donnée il suffit de la chercher en connaissant son code et si on veut on peut afficher les données dans un tableau msflexgrid. donc je vous laisse le soin d'explorer mon petit programme et si vous voyez qu'il y a une faute veuillez le mentionner en donnant la correction
et merci de votre attention!
khedidija
Messages postés33Date d'inscriptionsamedi 16 février 2008StatutMembreDernière intervention11 mai 20112 9 juin 2008 à 20:39
merci beaucoup
cs_comme
Messages postés122Date d'inscriptiondimanche 19 mars 2006StatutMembreDernière intervention18 juillet 2009 6 juin 2008 à 18:46
j'ai oublié de te dire qu'il faut désigner les autres forms comme filles de Mdiform pour celà mettre pour chaque form la proprieté Mdichild sur true et à la rigueur pour cacher les boutons (fermer ,restaurer et réduire) de chaque form, mettre la proprieté controlbox de chaque form (fille) sur false et comme ça le code suivant aura un sens;;;;
Private Sub parcode_Click(Index As Integer)
if activeform is Recherchestg then
exit sub
else
unload me
Recherchestg.Show
end if
End Sub
khedidija
Messages postés33Date d'inscriptionsamedi 16 février 2008StatutMembreDernière intervention11 mai 20112 6 juin 2008 à 15:06
merci pour ces informations vraiment je savais pas ça avant donc merci beaucoup!:)
cs_comme
Messages postés122Date d'inscriptiondimanche 19 mars 2006StatutMembreDernière intervention18 juillet 2009 2 juin 2008 à 14:05
D'abord mettre la propriete windowstate de Mdiform sur 2 (maximized) celà est mieux pour la présentation....
en suite il faut décharger la feuille existante pour charger l'autre celà pour economiser la mémoire .
cet evenement :
Private Sub parcode_Click(Index As Integer)
Recherchestg.Show
End Sub
sera remplacé par celui là:
Private Sub parcode_Click(Index As Integer)
if activeform is Recherchestg then
exit sub
else
unload me
Recherchestg.Show
end if
End Sub
ici tu décharge la feuille existante avant de charger la form:Recherchestg
9 juin 2008 à 20:39
6 juin 2008 à 18:46
Private Sub parcode_Click(Index As Integer)
if activeform is Recherchestg then
exit sub
else
unload me
Recherchestg.Show
end if
End Sub
6 juin 2008 à 15:06
2 juin 2008 à 14:05
en suite il faut décharger la feuille existante pour charger l'autre celà pour economiser la mémoire .
cet evenement :
Private Sub parcode_Click(Index As Integer)
Recherchestg.Show
End Sub
sera remplacé par celui là:
Private Sub parcode_Click(Index As Integer)
if activeform is Recherchestg then
exit sub
else
unload me
Recherchestg.Show
end if
End Sub
ici tu décharge la feuille existante avant de charger la form:Recherchestg
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.