#pragma once
#include <cmath>
namespace Lab3 {
using namespace System;
using namespace System::ComponentModel;
using namespace System::Collections;
using namespace System::Windows::Forms;
using namespace System::Data;
using namespace System::Drawing;
/// <summary>
/// Summary for MyForm
/// </summary>
public ref class MyForm : public System::Windows::Forms::Form
{
public:
MyForm(void)
{
InitializeComponent();
//
//TODO: Add the constructor code here
//
}
protected:
/// <summary>
/// Clean up any resources being used.
/// </summary>
~MyForm()
{
if (components)
{
delete components;
}
}
private: System::Windows::Forms::Label^ label1;
private: System::Windows::Forms::TextBox^ textBox1;
private: System::Windows::Forms::Label^ label2;
private: System::Windows::Forms::TextBox^ textBox2;
private: System::Windows::Forms::Label^ label3;
private: System::Windows::Forms::TextBox^ textBox3;
private: System::Windows::Forms::Label^ label4;
private: System::Windows::Forms::TextBox^ textBox4;
private: System::Windows::Forms::Button^ button1;
private: System::Windows::Forms::Button^ button2;
private: System::Windows::Forms::Button^ button3;
private: System::Windows::Forms::ErrorProvider^ errorProvider1;
private: System::ComponentModel::IContainer^ components;
protected:
private:
/// <summary>
/// Required designer variable.
/// </summary>
#pragma region Windows Form Designer generated code
/// <summary>
/// Required method for Designer support - do not modify
/// the contents of this method with the code editor.
/// </summary>
void InitializeComponent(void)
{
this->components = (gcnew System::ComponentModel::Container());
this->label1 = (gcnew System::Windows::Forms::Label());
this->textBox1 = (gcnew System::Windows::Forms::TextBox());
this->label2 = (gcnew System::Windows::Forms::Label());
this->textBox2 = (gcnew System::Windows::Forms::TextBox());
this->label3 = (gcnew System::Windows::Forms::Label());
this->textBox3 = (gcnew System::Windows::Forms::TextBox());
this->label4 = (gcnew System::Windows::Forms::Label());
this->textBox4 = (gcnew System::Windows::Forms::TextBox());
this->button1 = (gcnew System::Windows::Forms::Button());
this->button2 = (gcnew System::Windows::Forms::Button());
this->button3 = (gcnew System::Windows::Forms::Button());
this->errorProvider1 = (gcnew System::Windows::Forms::ErrorProvider(this->components));
(cli::safe_cast<System::ComponentModel::ISupportInitialize^>(this->errorProvider1))->BeginInit();
this->SuspendLayout();
//
// label1
//
this->label1->AutoSize = true;
this->label1->Location = System::Drawing::Point(47, 9);
this->label1->Name = L"label1";
this->label1->Size = System::Drawing::Size(90, 13);
this->label1->TabIndex = 0;
this->label1->Text = L"Loan Amount (C)";
this->label1->Click += gcnew System::EventHandler(this, &MyForm::label1_Click);
//
// textBox1
//
this->textBox1->Location = System::Drawing::Point(62, 37);
this->textBox1->Name = L"textBox1";
this->textBox1->Size = System::Drawing::Size(51, 20);
this->textBox1->TabIndex = 1;
this->textBox1->TextChanged += gcnew System::EventHandler(this, &MyForm::textBox1_TextChanged);
//
// label2
//
this->label2->AutoSize = true;
this->label2->Location = System::Drawing::Point(188, 9);
this->label2->Name = L"label2";
this->label2->Size = System::Drawing::Size(148, 13);
this->label2->TabIndex = 2;
this->label2->Text = L"Interest Rate Percentage (R)";
this->label2->Click += gcnew System::EventHandler(this, &MyForm::label2_Click);
//
// textBox2
//
this->textBox2->Location = System::Drawing::Point(222, 37);
this->textBox2->Name = L"textBox2";
this->textBox2->Size = System::Drawing::Size(67, 20);
this->textBox2->TabIndex = 3;
//
// label3
//
this->label3->AutoSize = true;
this->label3->Location = System::Drawing::Point(379, 9);
this->label3->Name = L"label3";
this->label3->Size = System::Drawing::Size(171, 13);
this->label3->TabIndex = 4;
this->label3->Text = L"Number of Monthly Payments (N)";
//
// textBox3
//
this->textBox3->Location = System::Drawing::Point(391, 37);
this->textBox3->Name = L"textBox3";
this->textBox3->Size = System::Drawing::Size(140, 20);
this->textBox3->TabIndex = 5;
this->textBox3->TextChanged += gcnew System::EventHandler(this, &MyForm::textBox3_TextChanged);
//
// label4
//
this->label4->AutoSize = true;
this->label4->Location = System::Drawing::Point(614, 9);
this->label4->Name = L"label4";
this->label4->Size = System::Drawing::Size(110, 13);
this->label4->TabIndex = 6;
this->label4->Text = L"Monthly Payment (P)";
//
// textBox4
//
this->textBox4->Location = System::Drawing::Point(604, 37);
this->textBox4->Name = L"textBox4";
this->textBox4->Size = System::Drawing::Size(141, 20);
this->textBox4->TabIndex = 7;
//
// button1
//
this->button1->Location = System::Drawing::Point(62, 82);
this->button1->Name = L"button1";
this->button1->Size = System::Drawing::Size(51, 23);
this->button1->TabIndex = 8;
this->button1->Text = L"P=";
this->button1->UseVisualStyleBackColor = true;
this->button1->Click += gcnew System::EventHandler(this, &MyForm::button1_Click);
//
// button2
//
this->button2->Location = System::Drawing::Point(222, 82);
this->button2->Name = L"button2";
this->button2->Size = System::Drawing::Size(67, 23);
this->button2->TabIndex = 9;
this->button2->Text = L"R=";
this->button2->UseVisualStyleBackColor = true;
this->button2->Click += gcnew System::EventHandler(this, &MyForm::button2_Click);
//
// button3
//
this->button3->Location = System::Drawing::Point(391, 82);
this->button3->Name = L"button3";
this->button3->Size = System::Drawing::Size(140, 23);
this->button3->TabIndex = 10;
this->button3->Text = L"N=";
this->button3->UseVisualStyleBackColor = true;
this->button3->Click += gcnew System::EventHandler(this, &MyForm::button3_Click);
//
// errorProvider1
//
this->errorProvider1->ContainerControl = this;
//
// MyForm
//
this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);
this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
this->ClientSize = System::Drawing::Size(758, 125);
this->Controls->Add(this->button3);
this->Controls->Add(this->button2);
this->Controls->Add(this->button1);
this->Controls->Add(this->textBox4);
this->Controls->Add(this->label4);
this->Controls->Add(this->textBox3);
this->Controls->Add(this->label3);
this->Controls->Add(this->textBox2);
this->Controls->Add(this->label2);
this->Controls->Add(this->textBox1);
this->Controls->Add(this->label1);
this->Name = L"MyForm";
this->Text = L"Loan Calculator";
(cli::safe_cast<System::ComponentModel::ISupportInitialize^>(this->errorProvider1))->EndInit();
this->ResumeLayout(false);
this->PerformLayout();
}
#pragma endregion
private: System::Void label1_Click(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void textBox1_TextChanged(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void label2_Click(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void textBox3_TextChanged(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e)
{
double loanAmount = System::Convert::ToDouble(textBox1->Text);
double interestRate = System::Convert::ToDouble(textBox2->Text);
double numberOfMonths = System::Convert::ToDouble(textBox3->Text);
double rRate = interestRate / 1200;
double numerater = ((loanAmount * rRate) * (pow((1 + rRate), numberOfMonths)));
double denominater = ((pow((1 + rRate), numberOfMonths)) - 1);
double newr = numerater / denominater;
textBox4->Text = System::Convert::ToString(newr);
}
private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) {
if (textBox2->Text == ""){
double loanAmount = System::Convert::ToDouble(textBox1->Text);
double payment = System::Convert::ToDouble(textBox4->Text);
double numberOfMonths = System::Convert::ToDouble(textBox3->Text);
double initial = (2 * (numberOfMonths * payment - loanAmount) / (numberOfMonths * loanAmount));
double rOld = (initial * (pow((1 + initial), numberOfMonths)) / ((pow((1 + initial), numberOfMonths) - 1))) - (payment / loanAmount);
double b1 = payment * pow((1. + rOld), -numberOfMonths);
double c1 = (rOld * loanAmount);
double num = payment - (b1 - c1);
double denom = numberOfMonths * (payment * pow((1. + rOld), (-numberOfMonths - 1)) - loanAmount);
int terminate = 0;
double rNew;
while (terminate == 0)
{ //terminating factor to exit the loop
rNew = rOld - (num / denom);
if (fabs(rNew - rOld) >= 0.01) //loops until difference is less than .01, then terminates
{
rOld = rNew;
}
else
{
terminate = 1;
}
textBox2->Text = System::Convert::ToString(rNew); //outputs desired results
}
}
else{
errorProvider1->SetError(textBox2, "Please keep this blank to calculate the interest rate."); //error check
}
}
/*private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e)
{
double loanAmount = System::Convert::ToDouble(textBox1->Text); //converts the input value to double, if it wasn't already input as such
double annualInterestRate = System::Convert::ToDouble(textBox2->Text);
double numberOfYears = System::Convert::ToDouble(textBox3->Text);
double monthlyInterestRate = annualInterestRate / 1200;
double monthlyPayment = loanAmount * monthlyInterestRate / (1 - 1 / pow(1 + monthlyInterestRate, numberOfYears * 12));
double totalPayment = monthlyPayment * numberOfYears * 12;
monthlyPayment = floor(monthlyPayment * 100 + 0.5) / 100;
totalPayment = floor(totalPayment * 100 + 0.5) / 100;
textBox3->Text = System::Convert::ToString(monthlyPayment); //computes result, and displays values in text box
//tbTotalPayment->Text = System::Convert::ToString(totalPayment);
}*/
private: System::Void button3_Click(System::Object^ sender, System::EventArgs^ e) {
if (textBox3->Text == ""){
double loanAmount = System::Convert::ToDouble(textBox1->Text); //converts the input value to double, if it wasn't already input as such
double annualInterestRate = System::Convert::ToDouble(textBox2->Text);
double payment = System::Convert::ToDouble(textBox4->Text);
annualInterestRate = annualInterestRate / 1200; //computes the value of number of payments with the given information
double top = log(payment / loanAmount) - log((payment / loanAmount) - annualInterestRate);
double bottom = log(1 + annualInterestRate);
double months = top / bottom;
textBox3->Text = System::Convert::ToString(months);
}
else
{
errorProvider1->SetError(textBox3, "Please keep this blank to calculate the number of months.");
}
}
private: System::Void errorProvider1_RightToLeftChanged(System::Object^ sender, System::EventArgs^ e) {
}
};
}