IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)

Tutoriel 38 : La feuille frmInfos.frm - saisie du code

L'auteur

Profil Pro

Liens sociaux

Viadeo Twitter Facebook Share on Google+   

Exercice 6 La feuille frmInfos.frm - saisie du code

Construisons le fichier : frmInfos.frm

./images/videok2.jpg

Image grandeur nature de la feuille d'infos sur les bases de données

Propriété Name : frmName
Installez 4 Panels « SSPanel » ou autres
Propriété Name Panel3D1 à Panel3D4
Insérez un bouton

Écriture du code du bouton

 
Sélectionnez
Sub SSCommand1_Click ( )
     Unload frmName
End Sub

Nous procédons à la réalisation de la feuille « frmListe »
Cette feuille nous permettra d'afficher les titres de film disponibles dans la base de données et de pouvoir imprimer la liste affichée.

Image non disponible

Elle se compose d'une Frame qui aura comme :
Propriété Caption : N° d'enregistrement/Titre de film/N° de cassette :"
Dans cette Frame nous incorporons une ListBox
Propriété Name : Liste1

Écriture du code du bouton de commande « Imprimer »

 
Sélectionnez
Private Sub Command3D1_Click( )
    On Error Resume Next
    If Liste1.List(X%) <> "" Then
        Printer.Print
        Printer.FontSize = 12
        'Imprime la ligne d'information
        Printer.Print "N° de l'enregistrement/Titre du film/N° cassette:"
        'Envoi de la liste ligne par ligne à l'objet imprimante
        For X% = 1 To Liste1.ListCount
            Printer.Print Liste1.List(X% - 1)
        Next X%
        'Saut de page
        Printer.NewPage
        'Fin de l'impression
        Printer.EndDoc
    Else
        'Sortie sans impression
    End If
End Sub

Écriture du code du bouton « OK »

 
Sélectionnez
Private Sub CtlStatistiques_Click( )
    Unload Me
End Sub

Écriture du code de la feuille Form

 
Sélectionnez
Private Sub Form_Load( )
    CenterForm Me
End Sub

La semaine prochaine nous réaliserons la feuille devant nous permettre de créer les bases de données indispensables à notre réalisation.

Prochain tutoriel 

Construction de la feuille MKFICH

Vous avez aimé ce tutoriel ? Alors partagez-le en cliquant sur les boutons suivants : Viadeo Twitter Facebook Share on Google+   

Copyright © 2000 Gilmir. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.