• Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies. En savoir plus.


Visual Basic [SOLUTION] Fermer des applications en dégradé

  • Auteur de la discussion deleted293454
  • Date de début
Statut
N'est pas ouverte pour d'autres réponses.
D

deleted293454

Invité
#1
Bonjour :nerveux2:

J'ai vue sur ce topic :
Vous devez vous inscrire pour voir les liens !


Que beaucoup de gens ont des erreurs... Normal il manque un bout de code...

A placer juste au début (Avant Public Class Form) :

Code:
Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Int32, ByVal dwTime As Int32, ByVal dwFlags As Int32) As Boolean
    Dim winHide As Integer = &H10000
    Dim winBlend As Integer = &H80000
Puis ensuite mettre le code de Jhon Duff dans le button1 :

Code:
AnimateWindow(Me.Handle.ToInt32, CInt(1500), winHide Or winBlend)
        Me.Close()
Ce qui donne :

Code:
Public Class Form1
    Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Int32, ByVal dwTime As Int32, ByVal dwFlags As Int32) As Boolean
    Dim winHide As Integer = &H10000
    Dim winBlend As Integer = &H80000
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        AnimateWindow(Me.Handle.ToInt32, CInt(1500), winHide Or winBlend)
        Me.Close()
    End Sub
End Class


J'espère que ce petit topic aura résolu votre erreur:bzr: :loving:
 
Statut
N'est pas ouverte pour d'autres réponses.


Discussions similaires