Télécharger le zip
Bonsoir alpha5J'aime bien savoir comment ça marche mais je ne peux pas compiler ce programme avec la manière dont il est exposécar méme si on télécharge le zip on ne peux pas avoir le fichier exécutable .Une aide aux débutants. Merci
Abdelelansari> Il faut poseder Visual Studio .NET, ouvrir le projet puis dans le menu cliquer sur "Generer la solution"
Salutet voici la traduction en VB6 / VBA :Option ExplicitPrivate Declare Function APIBeep Lib "kernel32" Alias "Beep" (ByVal DwFreq As Long, ByVal Dwduration As Long) As LongConst ½ton = 2 ^ (1 / 12)Const UT = (LA * ½ton ^ 3) / 2Const REb = (LA * ½ton ^ 4) / 2Const RE = (LA * ½ton ^ 5) / 2Const MIb = (LA * ½ton ^ 6) / 2Const MI = (LA * ½ton ^ 7) / 2Const FA = (LA * ½ton ^ 8) / 2Const SOLb = (LA * ½ton ^ 9) / 2Const SOL = (LA * ½ton ^ 10) / 2Const LAb = (LA * ½ton ^ 11) / 2Const LA = 440Const SIb = LA * ½tonConst SI = LA * ½ton ^ 2Const UT2 = LA * ½ton ^ 3Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Dim iBeep As Long Select Case KeyCode Case 67: iBeep = UT * 2 ^ Shift Case 68: iBeep = RE * 2 ^ Shift Case 69: iBeep = MI * 2 ^ Shift Case 70: iBeep = FA * 2 ^ Shift Case 71: iBeep = SOL * 2 ^ Shift Case 72, 65: iBeep = LA * 2 ^ Shift Case 73, 66: iBeep = SI * 2 ^ Shift Case 74: iBeep = UT2 * 2 ^ Shift End Select APIBeep iBeep, 200 ' doEnd SubComme ça, tout le monde en profiteMerci Pythagore
Excuse moi si je n'ai pas répondu mais je me connecte peu souvent. je vois que l'administrateur et aeder ta répondu à ma place.
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte