Conexion con di api vb.net

Tengo la conexión correcta:

 Public Function Conectar() As Boolean
        Try
            Empresa.Server = "SERVERSAPBO"
            Empresa.DbServerType = BoDataServerTypes.dst_MSSQL2012
            Empresa.UseTrusted = False
            Empresa.DbUserName = "sa"
            Empresa.DbPassword = "SAPB1Admin@@"
            Empresa.CompanyDB = "Elsabor"
            Empresa.UserName = "manager"
            Empresa.Password = "170205"
            Empresa.LicenseServer = "SERVERSAPBO:30000"

            Dim ret As Integer = Empresa.Connect()
            Dim errMsg As String = Empresa.GetLastErrorDescription()
            Dim ErrNo As Integer = Empresa.GetLastErrorCode()

            If ErrNo = 0 Then
                Return True
            Else
                Return False
            End If
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Function

Pero no entiendo estas 3 líneas de código, explíquenmela por favor, para que sirven y en que momento las uso.

            Dim ret As Integer = Empresa.Connect()
            Dim errMsg As String = Empresa.GetLastErrorDescription()
            Dim ErrNo As Integer = Empresa.GetLastErrorCode()

Ret te va almacenar el resultado de tu conexión, puede ser exitoso o algun error.
ErrMsg obtiene el mensaje de algún error generado por Empresa
ErrNo obtiene el código del error obtenido en caso de existir

saludos

2 Me gusta

Gracias por la ayuda.