einfacher Bankrechner

  • VBScript

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von KlyX.

    einfacher Bankrechner

    Ich habe mal einen einfachen Bankrechner erstellt, allerdings kommt immer 0 beim Rechnen raus, und wenn nicht kommt nie ein genaues ergebniss.
    Laufzeit soll immer ein Jahr betragen hier ist der Code, was ist falsch?

    Visual Basic-Quellcode

    1. Private Sub CommandButton1_Click()
    2. Dim name As String
    3. name = TextBox1.Text
    4. Dim summe As String
    6. summe = TextBox2.Text
    7. Dim zins As String
    8. zins = TextBox3.Text
    9. Dim art As String
    10. art = TextBox4.Text
    12. If (art = "K") Then
    13. Dim zinssatz As Integer
    14. zinssatz = summe * zins / 100
    15. MsgBox (zinssatz)
    16. End If
    17. If (art = "A") Then
    18. Dim zinssatz2 As Integer
    19. zinssatz = zins / 100 * summe
    20. MsgBox (zinssatz2)
    21. End If
    22. End Sub

    Du solltest mal die Dateitypen richtig deklarieren...
    Bei dir ist alles "String". Aber du willst damit rechnen. Dann müssten es Integer bzw. Float Daten sein.
    Probier mal, ob du so zum korrekten Ergebnis kommst.
    Chris' Weblog - Mein Blog rund um Vieles :D

Facebook
Telefonspende