Como calcular o restante de um salário após o pagamento de duas contas com juros - Desafio de Programação Resolvido em VB.NET

Informe o salário: 1350
Valor da primeira conta: 140
Valor da segunda conta: 300

Total das contas sem juros: 440.0
Total dos juros: 8.8
Total das contas com juros: 448.8
Sobra do salário: 901.2

----------------------------------------------------------------------
Precisa de ajuda? Chama no WhatsApp +55 (62) 98553-6711 (Osmar)

Este código foi útil? Paga um cafezinho pra mim :-(
PIX: osmar@arquivodecodigos.com.br 
----------------------------------------------------------------------

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos pedir que o usuário informe o valor do salário e das duas contas
    Console.Write("Informe o salário: ")
    Dim salario As Double = Double.Parse(Console.ReadLine())
    Console.Write("Valor da primeira conta: ")
    Dim conta1 As Double = Double.Parse(Console.ReadLine())
    Console.Write("Valor da segunda conta: ")
    Dim conta2 As Double = Double.Parse(Console.ReadLine())

    ' total a ser pago nas duas contas sem os juros
    Dim totalContas As Double = conta1 + conta2
    ' calcula os juros
    Dim totalJuros As Double = totalContas * 0.02
    ' total a ser pago com juros
    Dim totalContasComJuros As Double = totalContas + totalJuros
    ' sobra do salário
    Dim sobraSalario As Double = salario - totalContasComJuros

    ' mostra os resultados
    Console.WriteLine(vbCrLf & "Total das contas sem juros: " & totalContas)
    Console.WriteLine("Total dos juros: " & totalJuros)
    Console.WriteLine("Total das contas com juros: " & totalContasComJuros)
    Console.WriteLine("Sobra do salário: " & sobraSalario)

    Console.WriteLine(vbCrLf & vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module