1
Haga clic en " Inicio", seleccione " Todos los programas " y seleccione "Visual Studio ". Haga clic en " Nuevo" y seleccione " proyecto" para crear un proyecto nuevo . Seleccione " Visual Studio ", como el lenguaje de programación y " Aplicación para Windows " como el tipo de aplicación . Introduzca un nombre para el proyecto . Especifique una ubicación para los archivos de proyecto.
2
doble clic en el Form1.vb . Proporcione la ruta de lame.exe través de código : 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
agregar controladores de eventos para mostrar el progreso de la codificación : _lameShell_Progress Sub Private ( ByRef progreso Como LameProgress ) _Handles _lameShell.ProgressIf pBar.Maximum < ; > Progress.FrameMax ThenpBar.Value = 0pBar.Maximum = Progress.FrameMaxElsepBar.Value = Progress.FrameCurrentEnd IflblFeedback.Text = Progress.PercentDone & " % " y " ETA :" & Progress.ETAEnd Sub
4 Haga clic en el proyecto y seleccione " nueva Clase " para crear una nueva clase " Lame.vb. " Crear un nuevo ProcessStartInfo variables : _startInfo privado como nuevo ProcessStartInfo_startInfo.FileName = "lame . exe " _startInfo.UseShellExecute = False_startInfo.RedirectStandardOutput = True_startInfo.RedirectStandardError = True_startInfo.CreateNoWindow = True
5
Crear un lector para mantener la salida de lame.exe : LameReader Sub Private () OneLine As String_lameProcess.Start () OneLine = _lameProcess.StandardError.ReadLine () Mientras no OneLine Es NothingoneLine = _lameProcess.StandardError.ReadLine () End Sub WhileEnd