ERRO AO INSTACIAR DLL DO FOXMAN AQUI DO FORUM

Citação:

Public Sub GeraBoletoBB(ByVal qtde As Integer)

[ô] Cria o boleto, e passa os parâmetros usuais
Dim bb As BoletoBancario

Dim boletos As New List(Of BoletoBancario)()
For i As Integer = 0 To qtde - 1

bb = New BoletoBancario()
bb.CodigoBanco = _codigoBanco

Dim vencimento As New DateTime(2007, 9, 10)
Dim c As New Cedente([Ô]00.000.000/0000-00[Ô], [Ô]Empresa de Atacado[Ô], [Ô]1234[Ô], [Ô]5[Ô], [Ô]12345678[Ô], [Ô]9[Ô])
c.Convenio = [Ô]1921436[Ô]
c.Codigo = 504
Dim b As New Boleto(vencimento, 45.5R, [Ô]18-019[Ô], [Ô]1234567890[Ô], c)

b.Sacado = New Sacado([Ô]000.000.000-00[Ô], [Ô]Fulano de Silva[Ô])
b.Sacado.Endereco.[End] = [Ô]SSS 154 Bloco J Casa 23[Ô]
b.Sacado.Endereco.Bairro = [Ô]Testando[Ô]
b.Sacado.Endereco.Cidade = [Ô]Testelândia[Ô]
b.Sacado.Endereco.CEP = [Ô]70000000[Ô]
b.Sacado.Endereco.UF = [Ô]DF[Ô]

[ô]Adiciona as instruções ao boleto
[ô]Protestar
Dim item As New Instrucao_BancoBrasil(9, 5)
b.Instrucoes.Add(item)
[ô]ImportanciaporDiaDesconto
item = New Instrucao_BancoBrasil(30, 0)
b.Instrucoes.Add(item)
[ô]ProtestarAposNDiasCorridos
item = New Instrucao_BancoBrasil(81, 15)
b.Instrucoes.Add(item)

b.NumeroDocumento = [Ô]12345678901[Ô]

bb.Boleto = b
bb.Boleto.Valida()
bb.Boleto.NossoNumero = Mid(bb.Boleto.NossoNumero, 4, 17)
boletos.Add(bb)
Next

GeraLayout(boletos)
End Sub