Hoe om de maandelijkse betalingen in Visual Basic Bereken

Hoe om de maandelijkse betalingen in Visual Basic Bereken Siri Stafford / Digital Vision / Getty Images

Om de maandelijkse betalingen die nodig zijn om te betalen uit een lening te berekenen, drie stukken van informatie nodig: het bedrag van de lening;de rente in rekening gebracht;en de lengte van de tijd om de lening terug te betalen.De wiskundige formule om dit te doen vertaalt zich ook in de Visual Basic-code.Door het creƫren van een vorm met de opties voor het invoeren van deze drie stukjes informatie, kunt u uw eigen maandelijkse lening betaling rekenmachine op uw computer.

instructies

  1. Selecteer de "Standard EXE" template na het laden van Visual Basic.Zoek het pictogram "label" in de Toolbox aan de linkerkant van het scherm.Dit pictogram lijkt op een hoofdletter A. Klik en sleep het naar de top van de vorm in het midden van het scherm.Wanneer u de muis loslaat, verschijnt een kruis.Klik op en gebruik maken van de kleine vierkantjes-drag-handvatten om het label te verbreden.Herhaal dit drie keer plaatsen van elk

    label onder de voorgaande en maakt het breder.Voeg een 5 label aan de rechterkant van de vierde en verbreden het ook.

  2. Klik op de "TextBox" controle in de Toolbox, een pleintje met de letters "ab", en sleep het op het formulier aan de rechterkant van de bovenste label.Laat de muis en het gebruik van de drag handles om het tekstvak te vergroten.Herhaal dit nog twee keer, het plaatsen van elk vak onder de vorige.Klik op de "CommandButton ', een klein plein in de Toolbox, onder het pictogram TextBox gevonden, en sleep het op het formulier, verbreding van het ook.

  3. Klik op een "label" in een tijd vanaf de top.Zoek de overeenkomstige "Caption" eigendom in de "Eigenschappen" kolom in het rechter paneel.Voor elk label dubbel-klik op de "titel" lijn en maken deze veranderingen ten opzichte van de standaard tekst die u ziet:

    Top Label: Noem deze "Leningen"

    Tweede Label: Noem deze "maandelijkse rente:"
    Derde Label: Noem deze "aantal maanden:"
    Vierde Label: Noem deze "Maandelijkse Betaling:"
    Vijfde Label: Verwijder de naam bijschrift.

  4. Klik op elke "TextBox" op zijn beurt en verwijder de "Tekst" naam woning in de sectie Properties.Verander de "CommandButton" titel te lezen "Bereken."

  5. Dubbelklik op de nieuwe naam "Bereken" controle, die het venster codeweergave geopend. U krijgt twee regels al ingevoerd, vinden "Private Sub Command1_Click ()"en "End Sub." Voer de volgende regels code tussen deze twee lijnen:

    Dim AmtBorrow, NumMonths als Geheel
    Dim Rate, MonthPay As Double
    Rate = Text2.Text
    NumMonths = Text3.Text
    MonthPay = Text1.Text (1 + Rate) ^ NumMonths Tarief / ((1 + Rate) ^ NumMonths - 1)
    Label5.Caption = Format (MonthPay, ". $ ## ##")

    Druk op "F5" om het programma uit te voeren. en leveren de bedragen die op het scherm te drukken op "Bereken" te eindigen

Resources

  • "Programmeren Visual Basic 6.0";Francesco Balena;1999
529
0
3
Visual Basics Programming