January 31
Sviluppato e mantenuto da Microsoft, VB - abbreviazione di Visual Basic - è un linguaggio event-driven di programmazione e IDE (Integrated Development Environment). Si tratta di un linguaggio molto flessibile e può anche essere usato per scrivere WAV (Waveform Audio) facilmente i file, utilizzando le funzioni di MCI. È possibile avviare, mettere in pausa, riprendere e interrompere la riproduzione video e anche possibile impostare il formato di tempo di millisecondi. Se si desidera registrare per appena millisecondi, VB6 permette di fare così.
1 Avviare un nuovo progetto VB6 e dichiarare la funzione MCI, utilizzando questo codice:
Declare Function mciSendString Lib "Winmm" Alias "mciSendStringA" (ByVal _
lpstrCommand As String, ByVal lpstrReturnString As String, _
ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Il "lpstrReturnString" viene utilizzato per ricevere le informazioni di ritorno, negozi "uReturnLength" il numero di caratteri nel "lpstrReturnString." È possibile utilizzare l'ultima funzione, "hwndCallback" per le notifiche di sistema.
2 Aprire il dispositivo WAV utilizzando questo codice:
Stringacomando = "Aprire nuovo alias tipo waveaudio YourWavFile"
Il "YourWavFile" è il buffer di memoria MCI ed è possibile sostituirlo con un altro alias. Potrai scrivere questo buffer su disco in seguito per creare un file WAV.
3 Inserire questa riga per impostare il formato dell'ora di millisecondi:
Stringacomando = "Imposta YourWavFile millisecondi formato tempo"
Questa azione non è obbligatorio.
4 Scrivi al buffer MCI utilizzando questa linea:
Stringacomando = "Record YourWavFile"
5 Pausa per iscritto al buffer con questa linea:
Stringacomando = "Pausa YourWavFile"
6 Riprendere la scrittura al buffer con questo codice:
Stringacomando = "Riprendi YourWavFile"
7 Smettere di scrivere al buffer utilizzando questa linea:
Stringacomando = "Stop YourWavFile"
Si deve smettere di scrivere al buffer MCI prima di poter scrivere dal buffer in un file WAV.
8 Creare il file WAV dal buffer MCI e chiudere il dispositivo WAV con l'inserimento di queste due righe:
Stringacomando = "Salva YourWavFile" & FileName
Stringacomando = "Chiudi YourWavFile"