Pembuatan Program Aplikasi berbasis Windows

Latihan Modul 9.3 latiahn

Nama : Haidi

No.Reg : 49031064

Jika diamati lebih lanjut pada Modul 9.2 (Aplikasi Operator Aritmatika), TextBox1 dan TextBox2 tidak dapat diberikan nilai pecahan. Tugas anda adalah memperbaiki kode program pada modul tersebut sehingga pada TextBox1 dan TextBox2 dapat diberikan nilai pecahan.

Catatan :

TextBox1 dan TextBox2 harus dapat diberikan nilai pecahan.
Anda boleh mengubah tata letak komponen yang berada pada Form sesuai dengan keinginan anda.
Hilangkan tombol Maximize dan Minimize yang terdapat pada Title Bar.
Nama dan NIM anda harus dimasukkan pada Form aplikasi.
Tambahkan sebuah tombol Keluar (Exit), bila tombol ini ditekan maka form aplikasi akan ditutup.
Jelaskan fungsi setiap baris pada kode program yang anda buat (baris a sampai p).
Simpan file program anda dengan Visual C++ anda dengan format file “NIMAnda-Nama Anda- Modul9.rar”.
File Latihan di upload pada moodle.

Jawaban :

Source Code dan Komentar

#pragma once

namespace Modul92 {

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 Form1

/// </summary>

public ref class Form1 : public System::Windows::Forms::Form

{

public:

Form1(void)

{

InitializeComponent();

//TODO: Add the constructor code here

}

protected:

/// <summary>

/// Clean up any resources being used.

/// </summary>

~Form1()

{

if (components)

{

delete components;

}

private: System::Windows::Forms::Label^ label1;

protected:

private: System::Windows::Forms::Label^ label2;

private: System::Windows::Forms::Label^ label3;

private: System::Windows::Forms::TextBox^ textBox1;

private: System::Windows::Forms::TextBox^ textBox2;

private: System::Windows::Forms::TextBox^ textBox3;

private: System::Windows::Forms::ComboBox^ comboBox1;

private: System::Windows::Forms::Button^ button1;

private: System::Windows::Forms::Button^ button2;

private:

/// <summary>

/// Required designer variable.

/// </summary>

System::ComponentModel::Container ^components;

#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)//inisialisasi komponen form yang digunakan

{

this->label1 = (gcnew System::Windows::Forms::Label());//form label1

this->label2 = (gcnew System::Windows::Forms::Label());//form label2

this->label3 = (gcnew System::Windows::Forms::Label());//form label3

this->textBox1 = (gcnew System::Windows::Forms::TextBox());//form textBox1

this->textBox2 = (gcnew System::Windows::Forms::TextBox());//form textBox2

this->textBox3 = (gcnew System::Windows::Forms::TextBox());//form textBox3

this->comboBox1 = (gcnew System::Windows::Forms::ComboBox());//form comboBox1

this->button1 = (gcnew System::Windows::Forms::Button());//form button1

this->button2 = (gcnew System::Windows::Forms::Button());//form button2

this->SuspendLayout();

// label1

this->label1->AutoSize = true;

this->label1->Location = System::Drawing::Point(12, 9);

this->label1->Name = L”label1″;

this->label1->Size = System::Drawing::Size(68, 13);

this->label1->TabIndex = 0;

this->label1->Text = L”Nama : Haidi”;

this->label1->Click += gcnew System::EventHandler(this, &Form1::label1_Click);

// label2

this->label2->AutoSize = true;

this->label2->Location = System::Drawing::Point(106, 9);

this->label2->Name = L”label2″;

this->label2->Size = System::Drawing::Size(84, 13);

this->label2->TabIndex = 1;

this->label2->Text = L”NIM : 49013064″;

// label3

this->label3->AutoSize = true;

this->label3->Location = System::Drawing::Point(177, 64);

this->label3->Name = L”label3″;

this->label3->Size = System::Drawing::Size(13, 13);

this->label3->TabIndex = 2;

this->label3->Text = L”=”;

// textBox1

this->textBox1->Location = System::Drawing::Point(15, 59);

this->textBox1->Name = L”textBox1″;

this->textBox1->Size = System::Drawing::Size(38, 20);

this->textBox1->TabIndex = 3;

// textBox2

this->textBox2->Location = System::Drawing::Point(123, 60);

this->textBox2->Name = L”textBox2″;

this->textBox2->Size = System::Drawing::Size(35, 20);

this->textBox2->TabIndex = 4;

// textBox3

this->textBox3->Location = System::Drawing::Point(207, 59);

this->textBox3->Name = L”textBox3″;

this->textBox3->Size = System::Drawing::Size(58, 20);

this->textBox3->TabIndex = 5;

// comboBox1

this->comboBox1->FormattingEnabled = true;

this->comboBox1->Items->AddRange(gcnew cli::array< System::Object^ >(4) {L”+”, L”-“, L”*”, L”/”});

this->comboBox1->Location = System::Drawing::Point(69, 59);

this->comboBox1->Name = L”comboBox1″;

this->comboBox1->Size = System::Drawing::Size(37, 21);

this->comboBox1->TabIndex = 6;

this->comboBox1->Text = L”+”;

this->comboBox1->SelectedIndexChanged += gcnew System::EventHandler(this, &Form1::comboBox1_SelectedIndexChanged);

// button1

this->button1->Location = System::Drawing::Point(207, 94);

this->button1->Name = L”button1″;

this->button1->Size = System::Drawing::Size(58, 23);

this->button1->TabIndex = 7;

this->button1->Text = L”Hitung”;

this->button1->UseVisualStyleBackColor = true;

this->button1->Click += gcnew System::EventHandler(this, &Form1::button1_Click);

// button2

this->button2->Location = System::Drawing::Point(89, 93);

this->button2->Name = L”button2″;

this->button2->Size = System::Drawing::Size(69, 23);

this->button2->TabIndex = 8;

this->button2->Text = L”Exit”;

this->button2->UseVisualStyleBackColor = true;

this->button2->Click += gcnew System::EventHandler(this, &Form1::button2_Click);

// Form1

this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);

this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;

this->ClientSize = System::Drawing::Size(286, 129);

this->Controls->Add(this->button2);

this->Controls->Add(this->button1);

this->Controls->Add(this->comboBox1);

this->Controls->Add(this->textBox3);

this->Controls->Add(this->textBox2);

this->Controls->Add(this->textBox1);

this->Controls->Add(this->label3);

this->Controls->Add(this->label2);

this->Controls->Add(this->label1);

this->MaximizeBox = false;

this->MinimizeBox = false;

this->Name = L”Form1″;

this->Text = L”Form1″;

this->ResumeLayout(false);

this->PerformLayout();

}

#pragma endregion

private: System::Void label1_Click(System::Object^ sender, System::EventArgs^ e) {

}

private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {

double nilaiA, nilaiB;//deklarasi variabel nilaiA, NilaiB bertipe double

double hasil;//deklarasi variabel hasil bertipe double

String^ operatornya;//fungsi string

nilaiA = double::Parse(textBox1->Text);

nilaiB = double::Parse(textBox2->Text);

operatornya = comboBox1->Text;

if (operatornya == “+”)//operator penjumlahan

hasil = Convert::ToDouble (nilaiA + nilaiB);//hasil penjumlahan

else if (operatornya == “-“)//operator pengurangan

hasil = Convert::ToDouble (nilaiA – nilaiB);//hasil pengurangan

else if (operatornya == “*”)//operator perkalian

hasil = Convert::ToDouble (nilaiA * nilaiB);//hasil perkalian

else if (operatornya == “/”)//operator pembagian

hasil = Convert::ToDouble(nilaiA / nilaiB);//hasil pembagian

textBox3->Text = hasil.ToString();//proses perhitungan

}

private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) {

this->Close();//source code untuk close/exit

}

private: System::Void comboBox1_SelectedIndexChanged(System::Object^ sender, System::EventArgs^ e) {

}

};

}

Tampilan setalah di compile dan dijalankan :

Uncategorized

Haidi Barasa

Pembuatan Program Aplikasi berbasis Windows

Leave a comment Cancel reply

Share this:

Related

Leave a comment Cancel reply