Tutorial membuat kalkulator sederhana dengan Visual basic pada Power point

Kali ini kita akan belajar membuat pemrograman sederhana menggunakan Aplikasi Visual Basic (VBA) pada Powerpoint 2007. Program yang akan kita buat adalah kalkulator sederhana. Kenapa disebut kalkulator sederhana? Karena kita hanya akan menggunakan operasi dasar matematika yaitu penjumlahan (+), pengurangan (-), perkalian (x), pembagian (/), dan pemangkatan (^). Kelima operasi dasar tersebut akan kita fungsikan melalui lima buah tombol operasi dan kita lengkapi dengan satu buah tombol untuk menghapus data input dan data output.

Biar  tidak ada kesalahan dalam memvisualisasikan (he...he...), ini program yang akan kita buat :

Langkah-langkah pembuatannya adalah sebagai berikut :

Pertama, Jalankan program Microsoft Office Powerpoint, pastikan menu developer sudah muncul di deretan menu utama ya...

Kedua, ubah layout slide 1 menjadi blank

Ketiga, Pasang tiga buah TextBox  dan enam buah Command Button di slide 1 dan ubah properties masing-masing kontrol seperti ditunjukkan pada gambar di bawah ini :

(Background saya buat biru agar memudahkan pembacaan kontrol)

Properties masing-masing kontrol adalah sebagai berikut :

Kontrol	Name	Caption
TextBox1	a
TextBox2	b
TextBox3	Hasil
CommandButton1	plus	+
CommandButton2	minus	-
CommandButton3	pangkat	^
CommandButton4	kali	x
CommandButton5	bagi	/
CommandButton6	Hapus

(sahabat juga bisa mengatur jenis dan ukuran font tiap kontrol)

Keempat, Pasang kode VBA di masing-masing CommandButton dengan cara klik dua kali pada masing-masing tombol dan ketikkan kode VBA sebagai berikut :

Nama Kontrol	Caption	Kode VBA
plus	+	Private Sub plus_Click() Hasil = Val(a) + Val(b) End Sub
minus	-	Private Sub minus_Click() Hasil = a - b End Sub
pangkat	^	Private Sub pangkat_Click() Hasil = a ^ b End Sub
kali	x	Private Sub kali_Click() Hasil = a * b End Sub
bagi	/	Private Sub bagi_Click() Hasil = a / b End Sub
Hapus		Private Sub Hapus_Click() a = "" b = "" Hasil = "" End Sub

Kelima, sisipkan background dan berbagai shape untuk mempercantik desain. Jalankan Powerpoint dengan klik Slide Show (atau F5).

Sumber: http://www.sangpengajar.com/2012/01/tutorial-1-membuat-kalkulator-sederhana.html

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace _34.Rasyid_Sabilillah__PENGULANGAN__
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.Write("Input Jumlah Pengulangan : ");
            string a = Console.ReadLine();
            int n = Convert.ToInt16(a);

            for (int i = 1 ; i <= n; i++)
            if (i % 2 == 1)
            {

                Console.WriteLine(i + "Saya Tidak Akan Mengulangi Perbuatan Ini Lagi");
            }
            Console.ReadLine();

            //increment
            //i++ -> i = i + 1 + 1 
        }
    }
} - See more at: http://anak-sidoarjo-indonesia.blogspot.co.id/2015/10/program-c-tentang-pengulangan.html#sthash.G5gzhWGJ.dpuf

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace _34.Rasyid_Sabilillah__PENGULANGAN__
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.Write("Input Jumlah Pengulangan : ");
            string a = Console.ReadLine();
            int n = Convert.ToInt16(a);

            for (int i = 1 ; i <= n; i++)
            if (i % 2 == 1)
            {

                Console.WriteLine(i + "Saya Tidak Akan Mengulangi Perbuatan Ini Lagi");
            }
            Console.ReadLine();

            //increment
            //i++ -> i = i + 1 + 1 
        }
    }
} - See more at: http://anak-sidoarjo-indonesia.blogspot.co.id/2015/10/program-c-tentang-pengulangan.html#sthash.G5gzhWGJ.dpuf

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace _34.Rasyid_Sabilillah__PENGULANGAN__
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.Write("Input Jumlah Pengulangan : ");
            string a = Console.ReadLine();
            int n = Convert.ToInt16(a);

            for (int i = 1 ; i <= n; i++)
            if (i % 2 == 1)
            {

                Console.WriteLine(i + "Saya Tidak Akan Mengulangi Perbuatan Ini Lagi");
            }
            Console.ReadLine();

            //increment
            //i++ -> i = i + 1 + 1 
        }
    }
} - See more at: http://anak-sidoarjo-indonesia.blogspot.co.id/2015/10/program-c-tentang-pengulangan.html#sthash.G5gzhWGJ.dpuf