Boutons de menu dans une picturebox

Description

Permet de créer un menu avec un systeme de bouton dans un pictureBox !

L'explication n'est pas terrible, le titre non plus, mais le source parle de lui même

Conclusion :


ajout de nouveau boutons :
n est le numero de votre bouton

taille_P1 = Picture1.Height - 20
largeur_P1 = Picture1.Width - 40
left_P1 = Picture1.Left + 25
nbre_boutons = x

If Commandn.Top = (Commandn.Height * (n-1)) Then
i = n-1
For Each CommandButton In Form1
i = i + 1
CommandButton.Top = taille_P1 - (CommandButton.Height * (i - (n-1)))

If i = nbre_boutons Then
Exit For
End If
Next
Else
Command1.Top = 0
Command2.Top = Command2.Height
Command3.Top = Command3.Height * 2
Command4.Top = Command4.Height * 3
Commandn.top = Commandn.height * (n-1)
End If

Codes Sources

A voir également

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.