LAME è una libreria che consente ai programmatori di codificare i file MP3. LAME è open source e si può scaricare gratuitamente. Il file utile è "LameLib" o "libmp3lame.dylib." Visual Studio è un ambiente di sviluppo Microsoft integrato. È possibile utilizzare Visual Basic, C ++ o C # con questo IDE. VB è un linguaggio di programmazione orientato agli oggetti, che è ampiamente usato per la creazione di applicazioni Windows, applicazioni di rete o le applicazioni di servizi web. Con VB.NET, è anche possibile codificare i file mp3. L'uscita sarà a 32 bit MP3 codificati.

istruzione

1 Fare clic su "Start", selezionare "Tutti i programmi" e scegliere "Visual Studio." Fare clic su "Nuovo" e selezionare "Progetto" per creare un nuovo progetto. Selezionare "Visual Studio" come linguaggio di programmazione e "Applicazione Windows", come il tipo di applicazione. Inserire un nome per il progetto. Specificare una posizione per i file di progetto.

2 Fare doppio clic sul Form1.vb. Fornire il percorso di lame.exe tramite il codice:
Dim WithEvents _lameShell come nuovo LameShell
_lameShell.InFile = Application.StartupPath & "\ input.mp3"
_lameShell.OutFile = Application.StartupPath & "\ output.mp3"
_lameShell.Options = "-b 32"
_lameShell.Start ()

3 Aggiungere gestori di eventi per mostrare i progressi codifica:
Private Sub _lameShell

Progress (ByRef Progress Come LameProgress)

Handles _lameShell.Progress

Se pBar.Maximum <> Progress.FrameMax Poi

pBar.Value = 0
pBar.Maximum = Progress.FrameMax
Else
pBar.Value = Progress.FrameCurrent
End If
lblFeedback.Text = Progress.PercentDone & "%" & " ETA:" & Progress.ETA

End Sub

4 Fare clic con il progetto e selezionare "nuova classe" per creare una nuova classe "Lame.vb." Creare un nuovo ProcessStartInfo variabile:
_startInfo privato come nuovo ProcessStartInfo
_startInfo.FileName = "lame.exe"
_startInfo.UseShellExecute = False
_startInfo.RedirectStandardOutput = True
_startInfo.RedirectStandardError = True
_startInfo.CreateNoWindow = True

5 Creare un lettore per mantenere l'uscita di lame.exe:
Private Sub LameReader ()

Dim oneLine As String
_lameProcess.Start()
oneLine = _lameProcess.StandardError.ReadLine()
While Not oneLine Is Nothing
oneLine = _lameProcess.StandardError.ReadLine()
End While

End Sub