Um die monatlichen Zahlungen benötigt wird, um ein Darlehen auszahlen zu berechnen, müssen Sie drei Informationen : die Höhe des Darlehens , der Zinssatz und die Länge der Zeit , das Darlehen zurückzuzahlen . Die mathematische Formel , um diese übersetzt und in Visual Basic-Code zu tun. Durch die Schaffung einer Form mit Optionen zur Eingabe dieser drei Stücke von Informationen , können Sie Ihre eigenen monatliche Zahlung Darlehen Rechner auf Ihrem Computer haben. Anleitung
1
Wählen Sie den " Standard EXE " Vorlage nach dem Laden Visual Basic. Finden Sie das "Label"- Symbol in der Toolbox auf der linken Seite des Bildschirms. Das Symbol sieht aus wie ein Großbuchstabe A. Klicken und ziehen Sie es an die Spitze der Form, in der Mitte des Bildschirms . Wenn Sie die Maustaste loslassen, erscheint ein Kreuz. Klicken Sie darauf und nutzen die winzige Quadrate - Drag - Griffe , um das Etikett zu erweitern. Wiederholen Sie diesen Vorgang dreimal , indem jedes Etikett unter dem vorhergehenden und damit breiter. In eine fünfte Label auf der rechten Seite des vierten und erweitern sie als gut.
2
Klicken Sie auf das " TextBox " -Steuerelement in der Toolbox ein kleines Quadrat , die die Buchstaben "ab ", und ziehen Sie auf das Formular auf der rechten Seite der oberen Etiketts . Lassen Sie die Maustaste und verwenden Sie die Ziehpunkte , um das Textfeld zu erweitern. Wiederholen Sie diesen Vorgang zwei weitere Male , indem jede Box unter dem vorhergehenden. Klicken Sie auf " CommandButton ", ein kleines Quadrat in der Toolbox unter dem TextBox Symbol gefunden , und ziehen Sie es auf dem Formular , die Verbreiterung es auch.
3
Klicken Sie auf einen "Label- " zu einer Zeit, beginnend von oben . Suchen Sie die entsprechende Eigenschaft "Caption" in den "Eigenschaften "-Spalte auf der rechten Seite . Für jedes Etikett , auf dem "Caption "-Zeile doppelklicken Sie auf und machen Sie diese Änderungen von der Standardtext Sie sehen :
Top Label: Name für diese " Darlehensbetrag : " Second Label: Name für diese "Monthly Zinssatz: "Third Label: Name für diese " Anzahl der Monate : "Fourth Label: Name für diese " monatliche Zahlung: " Fifth Label: löschen Sie die Beschriftung Name
4
Klicken Sie auf jedem . " TextBox " wiederum und löschen die Eigenschaft "Text" Namen im Abschnitt Eigenschaften . Ändern Sie den " CommandButton " Beschriftung zu lesen "Berechnen ".
5
Doppelklicken Sie auf die neu benannte "Berechnen "-Steuerung, die die Code-Ansicht geöffnet. Hier finden Sie zwei Leitungen bereits eingetragen , " Private Sub Command1_Click () " und geben Sie die folgenden Zeilen von Code zwischen diesen beiden Linien "End Sub ". :
Dim AmtBorrow , NumMonths Wie IntegerDim bewerten , MonthPay Wie DoubleRate = Text2.TextNumMonths = Text3.TextMonthPay = Text1.Text * (1 + Rate) ^ NumMonths * Preis /( (1 + Rate) ^ NumMonths - 1) Label5.Caption = Format ( MonthPay " . $ # # # #" ;)
Presse "F5" , um das Programm und liefern die Beträge auf dem Bildschirm , mit " Berechnen" zu beenden.
