Cómo calcular los pagos mensuales en Visual Basic

Para el cálculo de los pagos mensuales necesarios para pagar un préstamo, necesita tres datos: el importe del préstamo; La tasa de interés; y la longitud de tiempo para pagar el préstamo. La fórmula matemática para hacer esto se traduce así en código de Visual Basic. Al crear un formulario con opciones de entrada a estos tres tipos de información, usted puede tener su propia calculadora de pago mensual del préstamo en el equipo.

Instrucciones

1 Seleccione la plantilla "EXE estándar" después de cargar Visual Basic. Encontrar el icono "Etiqueta" en la caja de herramientas en la parte izquierda de la pantalla. Este icono se parece a una letra mayúscula A. Haga clic y arrastre a la parte superior de la forma en el centro de la pantalla. Al soltar el ratón, aparece una cruz. Haga clic en él y utilizar la pequeña cuadrados-arrastre los controles a ensanchar la etiqueta. Esta acción se repite tres veces, colocando cada etiqueta debajo de la anterior y lo que es más amplio. Añadir una quinta etiqueta a la derecha de la cuarta y ensancharlo también.

2 Haga clic en el control "Cuadro de texto" en la caja de herramientas, un pequeño cuadrado que contiene las letras "ab", y se arrastra en el formulario a la derecha de la etiqueta superior. Suelte el ratón y el uso de los controles de arrastre para ampliar el cuadro de texto. Esta acción se repite dos veces más, colocando cada caja debajo de la anterior. Haga clic en el "CommandButton", una pequeña plaza en la caja de herramientas, que se encuentra debajo del icono de cuadro de texto, y se arrastra en el formulario, ampliando también.

3 Haga clic en uno "Etiqueta" en uno, empezando desde la parte superior. Busque la correspondiente propiedad "Caption" en la columna "Propiedades" en el panel de la derecha. Para cada etiqueta, haga doble clic en la línea "Leyenda" y hacer estos cambios desde el texto predeterminado que se ve:

Etiqueta Superior: Nombre esta "Importe del préstamo:"

Segundo Sello: Nombre esta "tasa de interés mensual:"
Tercer Sello: Nombre de este "número de meses:"
Cuarto Sello: Nombre esta "Pago mensual:"
Quinto Sello: Eliminar el nombre del subtítulo.

4 Haga clic en cada "cuadro de texto" a su vez y borrar el "texto", nombre de la propiedad en la sección Propiedades. Cambie el título "CommandButton" leer "Calcular".

5 Haga doble clic en el control recién nombrado "Calcular", que se abre la ventana de vista Código. Se encuentran dos líneas ya entraron, "Private Sub Command1_Click ()" y "End Sub". Introduzca las siguientes líneas de código entre estas dos líneas:

Dim AmtBorrow, NumMonths As Integer
Tasa tenue, MonthPay Como Doble
Velocidad = Text2.Text
NumMonths = Text3.Text
MonthPay = text1.Text (1 + Rate) ^ NumMonths Rate / ((1 + tipo) ^ NumMonths - 1)
Label5.Caption = Format (MonthPay, "$ ##. ##")

Pulse la tecla "F5" para ejecutar el programa y el suministro de las cantidades en la pantalla, al pulsar "Calcular" para finalizar.