Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Felipe Calado

Problema com compilação no Visual Studio.NET

Recommended Posts

Galera eu estava escrevendo um código em vb.net no Visual Studio.NET 2010, eu fiz o código para rodar em console application, porém na hora de debugar deu um erro:

 

 

ResolveAssemblyReferences:

A TargetFramework profile exclusion list will be generated.

CoreResGen:

All outputs are up-to-date.

GenerateTargetFrameworkMonikerAttribute:

Skipping target "GenerateTargetFrameworkMonikerAttribute" because all output files are up-to-date with respect to the input files.

CoreCompile:

C:\Windows\Microsoft.NET\Framework\v4.0.30319\Vbc.exe /noconfig /imports:Microsoft.VisualBasic,System,System.Collections,System.Collections.Generic,System.Data,System.Diagnostics,System.Linq,System.Xml.Linq /optioncompare:Binary /optionexplicit+ /optionstrict:custom /nowarn:42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 /optioninfer+ /nostdlib /platform:x86 /rootnamespace:ConsoleApplication1 /sdkpath:"C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client" /doc:obj\x86\Debug\ConsoleApplication1.xml /define:"CONFIG=\"Debug\",DEBUG=-1,TRACE=-1,_MyType=\"Console\",PLATFORM=\"x86\"" /reference:"C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Core.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Data.DataSetExtensions.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Data.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Deployment.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Xml.dll","C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.0\Profile\Client\System.Xml.Linq.dll" /main:ConsoleApplication1.ModVF /debug+ /debug:full /filealign:512 /out:obj\x86\Debug\ConsoleApplication1.exe /resource:obj\x86\Debug\ConsoleApplication1.Resources.resources /target:exe ModVF.vb "My Project\AssemblyInfo.vb" "My Project\Application.Designer.vb" "My Project\Resources.Designer.vb" "My Project\Settings.Designer.vb" "C:\Users\Felipe\AppData\Local\Temp\.NETFramework,Version=v4.0,Profile=Client.AssemblyAttributes.vb"

 

Build FAILED.

 

Time Elapsed 00:00:00.02

========== Build: 0 succeeded, 1 failed, 0 up-to-date, 0 skipped ==========

 

 

 

vou postar o código para vocês verem se tem algo errado, mais eu acho que é no compilador:

 

Module ModVF
   Private dbTaxaAnual As Double = 0
   Private Ianos As Integer = 0
   Private decValorInicial As Double = 0
   Private decDepositoMensal As Double = 0
   Sub Main()
       Dim decResultado As Double
       AlimentaVF()
       decResultado = CalculaVF(dbTaxaAnual, iAnos, decValorInicial, decDeposito Mensal)
       MostraVF(decResultado)

   End Sub
   Private Sub AlimentaVF()
       Console.WriteLine()
       decValorInicial = CDec(obtemDados("ValorInicial = "))
       dbTaxaAnual = CDbl(obtemDados("Taxa Anual = "))
       decDepositoMensal = CDec(obtemDados("Deposito Mensal = "))
       Ianos = CInt(obtemDados("Periodo do Investimento = "))
   End Sub
   Private Function obtemDados(ByVal msg As String) As String
       Console.WriteLine(msg)
       Return Console.ReadLine
   End Function
   Private Function CalculaVF(ByVal TaxaAnual As Double, ByVal Ano As Integer, ByVal DepositoMensal As Double, ByVal ValorInicial As Double) As Double
       Dim decTaxaMensal As Double = CDec(TaxaAnual / 1200)
       Dim IMeses As Integer (Anos * 12)
       Dim decTemp As Double
       Dim decRetorno As Double
       decTempo = CDec((1 + decTaxaMensal) ^ iMeses)
       decRetorno = CDec(DepositoMensal * ((decTemp - 1) / decTaxaMensal) + (ValorInicial * decTemp))
       Return decRetorno
   End Function
   Private Sub MostraVF(ByVal resultado As Double)
       Console.WriteLine()
       Console.WriteLine(" Com um valor incial de {0:c} ", decValorInicial)
       Console.WriteLine(" e depositos mensais de {0:c} ", decDepositoMensal)
       Console.WriteLine(" por um periodo de {0} anos ", iAnos)
       Console.WriteLine(" a uma taxa de {0}% no período ", dbTaxaAnual)
       Console.WriteLine()
       Console.WriteLine(" Você terá como um valor futuro de : {0:c}", resultado)
       Console.ReadLine()
   End Sub
End Module

 

Galera se puderem me ajudar vou agradecer muito :)

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.