Discussion :

[firenze]

Salut a tous,

Oui je reviens 3 ans après ( XD ) le début de mon projet de générateurs de noms vos mieux tard que jamais j'aimerais savoirs si il etait possible de baisser le son en background que j'ai ajouter dans ma form1 ?

Le code qui ajoute la musique:

My.Computer.Audio.Play(My.Resources._03___World_Of_Warcraft___The_Sin_dorei, AudioPlayMode.BackgroundLoop)

J'ai ajouter aussi un bouton pour stopper la musique mais il et pas réversible,est t'il possible de faire un bouton que quant on clique dessus la musique se met en pause puis si on re clique dessus elle se relance a partir du moment ou on a mis pause ?

L'avancement du logiciel :


Il génère aléatoirement des noms a partir d'une liste de caractère. Ma liste comporte actuellement 390 caractères soit si je me trompe pas dans mes calcules 152100 pseudos différent,mais la liste prévus comporte bien plus de caractère .Certain pseudo comme vous le verrais si vous testez mon petit programme sont un peut trop long et bien évidemment certain peuvent être étrange voire imprononçable.
Lien de l’exécutable : http://www.mediafire.com/download/9x...om_elfique.exe

Merci d'avance.

[VBcodeur]

Pour baisser le son, je te conseille "tout simplement" de baisser le son de l'ordinateur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Friend Const APPCOMMAND_VOLUME_MUTE As Integer = 524288
Friend Const APPCOMMAND_VOLUME_DOWN As Integer = 589824
Friend Const APPCOMMAND_VOLUME_UP As Integer = 655360
Declare Function SendMessageW Lib "user32.dll" (ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr
Friend Function sendMessage(ByVal command As Integer, ByVal form As Form)
        SendMessageW(form.Handle, WM_APPCOMMAND, form.Handle, command)
End Function

au début et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
sendMessage(APPCOMMAND_VOLUME_DOWN, Me)

ou tu veux l'instruction, tu peux utiliser mute et up pour respectivement mettre en sourdine et monter le son.

Pour mettre en pause un son, peut-être trouveras-tu ton bonheur ici : https://support.microsoft.com/fr-fr/...67#bookmark-11

PS : Pour le nombre de tes pseudos, si les 390 caractères peuvent être tirées indépendamment de ceux d'avant : 390^x avec X le nombre de caractères. Cela te donne le nombre de pseudos possibles.