Shared Function _ mciGetErrorString(ByVal dwError As Integer, _ ByVal lpstrBuffer As System.Text.StringBuilder, ByVal uLength As Integer) _ As IntegerEnd Function' Get the description of a MCI error.'' ErrorCode is the code of the error' Return a string with the description of the error.Function GetMCIErrorString(ByVal errorCode As Integer) As String Dim buffer As New System.Text.StringBuilder(256) mciGetErrorString(errorCode, buffer, buffer.Capacity) Return buffer.ToString()End Function