|
Pour calculer les paiements mensuels nécessaires pour rembourser un prêt , vous avez besoin de trois informations : le montant du prêt , le taux d'intérêt exigé , et 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 un formulaire avec des options à l'entrée de ces trois éléments d'information , vous pouvez avoir votre propre calculatrice de paiement mensuel du prêt sur votre ordinateur. Instructions
1 Sélectionnez le modèle " standard EXE " après le chargement de Visual Basic. Trouvez l'icône "Label" dans la boîte à outils sur la gauche de l'écran. Cette icône ressemble à une lettre A. de capital 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 sur l'image et utiliser la minuscule carrés et faites glisser les poignées à élargir l'étiquette. Répéter cette action 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 vers la droite de la quatrième et élargir ainsi.
2 Cliquez sur la commande " zone de texte " dans la boîte à outils , un petit carré contenant les lettres «AB » et faites glisser sur le formulaire à droite de l'étiquette supérieure . Relâchez la souris et utiliser la fonction glisser les poignées d'élargir la zone de texte . Répétez cette opération deux fois de plus , en plaçant chaque encadré ci-dessous la précédente. Cliquez sur le " bouton de commande , " une petite place dans la boîte à outils , qui se trouve au-dessous de l'icône zone de texte, et faites-le glisser sur le formulaire, élargissant ainsi .
3 Cliquez sur un «label " à la fois à partir du haut . Repérez la "Légende" biens correspondant dans la colonne " Propriétés" dans le panneau de droite . Pour chaque étiquette , double- cliquez sur la ligne « Légende » et effectuer ces modifications du texte par défaut que vous voyez :
Top Label: Nom de cette « Montant du prêt: " Second Label: Nom Ce «taux d'intérêt mensuel : " Troisième label: nom de cette " Nombre de mois: «Quatrième label: nom de cette « paiement mensuel: " Cinquième label: supprimer le nom de légende
4 Cliquez sur chacun d'eux. " TextBox " à son tour, et supprimer le " texte " nom de la propriété dans la section Propriétés . Modifier la légende " CommandButton " pour lire "Calculer ".
5 Double -cliquez sur le contrôle nouvellement nommé «Calculer» , ce qui ouvre la fenêtre de visualisation de code. Vous trouverez deux lignes déjà entrés, " Private Sub Command1_Click () " et entrez les lignes suivantes de code entre ces deux lignes " End Sub ". :
AmtBorrow Dim , NumMonths Comme IntegerDim Prix , MonthPay Comme DoubleRate = Text2.TextNumMonths = Text3.TextMonthPay = Text1.Text * (1 + taux ) ^ NumMonths * Taux /( (1 + taux ) ^ NumMonths - 1) Label5.Caption = Format ( MonthPay " . $ # # # #" ;)
Appuyez sur " F5" pour exécuter le programme et de fournir les montants sur l'écran , en appuyant sur "Calculer " pour terminer.
|
