Per calcolare i pagamenti mensili necessari per pagare un prestito, è necessario tre pezzi di informazione: l'importo del prestito; il tasso di interesse a carico; e la lunghezza del tempo per rimborsare il prestito. La formula matematica per fare questo si traduce anche in codice Visual Basic. Con la creazione di un modulo con le opzioni per inserire questi tre pezzi di informazioni, è possibile avere il proprio calcolatore di prestito di pagamento mensile sul computer.

istruzione

1 Selezionare il modello "EXE standard" dopo il caricamento di Visual Basic. Trovare l'icona "Label" nella casella degli strumenti sulla sinistra dello schermo. Questa icona appare come una lettera maiuscola A. Fare clic e trascinare al top della forma nel centro dello schermo. Quando si rilascia il mouse, appare una croce. Fare clic su di esso e utilizzare il piccolo piazze trascina maniglie-per ampliare l'etichetta. Ripetere questa operazione tre volte, mettendo ogni etichetta sotto del precedente e rendendolo più ampia. Aggiungere una quinta etichetta a destra del quarto e ampliare pure.

2 Fare clic sul controllo "TextBox" nella casella degli strumenti, una piccola piazza che contiene le lettere "AB", e trascinarlo sul modulo alla destra dell'etichetta superiore. Rilasciare il mouse e utilizzare le maniglie di trascinamento per allargare la casella di testo. Ripetere questa operazione altre due volte, mettendo ogni casella di sotto di quello precedente. Clicca su "CommandButton", una piccola piazza nella casella degli strumenti, che si trova sotto l'icona TextBox, e trascinarlo sul modulo, allargando pure.

3 Cliccare su uno "Label" alla volta partendo dall'alto. Individuare la proprietà corrispondente "Caption" nella colonna "Proprietà" nel pannello di destra. Per ogni etichetta, fare doppio clic sulla riga "Caption" ed effettuare le seguenti variazioni rispetto al testo di default che si vede:

Top Etichetta: Nome di questo "Importo mutuo richiesto:"

Secondo Etichetta: Nome di questo "Interest Rate mensile:"
Terzo Etichetta: Nome di questo "numero di mesi:"
Quarto Etichetta: Nome di questo "pagamento mensile:"
Quinto Etichetta: Cancellare il nome didascalia.

4 Clicca su ogni "TextBox", a sua volta ed eliminare il "testo" nome della proprietà nella sezione Proprietà. Modificare la didascalia "CommandButton" leggere "Calcola".

5 Fare doppio clic sul controllo nuovo nome "Calcola", che apre la finestra di visualizzazione del codice. Troverete due linee già entrati, "Private Sub Command1_Click ()" e "End Sub." Inserire le seguenti righe di codice tra queste due linee:

Dim AmtBorrow, NUMMONTHS As Integer
Tasso Dim, MonthPay come doppio
Rate = Text2.Text
NUMMONTHS = Text3.Text
MonthPay = Text1.Text (1 + Rate) ^ NUMMONTHS Tasso / ((1 + tasso) ^ NUMMONTHS - 1)
Label5.Caption = Format (MonthPay, "$ ##. ##")

Premere il tasto "F5" per eseguire il programma e fornire gli importi sullo schermo, premendo il tasto "Calcola" per terminare.