LAME ist eine Bibliothek , die es Programmierern ermöglicht, MP3-Dateien zu kodieren. LAME ist Open Source und Sie können es kostenlos herunterladen. Die Datei ist nützlich " LameLib " oder " libmp3lame.dylib . " Visual Studio ist eine integrierte Entwicklungsumgebung Microsoft . Sie können Visual Basic , C + + oder C # mit dieser IDE . VB ist eine objektorientierte Programmiersprache, die häufig für die Erstellung von Windows -Anwendungen, Netzwerk-Anwendung oder Web -Service-Anwendungen verwendet wird. Mit VB.NET , können Sie auch MP3-Dateien kodieren . Der Ausgang wird 32-Bit- codierten MP3 sein . Anleitung
1
Klicken Sie auf "Start ", wählen Sie "Alle Programme" und wählen Sie " Visual Studio. " Klicken Sie auf " Neu" und wählen Sie "Projekt" , ein neues Projekt zu erstellen. Wählen Sie " Visual Studio" als Programmiersprache und " Windows-Anwendung ", wie der Art der Anwendung . Geben Sie einen Namen für das Projekt. Geben Sie einen Speicherort für die Projektdateien.
2
Doppelklicken Sie auf das Form1.vb . Geben Sie den Pfad zu lame.exe via Code : Dim WithEvents _lameShell As New LameShell_lameShell.InFile = Application.StartupPath & "\\ input.mp3 " _lameShell.OutFile = Application.StartupPath & "\\ output.mp3 " _lameShell.Options = " -b 32 " _lameShell.Start ( )
3
Add Event Handler der Codierung Fortschritte zeigen : Private Sub _lameShell_Progress ( ByRef Fortschritte LameProgress ) _Handles _lameShell.ProgressIf pBar.Maximum < ; > Progress.FrameMax ThenpBar.Value = 0pBar.Maximum = Progress.FrameMaxElsepBar.Value = Progress.FrameCurrentEnd IflblFeedback.Text = Progress.PercentDone & "% " & " ETA :" & Progress.ETAEnd Sub
4
rechten Maustaste auf das Projekt und wählen Sie " neue Klasse ", um eine neue Klasse " Lame.vb. " erstellen Sie eine neue Variable ProcessStartInfo erstellen : Private _startInfo As New ProcessStartInfo_startInfo.FileName = "lame . exe " _startInfo.UseShellExecute = False_startInfo.RedirectStandardOutput = True_startInfo.RedirectStandardError = True_startInfo.CreateNoWindow = True
5
erstellen Reader , um die Ausgabe von lame.exe halten : Private Sub LameReader () Dim oneLine Wie String_lameProcess.Start () = oneLine _lameProcess.StandardError.ReadLine () While Not oneLine Ist NothingoneLine = _lameProcess.StandardError.ReadLine () End Sub