Bouton style xp

Télécharger le projet
Commenter

Description

ben c'est un bouton style XP... quand tu cliques dessus il faut plein de choses...

Source / Exemple : 


'juste le code de la form de test... ouais -:)

Private Sub VGButton1_MouseDown(Button As Integer, _
    Shift As Integer, x As Single, y As Single)

    VGButton1.sound = "D:\VGButton\demo\wavs\bleep_07.wav"
    VGButton1.PlayMySound
End Sub

Private Sub VGButton1_MouseEnter()
    Dim x As Integer
    x = x + 1
    Debug.Print "OVER" & x
End Sub

Private Sub VGButton1_MouseLeave()
    Dim x As Integer
    x = x + 1
    Debug.Print "LEAVE" & x
End Sub

Conclusion :


Mon soft sera jamais mis à jour... pour avoir la dernière version vous pouvez toujours vous gratter... au niveau des bugs... yen a surment !!

A+, VIC.
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

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.

Du même auteur (VicoLaChips2)