Ako vytvoriť Wave dáta z vyrovnávacích pamätí vo VB6

Vo VB6 , môžete použiť rozhranie DirectX vytvoriť audio , video a grafické aplikácie Windows . DirectX SDK je zadarmo z webových stránok spoločnosti Microsoft . DirectSound objekt je hlavný audio zariadenie objektu . Môže byť použitý pre zvukové efekty v hrách , a to môže zvládnuť viac zvukov naraz . Ovládanie audio systému cez DirectSound , ako je posúvanie a hlasitosť . Vo VB6 , môžete vytvoriť projekt pre čítanie dát do vyrovnávacej pamäte do súboru WAV pomocou objektov DirectX . Veci , ktoré budete potrebovať klipart VB6
Zobraziť viac Inštrukcie Cestuj 1

Kliknite na tlačidlo " Štart " , " Všetky programy " a " Visual Basic " otvorte VB6 . Kliknite na " Súbor " a " Nový " pre vytvorenie nového projektu . Zadajte názov projektu . Zadajte umiestnenie pre súbory projektu .
2

Kliknite na " projekt " a " Referencie " pridať DirectX odkaz na projekt . Zaškrtnite " DirectX 8 pre Visual Basic Type Library " v časti " Odkazy " rozhranie . Kliknite na tlačidlo " OK " .
3

Definujte premenné projektu . Pridajte nasledujúci kód na Form1.vb : Dim dx Ako nové DirectX8Dim DS as DirectSound8Dim buffer1 Ako DirectSoundSecondaryBuffer8Dim buffer2 Ako DSBUFFERDESC
4

inicializácia DirectSound pomocou kódu : Set dx = New DirectX8Set ds = dx.DirectSoundCreate ( " " )
5

Vytvorenie vyrovnávacej pamäte pomocou kódu : Buffer2.fxFormat.nFormatTag = WAVE_FORMAT_PCMBuffer2.fxFormat.nSize = 0Buffer2.fxFormat.lExtra = 0Buffer2.fxFormat.nChannels = 1Buffer2.fxFormat.lSamplesPerSec = SRATEBuffer2 . fxFormat.nBitsPerSample = 16Buffer2.fxFormat.nBlockAlign = 2Buffer2.fxFormat.lAvgBytesPerSec = 2 * SRATEBuffer2.lFlags = 0Buffer2.lBufferBytes = 2 * DUR * SRATESet dsToneBuffer = DS.CreateSoundBuffer ( buffer2 )
6

vytvorte tón a zapisovať do dsToneBuffer : Dim Ifor i = 0 DUR * SRATEsbuf ( i ) = 10000 * Sin ( 2 * PI * FREQ * i /srať ) Ďalšie idsToneBuffer.WriteBuffer 0 , 2 * DUR * srať , SBUF ( 0 ) , DSBLOCK_DEFAULT
7

Zapis dát do súboru WAV : DS.CreateSoundBufferToFile ( App.Path & " \\ my.wav " , dsToneBuffer )

• Predchádzajúca strana: Ako si vyrobiť Dvojposteľová do reťazca o VB 
• Ďalšia strana: Ako vytvoriť program vytlačiť súm v jazyku Visual Basic Studio