Cara Membuat Trigger di MySQL

Assalamualaikum agan semua, pada sore ini saya ingin kembali memposting tutorial sederhana :D
Karena sudah lama saya tidak memposting tentang Database MySQL kali ini saya akan membahas tentang Cara Membuat Trigger di MySQL.

Apa itu Trigger ?
Trigger adalah suatu prosedur yang akan menjalankan suatu perintah SQL yang bisa terjadi pada saat sebelum atau sesudah kita melakukan INSERT, UPDATE dan DELETE suatu row pada tabel

Syntak dasar dari trigger adalah sebagai berikut :

CREATE TRIGGER trigger_name trigger_time trigger_event
ON table_name FOR EACH ROW
BEGIN
trigger_body
END

Keterangan :

• trigger_name = nama trigger
• trigger_time = kapan waktu eksekusi trigger tersebut bisa sebelum atau sesudah perubahan yang terjadi pada baris di tabel, sesudah gunakan AFTER sebelum gunakan BEFORE
• trigger_event = adalah event yang menyebabkan trigger dijalankan, bisa dengan INSERT, UPDATE, Delete
• table_name = nama tabel
• trigger_body = perintah - perintah SQL yang akan dijalankan. Perlu diperhatikan karena trigger digunakan pada saat terjadi perubahan pada row. untuk referensi ke row yang sebelum dan sesudah terjadinya perubahan anda dapat menggunakan "OLD" dan "NEW

Cara Membuat Trigger di MySQL
Pada contoh berikut saya akan membuat trigger yang berguna untuk mengurangi stok pada tabel barang ketika terjadinya insert data pada tabel penjualan

1. Buat sebuah database dengan nama latihan dan buat tabel dengan nama barang
   

   CREATE TABLE barang (
   kd_barang VARCHAR(5) PRIMARY KEY,
   nama VARCHAR(100),
   stok INT(4)
   );

   
   
2. Buat tabel dengan nama penjualan
   

   CREATE TABLE penjualan (
   kd_transaksi INT(11) PRIMARY KEY AUTO_INCREMENT,
   tanggal DATETIME,
   kd_barang VARCHAR(5),
   jumlah INT(11)
   );
   

   
   
3. Membuat trigger yang akan mengurangi stok pada tabel barang ketika terjadi insert pada tabel penjualan
   
   

   DELIMITER |
   CREATE TRIGGER kurangi_stok AFTER INSERT
   ON penjualan FOR EACH ROW
   BEGIN
    UPDATE barang SET stok=stok-NEW.jumlah WHERE kd_barang=NEW.kd_barang;
   END;
   |
   DELIMITER;
   

   
   
4. Untuk mengetest apakah trigger yang kita buat berjalan atau tidak pertama pata kita Insert data pada tabel barang
   
   

   INSERT INTO barang VALUES 
   ('BRG01','Kecap',5),('BRG02','Sampo',6),
   ('BRG03','Sambal',10),
   ('BRG04','Mentega',15);

   
   
   
   
   
5. Insert data pada tabel penjualan
   
   

   INSERT INTO penjualan
   (tanggal,kd_barang,jumlah) 
   VALUES 
   (SYSDATE(),'BRG01',2),
   (SYSDATE(),'BRG03',4),
   (SYSDATE(),'BRG04',7)

   
   
   
   
   
6. Kita lihat lagi pada pada tabel barang, perhatikan pada column stok bahwa stok sudah berkurang secara otomatis ketika terjadi insert pada tabel penualan
   
   
   

Sekian pembahasan tentang Cara Membuat Trigger di MySQL
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Menggunakan Backgroundworker di C# dan VB.NET

Assalamualaikum agan semua, jika sebelumnya saya memposting tentang Menggunakan Application Configuration File (App.Config). Pada malam hari ini saya akan memposting tentang Menggunakan Backgroundworker di C# dan VB.NET.

Apa itu Backgroundworker ?
Backgroundworker adalah component yang dapat menjalankan atau mengeksekusi kode pada background atau secondray thread, atau bisa dibilang dengan backgroundworker kita bisa menjalan atau mengeksekusi kode tanpa mengganggu proses pada program utama,

Pernahkah anda membuat aplikasi dimana pada aplikasi tersebut terdapat proses yang memakan waktu yang cukup lama? jika proses tersebut terlalu lama seringkali form tersebut berada pada keadaan 'Not Responding'. 
Mungkin bagi kita sebagai orang yang membuat aplikasi tersebut kita mengerti bahwa aplikasi sedang menyelesaikan proses yang cukup lama sehingga menyebabkan Not Responding, 
namun tidak bagi orang penggna yang mungkin beranggapan bahwa aplikasi yang kita buat itu mengalami crash atau error. Dengan backgroundworker ini lah kita dapat menjadikan penanganan proses yang rumit dan membutuhkan waktu yang lama terpisah dengan UI.

Baiklah langsung saja Langkah - langkah Menggunakan Backgroundworker di C# dan VB.NET

1. Buat project pada visual studio (disini saya menggunakan visual studio 2013)

2. Tambahkan 2 Button, 2 Label, 1 Progressbar dan 1 Backgroundworker

3. Lalu desain form seperti gambar dibawah ini

4. Pada event Form_Load tambahkan script dibawah ini
C#

' setting property backgroundworker
        backgroundWorker1.WorkerSupportsCancellation = True 'agar backgroundworker bisa di cancel
        backgroundWorker1.WorkerReportsProgress = True 'agar backgroundworker dapat memperbarui report progress

VB.NET

// setting property backgroundworker
            backgroundWorker1.WorkerSupportsCancellation = true; // agar backgroundworker bisa di cancel
            backgroundWorker1.WorkerReportsProgress = true; // agar backgroundworker dapat memperbarui report progress

5. Pada Event button_start_Click tambahkan script dibawah ini
C#

// jika backgroundworker tidak sedang berjalan/busy
            if (!backgroundWorker1.IsBusy)
            {
                // menjalankan backgroundworker
                backgroundWorker1.RunWorkerAsync();
            }

VB.NET

' jika backgroundworker tidak sedang berjalan/busy
        If (backgroundWorker1.IsBusy = False) Then
            ' menjalankan backgroundworker
            backgroundWorker1.RunWorkerAsync()
        End If

6. Pada Event button_cancel_Click tambahkan script dibawah ini
C#

// jika backgroundworker sedang berjalan
            if (backgroundWorker1.IsBusy)
            {
                // membatalkan proses backgroundworker
                backgroundWorker1.CancelAsync();
            }

VB.NET

'jika backgroundworker sedang berjalan
        If (backgroundWorker1.IsBusy) Then
            'membatalkan proses backgroundworker
            backgroundWorker1.CancelAsync()
        End If

7. Pada Event Backgroundworker1_DoWork tambahkan script dibawah ini
C#

// perulangan untuk mengisi value pada progressbar
            for (int i = 0; i <= 100;i++)
            {

                string status = "";
                if (i >= 1 && i < 30)
                {
                    status = "Inisialisasi";
                }
                else if (i >= 30 && i < 70)
                {
                    status = "Pengecekan file configurasi";
                }
                else if (i >= 70 && i < 100)
                {
                    status = "Pengecekan Database";
                }
                else if (i == 100)
                {
                    status = "Selesai";
                }

                // memperbarui reportprogress
                backgroundWorker1.ReportProgress(i, status);

                System.Threading.Thread.Sleep(100);

                // jika backgroundWorker1 di batalkan
                if (backgroundWorker1.CancellationPending)
                {
                    e.Cancel = true;
                    return;
                }
            }

VB.NET

 ' perulangan untuk mengisi value pada progressbar
        For i As Integer = 0 To 100

            Dim status As String = ""
            If (i >= 1 And i < 30) Then
                status = "Inisialisasi"
            ElseIf (i >= 30 And i < 70) Then
                status = "Pengecekan file configurasi"

            ElseIf (i >= 70 And i < 100) Then
                status = "Pengecekan Database"
            ElseIf (i = 100) Then
                status = "Selesai"
            End If

            ' memperbarui reportprogress
            backgroundWorker1.ReportProgress(i, status)

            System.Threading.Thread.Sleep(100)

            ' jika backgroundWorker1 di batalkan
            If (backgroundWorker1.CancellationPending) Then
                e.Cancel = True
                Exit Sub
            End If
        Next

8. Pada Event Backgroundworker1_Progresschanged tambahkan script dibawah ini
C#

        progressBar1.Value = Convert.ToDouble(e.ProgressPercentage) 'memperbarui value pada progressbar
        label1.Text = e.ProgressPercentage.ToString() & "%" ' memperbarui text pada label1
        label2.Text = DirectCast(e.UserState, String) ' memberparui text pada label2

VB.NET

        progressBar1.Value = Convert.ToDouble(e.ProgressPercentage) 'memperbarui value pada progressbar
        label1.Text = e.ProgressPercentage.ToString() & "%" ' memperbarui text pada label1
        label2.Text = DirectCast(e.UserState, String) ' memberparui text pada label2

9. Pada Event Backgroundworker1_RunworkerCompleted tambahkan script dibawah ini
C#

            if (e.Cancelled == true) // jika backgroundWorker1 dibatalkan
            {
                MessageBox.Show("Proses dibatalkan");
            }
            else if (e.Error != null) // jika terjadi error selama backgroundworker berjalan
            {
                MessageBox.Show(e.Error.Message);
            }
            else
            {
                MessageBox.Show("Proses selesai");
            }

VB.NET

If (e.Cancelled = True) Then 'jika backgroundWorker1 dibatalkan
            MessageBox.Show("Proses dibatalkan")
        ElseIf (e.Error IsNot Nothing) Then ' jika terjadi error selama backgroundworker berjalan
            MessageBox.Show(e.Error.Message)
        Else
            MessageBox.Show("Proses selesai")
        End If

10. Jalankan program yang telah kita buat dengan menekan F5, maka akan seperti gambar dibawah ini

Proses berjalan pada Thread yang berbeda dari UI Sehingga tidak menyebabkan terjadinya Not Responding dan Form menjadi Responsif

Membatalkan proses yang sedang berjalan pada backgroundworker

Kita bisa melihat perbedaan yang cukup terlihat ketika kita menggunakan backgroundworker atau tidak, jika kita menggunakan backgroundworker proses perulangan untuk menambahkan value pada progressbar berada pada Thread yang berbeda dari UI dengan begitu ketika proses tersebut memakan waktu yang cukup lama form tersebut akan tetap responsif dan tidak menyebabkan 'Not Responding' 

Anda dapat mendownload source codenya dibawah ini 

| VB.NET | C# |

Untuk password silahkan klik disini 

Sekian pembahasan tentang Menggunakan Backgroundworker di C# dan VB.NET
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi

Selamat siang agan semua, karena saya sudah jarang posting dikarenakan menyibukan diri :v, kali ini saya akan kembali memposting tutorial kembali.
Kali ini saya akan memposting tutorial tentang Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi. banyak cara yang bisa kita gunakan untuk menyimpan pengaturan aplikasi yang kita buat misal menggunakan file .ini yang pernah saya bahas sebelumnya pada artikel Read/Write File .ini Dengan VB.NET.

Tapi kali ini saya akan menggunakan Application Configuration FIle (app.config).

Langsung saja Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi

1. Buat sebuah project baru Visual Basic/Visual C# Windows Forms Application

2. Pada bagian solution explorer, jika tidak ada file app.config maka tambahkan app.config dengan cara klik kanan nama project->add->New Item

3. Cari Application Configuration File lalu klik Add

4. Klik 2 kali pada file app.config lalu tambahkan script ini setelah <configuration>

<appSettings>
    <add key="server" value="localhost"/>
    <add key="username" value="root"/>
    <add key="password" value=""/>
    <add key="database" value="belajar"/>
  </appSettings>
    

5. Tambahkan 4 Label, 4 Textbox dan 2 Button lalu desain form seperti gambar dibawah ini

6. Tambahkan references System.Configuration.dll dengan cara klik menu project->add references pilih Assemlby lalu Checklist System.Configuration setelah itu klik add

7. Klik 2 kali pada form tersebut tambahkan namespace System.Configuration 
C#

using System.Configuration;

VB.NET

Imports System.Configuration

7. Pada event click tombol Baca tambahkan script dibawah ini
C#

var appSettings = ConfigurationManager.AppSettings;
            txt_server.Text = appSettings["server"];
            txt_username.Text = appSettings["username"];
            txt_password.Text = appSettings["password"];
            txt_database.Text = appSettings["database"];

VB.NET

Dim appSettings = ConfigurationManager.AppSettings
        txt_server.Text = appSettings("server")
        txt_username.Text = appSettings("username")
        txt_password.Text = appSettings("password")
        txt_database.Text = appSettings("database")

8. Pada event click tombol Simpan tambahkan script dibawah ini
C#

            var appSettings = ConfigurationManager.AppSettings;
            txt_server.Text = appSettings["server"];
            txt_username.Text = appSettings["username"];
            txt_password.Text = appSettings["password"];
            txt_database.Text = appSettings["database"];

VB.NET

        Dim configFile = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None)
        Dim settings = configFile.AppSettings.Settings

        settings("server").Value = txt_server.Text
        settings("username").Value = txt_username.Text
        settings("password").Value = txt_password.Text
        settings("database").Value = txt_database.Text

        configFile.Save(ConfigurationSaveMode.Modified)
        ConfigurationManager.RefreshSection(configFile.AppSettings.SectionInformation.Name)

9. Jalankan program tersebut dengan menekan tombol F5 maka akan seperti gambar dibawah ini

Ketika Tombol Baca di klik

Tekan tombol simpan untuk penyimpan pengaturan yang baru

Anda dapat mendownload source codenya dibawah ini

| VB.NET | C# |

Untuk password silahkan klik disini

Sekian pembahasan tentang Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET

Assalamualaykum, para pembaca blog ini, karena sudah lumayan lama saya tidak memposting sebuah tutorial,saya akan melanjutkan postingan saya sebelumnya yang berjudul Membuat Fungsi Terbilang dengan C# dan VB.NET kali ini saya akan posting tentang Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,

Apa itu Bilangan Romawi ?
Bilangan romawi adalah bilangan unik yang memiliki aturan-aturan yang berlaku yang terdiri dari huruf Capital seperi I,X,C,M,V,L. Bilangan romawi memiliki bilangan dasar dan maksimal perulangan ganda pada huruf-huruf dalam suatu angka yaitu 3 kali, misalnya XXX = 30 atau III = 3.

oke langsung saja Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,

1. Buat sebuah project Windows Form dengan visual studio anda

2. Tambahkan 4 Textbox 2 button dan 4 label lalu desain form seperti gambar dibawah ini

3. Tambahkan namespace System.Collections.Generic

4. Buat fungsi dengan nama RomanToInteger (fungsi ini digunakan untuk merubah romawi ke angka)
C#

public int RomanToInteger(string StrRomanValue)
        {
            Dictionary<string,int> RomanNumbers = new Dictionary<string,int>();
            RomanNumbers.Add("M", 1000);
            RomanNumbers.Add("CM", 900);
            RomanNumbers.Add("D", 500);
            RomanNumbers.Add("CD", 400);
            RomanNumbers.Add("C", 100);
            RomanNumbers.Add("XC", 90);
            RomanNumbers.Add("L", 50);
            RomanNumbers.Add("XL", 40);
            RomanNumbers.Add("X", 10);
            RomanNumbers.Add("IX", 9);
            RomanNumbers.Add("V", 5);
            RomanNumbers.Add("IV", 4);
            RomanNumbers.Add("I", 1);

            int result = 0;

            foreach (var pair in RomanNumbers)
            {
                while (StrRomanValue.IndexOf(pair.Key.ToString()) == 0)
                {
                    result += int.Parse(pair.Value.ToString());
                    StrRomanValue = StrRomanValue.Substring(pair.Key.ToString().Length);
                }
            }

            return result;
        }

VB.NET

Private Function RomanToInteger(ByVal StrRomanValue As String) As Integer
        Dim RomanNumbers As New Dictionary(Of String, Integer)()
        RomanNumbers.Add("M", 1000)
        RomanNumbers.Add("CM", 900)
        RomanNumbers.Add("D", 500)
        RomanNumbers.Add("CD", 400)
        RomanNumbers.Add("C", 100)
        RomanNumbers.Add("XC", 90)
        RomanNumbers.Add("L", 50)
        RomanNumbers.Add("XL", 40)
        RomanNumbers.Add("X", 10)
        RomanNumbers.Add("IX", 9)
        RomanNumbers.Add("V", 5)
        RomanNumbers.Add("IV", 4)
        RomanNumbers.Add("I", 1)

        Dim result As Integer = 0

        For Each pair As KeyValuePair(Of String, Integer) In RomanNumbers
            While StrRomanValue.IndexOf(pair.Key.ToString()) = 0
                result += Integer.Parse(pair.Value.ToString())
                StrRomanValue = StrRomanValue.Substring(pair.Key.ToString().Length)
            End While
        Next

        Return result

    End Function

5. Buat fungsi dengan nama IntegerToRoman (fungsi ini untuk mengubah romawi ke angka)
C#

        public string IntegerToRoman(int IntNumberValue)
        {
            Dictionary<string, int> RomanNumbers = new Dictionary<string, int>();
            RomanNumbers.Add("M", 1000);
            RomanNumbers.Add("CM", 900);
            RomanNumbers.Add("D", 500);
            RomanNumbers.Add("CD", 400);
            RomanNumbers.Add("C", 100);
            RomanNumbers.Add("XC", 90);
            RomanNumbers.Add("L", 50);
            RomanNumbers.Add("XL", 40);
            RomanNumbers.Add("X", 10);
            RomanNumbers.Add("IX", 9);
            RomanNumbers.Add("V", 5);
            RomanNumbers.Add("IV", 4);
            RomanNumbers.Add("I", 1);

            string result = "";

            foreach (var pair in RomanNumbers)
            {
                while (IntNumberValue >= pair.Value)
                {
                    IntNumberValue -= pair.Value;
                    result += pair.Key;
                }
            }
            return result;
        }

VB.NET

    Public Function IntegerToRoman(IntNumberValue As Integer) As String
        Dim RomanNumbers As New Dictionary(Of String, Integer)()
        RomanNumbers.Add("M", 1000)
        RomanNumbers.Add("CM", 900)
        RomanNumbers.Add("D", 500)
        RomanNumbers.Add("CD", 400)
        RomanNumbers.Add("C", 100)
        RomanNumbers.Add("XC", 90)
        RomanNumbers.Add("L", 50)
        RomanNumbers.Add("XL", 40)
        RomanNumbers.Add("X", 10)
        RomanNumbers.Add("IX", 9)
        RomanNumbers.Add("V", 5)
        RomanNumbers.Add("IV", 4)
        RomanNumbers.Add("I", 1)

        Dim result As String = ""

        For Each pair As KeyValuePair(Of String, Integer) In RomanNumbers
            While IntNumberValue >= pair.Value
                IntNumberValue -= pair.Value
                result += pair.Key
            End While
        Next
        Return result
    End Function

6. Jalankan program tersebut maka akan seperti gambar dibawah ini

Mengubah Romawikke Angka

Mengubah Angka ke Romawi

Anda dapat mendownload source codenya dibawah ini

| VB.NET | C# |

Untuk password silahkan klik disini

Sekian pembahasan tentang Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Membuat Fungsi Terbilang dengan C# dan VB.NET

Assalamu'alaikum agan semua, karena sudah lama sekali tidak memposting pada pagi hari ini saya kembali lagi memposting tutorial - tutorial yang mungkin bermanfaat untuk agan semua,
oke kali ini saya akan memposting tentang Membuat Fungsi Terbilang dengan C# dan VB.NET

Apa itu fungsi terbilang ?
fungsi terbilang adalah fungsi yang digunakan untuk mengubah angka menjadi kalimat dalam bahasa indonesia

Langkah - langkah Membuat Fungsi Terbilang dengan C# dan VB.NET

1. Buat sebuah project baru di visual studio anda, dengan nama fungsi_terbilang

2. Tambahkan 2 buah textbox dan 1 button lalu atur lokasi object seperti dibawah ini

3. buat sebuah fungsi dengan nama fungsi terbilang lalu isikan code dibawah ini
C#

private string terbilang(int angka)
{
   string strterbilang = "";
   // membuat array untuk mengubah 1 - 11 menjadi terbilang
   string[] a = { "", "satu", "dua","tiga","empat","lima","enam","tujuh","delapan","sembilan","sepuluh","sebelas" };

    if (angka < 12)
    {
        strterbilang = " " + a[angka];
    }
    else if (angka < 20)
    {
        strterbilang = this.terbilang(angka - 10) + " belas";
    }
    else if (angka < 100)
    {
         strterbilang = this.terbilang(angka / 10) + " puluh" + this.terbilang(angka % 10);
    }
    else if (angka < 200)
    {
         strterbilang = " seratus" + this.terbilang(angka - 100);
    }
    else if (angka < 1000)
    {
         strterbilang = this.terbilang(angka / 100) + " ratus" + this.terbilang(angka % 10);
    }
    else if (angka < 2000)
    {
        strterbilang = " seribu" + this.terbilang(angka - 1000);
    }
    else if (angka < 1000000)
    {
         strterbilang = this.terbilang(angka / 1000) + " ribu" + this.terbilang(angka % 1000);
    }
    else if (angka < 1000000000)
    {
         strterbilang = this.terbilang(angka / 1000000) + " juta" + this.terbilang(angka % 1000000);
    }

   // menghilangkan multiple space
   strterbilang = System.Text.RegularExpressions.Regex.Replace(strterbilang, @"^\s+|\s+$", " ");
   // mengembalikan hasil terbilang
   return strterbilang;

}

VB.NET

Private Function terbilang(ByVal angka As Integer) As String
        Dim strterbilang As String = ""
        ' membuat array untuk mengubah 1 - 11 menjadi terbilang
        Dim a As String() = {"", "satu", "dua", "tiga", "empat", "lima", "enam", "tujuh", "delapan", "sembilan", "sepuluh", "sebelas"}

        If (angka < 12) Then
            strterbilang = " " + a(angka)
        ElseIf (angka < 20) Then
            strterbilang = Me.terbilang(angka - 10) + " belas"
        ElseIf (angka < 100) Then
            strterbilang = Me.terbilang(angka / 10) + " puluh" + Me.terbilang(angka Mod 10)
        ElseIf (angka < 200) Then
            strterbilang = " seratus" + Me.terbilang(angka - 100)
        ElseIf (angka < 1000) Then
            strterbilang = Me.terbilang(angka / 100) + " ratus" + Me.terbilang(angka Mod 100)
        ElseIf (angka < 2000) Then
            strterbilang = " seribu" + Me.terbilang(angka - 1000)
        ElseIf (angka < 1000000) Then
            strterbilang = Me.terbilang(angka / 1000) + " ribu" + Me.terbilang(angka Mod 1000)
        ElseIf (angka < 1000000000) Then
            strterbilang = Me.terbilang(angka / 1000000) + " juta" + Me.terbilang(angka Mod 1000000)
        End If

        ' menghilangkan multiple space
        strterbilang = System.Text.RegularExpressions.Regex.Replace(strterbilang, "^\s+|\s+$", " ")
        ' mengembalikan hasil terbilang
        Return strterbilang
End Function

4. Klik 2 kali pada button1 lalu tambahkan script dibawah ini
C#

// menampilkan hasil dari fungis terbilang ke textbox 2 berdasarkan angka dari textbox 1
            textBox2.Text = this.terbilang(Convert.ToInt32(textBox1.Text)).TrimStart();

VB.NET

        ' menampilkan hasil dari fungis terbilang ke textbox 2 berdasarkan angka dari textbox 1
        textBox2.Text = LTrim(Me.terbilang(Convert.ToInt32(textBox1.Text)))

5. Jalankan project yang kita buat dengan menekan tombol F5 maka akan seperti gambar dibawah ini

Anda dapat mendownload source codenya dibawah ini

| VB.NET | C# |

Untuk password silahkan klik disini

Sekian pembahasan tentang Membuat Fungsi Terbilang dengan C# dan VB.NET
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Navigasi Halaman dengan Efek Transisi di Windows Phone

Assalamualakum agan semua,,
karna sudah lumayan lama saya tidak memposting, oleh karena itu kali ini saya ingin kembali memposting tentang Navigasi Halaman dengan Efek Transisi di Windows Phone,

Mungkin sebelumnya saya juga pernah memposting tentang Membuat Navigasi Halaman di Windows Phone, tapi pada postingan kali ini akan sedikit berbeda, karena pada postingan kali ini tidak hanya membuat navigasi halaman saja, tapi juga memberikan efek ketika berpindah halaman agar aplikasi kita terlihat lebih menarik :D. Oke langsung saja

Langkah - langkah Navigasi Halaman dengan Efek Transisi di Windows Phone

1. Buat sebuah projek Windows Phone Apps - Blank App

2.  Seperti pada tutorial sebelumnya kita perlu menambahkan Windows Phone Toolkit pada references project kita dengan cara Klik kanan pada References -> Manage NuGet Packages -> Cari Windows Phone Toolkit -> Klik Install

3. Pada file mainpage.xaml tambahkan 1 button dengan script dibawah ini

<!--ContentPanel - place additional content here-->
        <Grid x:Name="ContentPanel" Grid.Row="1" Margin="12,0,12,0">
            <Button Content="Ke Halaman 1" HorizontalAlignment="Left" VerticalAlignment="Top" Margin="0,130,0,0" Width="456" Click="Button_Click"/>

        </Grid>

4. Pada bagian Inisialisasi di mainpage.xaml.cs tambahkan script dibawah ini

            // anda bisa mengganti SlideTransitionMode sesuai dengan keinginan
            NavigationInTransition navigateInTransition = new NavigationInTransition();
            navigateInTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeIn };
            navigateInTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeIn };

            NavigationOutTransition navigateOutTransition = new NavigationOutTransition();
            navigateOutTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeOut };
            navigateOutTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeOut };
            TransitionService.SetNavigationInTransition(this, navigateInTransition);
            TransitionService.SetNavigationOutTransition(this, navigateOutTransition);
Sehingga menjadi

public MainPage()
        {
            InitializeComponent();

            // anda bisa mengganti SlideTransitionMode sesuai dengan keinginan
            NavigationInTransition navigateInTransition = new NavigationInTransition();
            navigateInTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideRightFadeIn };
            navigateInTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideLeftFadeIn };

            NavigationOutTransition navigateOutTransition = new NavigationOutTransition();
            navigateOutTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideRightFadeOut };
            navigateOutTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideRightFadeOut };
            TransitionService.SetNavigationInTransition(this, navigateInTransition);
            TransitionService.SetNavigationOutTransition(this, navigateOutTransition);
        }

5. Pada event button_Click tambahkan script dibawah ini untuk berpindah ke halaman Page1.xaml

NavigationService.Navigate(new Uri("/Page1.xaml", UriKind.Relative));

6. Buat sebuah halaman baru dengan nama Page1.xaml dengan cara Click kanan pada nama Project - Add - New Item - Windows Phone Portrait Page - beri nama Page1.xaml - OK

7. Tambahkan sebuah button pada file Page1.xaml dengan script dibawah ini

<!--ContentPanel - place additional content here-->
        <Grid x:Name="ContentPanel" Grid.Row="1" Margin="12,0,12,0">
            <Button Content="Ke Halaman 1" HorizontalAlignment="Left" VerticalAlignment="Top" Margin="0,130,0,0" Width="456" Click="Button_Click"/>

        </Grid>

8. Pada bagian Inisialisasi di Page1.xaml.cs tambahkan script dibawah ini

// anda bisa mengganti SlideTransitionMode sesuai dengan keinginan
            NavigationInTransition navigateInTransition = new NavigationInTransition();
            navigateInTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeIn };
            navigateInTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeIn };

            NavigationOutTransition navigateOutTransition = new NavigationOutTransition();
            navigateOutTransition.Backward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeOut }; 
            navigateOutTransition.Forward = new SlideTransition { Mode = SlideTransitionMode.SlideDownFadeOut };
            TransitionService.SetNavigationInTransition(this, navigateInTransition);
            TransitionService.SetNavigationOutTransition(this, navigateOutTransition);

9. Pada event button_Click tambahkan script dibawah ini untuk berpindah ke halaman MainPage.xaml

NavigationService.Navigate(new Uri("/MainPage.xaml", UriKind.Relative));

10. Buka file App.xaml.cs ganti RootFrame = new PhoneApplicationFrame() menjadi RootFrame = new TransitionFrame();

11. Jalankan program tersebut dengan menekan F5 maka akan seperti gambar dibawah ini

Anda bisa mendownload source codenya disini

dan untuk passwordnya disini

Sekian pembahasan tetang Navigasi Halaman dengan Efek Transisi di Windows Phone
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More

Membuat Context Menu di Wndows Phone

Assalamualakum semuanya,,
pada malam hari ini, untuk mengisi waktu luang saya ingin memposting tentang Membuat Context Menu di Wndows Phone.
Apa itu Context Menu ?
Context Menu adalah menu-menu yang akan muncul ketika kita menekan sebuah tombol atau item pada sebuah list

Langkah - langkah Membuat Context Menu di Wndows Phone.

1. Buat sebuah Windows Phone Project Baru

2.  Seperti pada tutorial sebelumnya kita perlu menambahkan Windows Phone Toolkit pada references project kita dengan cara Klik kanan pada References -> Manage NuGet Packages -> Cari Windows Phone Toolkit -> Klik Install

3. Tambahkan script dibawah ini pada bagian atas file mainpage.xaml

xmlns:toolkit="clr-namespace:Microsoft.Phone.Controls;assembly=Microsoft.Phone.Controls.Toolkit"

4. Tambahkan 1 buat button dan juga ContextMenuService dengan script dibawah ini

<!--LayoutRoot is the root grid where all page content is placed-->
    <Grid x:Name="LayoutRoot" Background="Transparent">
        <Grid.RowDefinitions>
            <RowDefinition Height="Auto"/>
            <RowDefinition Height="*"/>
        </Grid.RowDefinitions>

        <!--TitlePanel contains the name of the application and page title-->
        <StackPanel x:Name="TitlePanel" Grid.Row="0" Margin="12,17,0,28">
            <TextBlock Text="Tutorial Koding" Style="{StaticResource PhoneTextNormalStyle}" Margin="12,0"/>
            <TextBlock Text="Context Menu" Margin="9,-7,0,0" Style="{StaticResource PhoneTextTitle1Style}"/>
        </StackPanel>

        <!--ContentPanel - place additional content here-->
        <Grid x:Name="ContentPanel" Grid.Row="1" Margin="12,0,12,0">
            <Button x:Name="btn" Content="Tampilkan Context Menu" Grid.Row="0" Click="btn_Click" Margin="59,254,42,268">
                <toolkit:ContextMenuService.ContextMenu>
                    <toolkit:ContextMenu x:Name="MyContextMenu">
                        <toolkit:MenuItem x:Name="menu_tambah" Header="Tambah" Click="menu_tambah_Click" />
                        <toolkit:MenuItem x:Name="menu_hapus" Header="Hapus" Click="menu_hapus_Click" />
                    </toolkit:ContextMenu>
                </toolkit:ContextMenuService.ContextMenu>
            </Button>
        </Grid>

    </Grid>

5. Tambahkan script dibawah ini pada file mainpage.xaml.cs untuk menghandle event ketika tombol tampilkan di klik dan menu-menu lainnya di klik

private void menu_tambah_Click(object sender, RoutedEventArgs e)
        {
// memunculkan pesan ketika context menu tambah ditekan
            MessageBox.Show("Menu Tambah di Tekan");
        }

        private void menu_hapus_Click(object sender, RoutedEventArgs e)
        {
// memunculkan pesan ketika context menu hapus ditekan
            MessageBox.Show("Menu Hapus ditekan");
        }

        private void btn_Click(object sender, RoutedEventArgs e)
        {
// menampilkan context menu
            MyContextMenu.IsOpen = true;
        }

6. Jalankan program tersebut dengan menekan F5 maka akan seperti gambar dibawah ini

Anda bisa mendownload source codenya disini

dan untuk passwordnya disini

Sekian pembahasan tentang Membuat Context Menu di Wndows Phone.

Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Read More