Dim objNFSe     As New ApiNeXT.clsNFSe
Dim blnOk       As Boolean
Dim strProt     As String, strCodVerif As String
Dim lngSituacao As Long
Dim strDtAut    As String
Dim lngNumNFS   As Long, lngNumLoteRet As Long
Dim strLink     As String, strMsg As String
Dim bytXMLRet() As Byte
Dim bytNFSXML() As Byte
Dim bytNFSPDF() As Byte

blnOk = objNFSe.EnviarNFSe( _
            "11222333000181", "99888777000100", strToken, 2, _
            1, bytArquivoIni, _
            strProt, strCodVerif, lngSituacao, strDtAut, _
            lngNumNFS, lngNumLoteRet, strLink, _
            bytXMLRet, bytNFSXML, bytNFSPDF, strMsg)

var _nfse = new ApiNeXT.Net.clsNFSe();

bool _ok = _nfse.EnviarNFSe(
    "11222333000181",         // CNPJ Software House
    "99888777000100",         // CNPJ Cliente
    _token,                   // Token
    2,                        // Ambiente: 2 = Homologacao
    1L,                       // Numero do lote
    _arquivoIni,              // INI da DPS
    out string _protocolo,
    out string _codVerificacao,
    out int _situacao,
    out string _dataAutorizacao,
    out long _numNFS,
    out long _numLoteRetorno,
    out string _link,
    out byte[] _xmlRetorno,
    out byte[] _nfseXml,
    out byte[] _nfsePdf,      // PDF da NFS-e, pronto
    out string _msg);