| maison  | Hardware  | réseaux  | programmation  | Logiciel  | Dépannage  | systèmes |  
programmation  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
    Comment créer des données de Vague à partir de tampons en VB6
    En VB6 , vous pouvez utiliser DirectX pour créer des applications graphiques de Windows audio , vidéo et données. Le SDK DirectX est gratuit à partir du site Microsoft . L'objet de DirectSound est l'objet de périphérique audio principal . Il peut être utilisé pour les effets sonores dans les jeux , et il peut gérer plusieurs sons en même temps. Contrôler le système audio grâce à DirectSound comme le panoramique et le volume. En VB6, vous pouvez créer un projet pour lire les données de tampon dans un fichier WAV via les objets DirectX . Choses que vous devez
    VB6
    Voir Plus Instructions
    1

    Cliquez sur " Démarrer", " Tous les programmes " et " Visual Basic " pour ouvrir VB6 . Cliquez sur " Fichier" et " Nouveau" pour créer un nouveau projet. Entrez un nom pour le projet. Spécifiez un emplacement pour les fichiers de projet .
    2

    Cliquez sur "Project " et " Références " pour ajouter DirectX référence pour le projet. Cochez la case « DirectX 8 pour Type Library Visual Basic " sur l'interface «Références» . Cliquez sur « OK ».
    3

    définir des variables pour le projet. Ajoutez le code suivant à la Form1.vb : Dim dx As New DirectX8Dim ds Comme DirectSound8Dim buffer1 Comme DirectSoundSecondaryBuffer8Dim buffer2 Comme DSBUFFERDESC
    4

    Initialisation DirectSound via le code suivant: Set dx = New DirectX8Set ds = dx.DirectSoundCreate ( "")
    5

    créer une zone tampon via le code suivant: 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

    Créez un ton et écrire à dsToneBuffer : iFor Dim i = 0 To DUR * SRATEsbuf (i) = 10000 * Sin ( 2 * PI * FREQ * i /SRATE ) idsToneBuffer.WriteBuffer Suivant 0, 2 * DUR * SRATE , sbuf (0 ) , DSBLOCK_DEFAULT
    7

    Ecrire les données du buffer dans un fichier WAV : DS.CreateSoundBufferToFile ( App.Path & "\\ my.wav " , dsToneBuffer )

    Previous :

    next :
      articles connexes
    ·Comment obtenir un ID réseau local et le domaine en VB…
    ·Comment faire pour installer VisualStudio.Net 
    ·Comment utiliser les cases à cocher dans GridView 
    ·Comment écrire des boucles en VB.NET 
    ·Comment faire pour modifier une légende de dialogue Wi…
    ·Comment créer des graphiques et des formes dans Visual…
    ·Comment Ping une liste des ordinateurs avec VBScript 
    ·Comment créer un programme pour imprimer les sommes en…
    ·Comment accéder à la FlexGrid en VB6 
    ·Comment faire un Keygen en VB6 
      articles en vedette
    ·Java ne peut pas faire une référence statique à une …
    ·Comment insérer des variables PHP dans XML 
    ·Qu'est-ce qu'une application graphique 
    ·Comment faire de l'encre recyclée 
    ·Comment copier un dossier et son contenu dans VB.NET 
    ·Comment utiliser QBASIC à trouver l'inverse d'une matr…
    ·Java Exceptions d'entrée 
    ·Comment copier les cordes en VBA 
    ·Comment analyser une délimité par des tabulations fic…
    ·Comment faire pour déboguer Ruby 
    Copyright © Connaissances Informatiques http://fr.wingwit.com