Pour calculer les paiements mensuels nécessaires pour rembourser un prêt, vous avez besoin de trois informations: le montant du ratio prêt le taux de pleine charge d`intérêt et de la longueur de temps pour rembourser le prêt. La formule mathématique pour faire cela se traduit bien dans le code Visual Basic. En créant une forme avec des options pour saisir ces trois éléments d`information, vous pouvez avoir votre propre calculatrice de paiement mensuel du prêt sur votre ordinateur.
Sélectionnez le "EXE standard" modèle après le chargement de Visual Basic. Trouvez le "Étiquette" icône dans la boîte à outils sur la gauche de l`écran. Cette icône ressemble à une lettre majuscule A. Cliquez et faites-le glisser vers le haut de la forme dans le centre de l`écran. Lorsque vous relâchez la souris, une croix apparaît. Cliquez dessus et utilisez la petite carrés glisser les poignées à élargir l`étiquette. Répéter cette procédure trois fois, en plaçant chaque étiquette au-dessous de la précédente et de le rendre plus large. Ajouter un cinquième étiquette à la droite de la quatrième et à élargir ainsi.
Clique sur le "Zone de texte" contrôle dans la boîte à outils, un petit carré contenant les lettres "un B," et faites-le glisser sur le formulaire à droite de l`étiquette supérieure. Relâchez la souris et utiliser les poignées de déplacement pour élargir la zone de texte. Répétez cette action deux fois de plus, en plaçant chaque case ci-dessous la précédente. Clique sur le "Bouton de commande," une petite place dans la boîte à outils, trouvé sous l`icône de texte, et faites-le glisser sur la forme, élargissant ainsi.
Cliquez sur un "Étiquette" à la fois en partant du haut. Recherchez le correspondant "Légende" propriété dans le "Propriétés" colonne dans le panneau de droite. Pour chaque étiquette, double-cliquez sur le "Légende" ligne et faire ces changements du texte par défaut que vous voyez:
Top Label: Nommez ce "Montant du prêt:"
Second Label: Nommez ce "Taux d`intérêt mensuel:"
Troisième Label: Nom de cette "Nombre de mois:"
Quatrième Label: Nommez ce "Paiement mensuel:"
Cinquième Label: Supprimer le nom de la légende.Cliquez sur chaque "Zone de texte" à son tour, et supprimer le "Texte" nom de la propriété dans la section Propriétés. Changer la "Bouton de commande" caption à lire "Calculer."
Double-cliquez sur le nouveau nom de "Calculer" le contrôle, ce qui ouvre la fenêtre d`affichage Code. Vous trouverez deux lignes déjà entrés, "Private Sub Command1_Click ()" et "End Sub." Entrez les lignes de code entre ces deux lignes suivantes:
Dim AmtBorrow, NUMMONTHS As Integer
Taux Dim, MonthPay As Double
Taux = Text2.Text
NUMMONTHS = Text3.Text
MonthPay = Text1.Text (1 + Taux) ^ NUMMONTHS Taux / ((1 + Taux) ^ NUMMONTHS - 1)
Label5.Caption = Format (MonthPay, "## $. ##")presse "F5" pour exécuter le programme et de fournir les montants sur l`écran, en appuyant sur "Calculer" pour finir.
