Vb6 et msgbox

mike -  
 mike -
Bonjour,
Pour lancer une msgbox il me faut un bouton jusque-là tout va bien , maintenant ce que je n'arrive pas c'est de lancer la msgbox au démarrage de l'application donc sans bouton.
MERCI

2 réponses

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,

    Il faut coller le code dans la Thisworkbook

    comme ceci dés que tu chargeras ton fichier le msgbox s'affichera

    Private Sub Workbook_Open()
    MsgBox "coucou"
    End Sub
    0
    1. le père
       
      Bonjour,

      Thisworkbook en VB6 ???
      0
    2. mike
       
      Merci pour la réponse
      Mais où est la Thisworkbook ?
      0
    3. le père
       
      Justement, ça n'existe pas en VB6. C'est dans Excel.
      0
  2. le père
     
    Bonjour

    Si tu lances un form au démarrage, il faut mettre dans le code associé au lancement du Form :

    Private Sub Form_Load()
    MsgBox "coucou"
    End Sub

    Si c'est un Sub que tu lances au démarrage, il faut mettre le MsgBox dans ce Sub
    0
    1. mike
       
      Merci beaucoup de votre aide
      voila le code qui marche pour moi:

      Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              MsgBox("coucou")
          End Sub
      0