Tutorial Koding: Tutorial C#

Showing posts with label Tutorial C#. Show all posts

Menggunakan Transactions di ADO.NET dengan C# dan VB.NET

Assalamualaikum agan semua, maaf karena sudah lumayan lama tidak posting :D, dikarenakan menyibukan diri :D, pada malam hari ini saya ingin memposting tutorial tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/08/menggunakan-transactions-di-adonet.html">Menggunakan Transactions di ADO.NET dengan C# dan VB.NET,</a><br />
<br />
Biasanya ketika kita sedang membuat program dengan database ada situasi dimana ketika kita ingin membutuhkan lebih dari 1 perintah SQL, dimana ketika salah satu perintah SQL gagal di eksekusi maka tidak ada perintah SQL yang lainnya yang akan mengubah data pada database;<br />
<br />
Sebagai contoh ketika ingin menyimpan data pada tabel <b>transaksi </b>dan <b>detailtransaksi</b> dengan perintah sebagai berikut<br />
1. Insert data ke tabel transaksi<br />
Insert transaksi (id_transaksi,tanggal) values ('TR01','2015-08-08 20:00:00')<br />
2. Insert 2 data ke tabel detailtransaksi<br />
Insert detailtransaksi (id_detail,id_transaksi,nama_barang,jumlah) values ('DT01','TR01','Kecap','5')<br />
Insert detailtransaksi (id_detail,id_transaksi,nama_barang,jumlah) values ('DT02','TR01','Sambal','3')<br />
<br />
Jika eksekusi perintah intin insert data ke tabel transaksi berhasil, dan insert 2 data ke table detailtransaksi gagal maka perintah insert data ke tabel transaksipun akan dibatalkan dan data tidak akan tersimpan ke database.<br />
<br />
Baiklah sekarang kita akan <a href="http://dwirandyherdinanto.blogspot.com/2015/08/menggunakan-transactions-di-adonet.html">Menggunakan Transactions di ADO.NET dengan C# dan VB.NET,</a><br />
<br />
1. Buka visual studio (disini saya menggunakan visual studio community 2013) lalu buat project console applcation baru dengan nama <b>transactionadonet</b><br />
<br />
2. Tambahkan namespace System.Data.SQLClient<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiX5R8rQp5Axfn6qh8CbBhdv-WLB2U2ZQHNePS5b0vulRmkC66-qs77CQQMRSHQf9Bt-nLCwgs7rEYoFaE78oilrE_cFrSYOLgP_e3TpkxPDRe6G8QSLyz95beAC435re6y2xz_N4U94rdU/s1600/Screenshot_1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" border="0" height="59" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiX5R8rQp5Axfn6qh8CbBhdv-WLB2U2ZQHNePS5b0vulRmkC66-qs77CQQMRSHQf9Bt-nLCwgs7rEYoFaE78oilrE_cFrSYOLgP_e3TpkxPDRe6G8QSLyz95beAC435re6y2xz_N4U94rdU/s320/Screenshot_1.png" title="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" width="320" /></a></div>
<br />
3. Pada void main ketikan script dibawah ini<br />
C#<br />
<pre class="brush:html">using (var conn = new SqlConnection("Data Source=(local);Initial Catalog=belajar;Persist Security Info=True;User ID=sa; Password=root"))
            {
                // membuka koneksi ke database
                conn.Open();

using (SqlTransaction transcation = conn.BeginTransaction())
                {
                    try
                    {
                        // menyimpan data ke dalam tabel transaksi
                        using (var cmd = new SqlCommand("Insert transaksi (id_transaksi,tanggal) values ('TR01','2015-08-08 20:00:00')", conn))
                        {
                            cmd.Transaction = transcation;
                            cmd.ExecuteNonQuery();
                            Console.WriteLine("Perintah SQL 1 Berhasil Eksekusi");
                        }

// menyimpan data ke dalam tabel detailtransaksi
                        using (var cmd = new SqlCommand("Insert detailtransaksi (id_detail,id_transaksi,nama_barang,jumlah) values ('DT01','TR01','Kecap','5')", conn))
                        {
                            cmd.Transaction = transcation;
                            cmd.ExecuteNonQuery();
                            Console.WriteLine("Perintah SQL 2 Berhasil Eksekusi");
                        }

// menyimpan data ke dalam tabel detailtransaksi
                        using (var cmd = new SqlCommand("Insert detailtransaksi (id_detail,id_transaksi,nama_barang,jumlah) values ('DT02','TR01','Sambal','3')", conn))
                        {
                            cmd.Transaction = transcation;
                            cmd.ExecuteNonQuery();
                            Console.WriteLine("Perintah SQL 3 Berhasil Eksekusi");
                        }

transcation.Commit();
                        Console.WriteLine("Commit");
                    }
                    catch (SqlException ex)
                    {
                        transcation.Rollback();
                        Console.WriteLine("Rollback");
                    }
                }
            }

Console.ReadLine();</pre>
VB.NET<br />
<pre class="brush:html">Using conn As SqlConnection = New SqlConnection("Data Source=(local);Initial Catalog=belajar;Persist Security Info=True;User ID=sa; Password=root")

' membuka koneksi ke database
            conn.Open()

Using transcation As SqlTransaction = conn.BeginTransaction()

Try
                    ' menyimpan data ke dalam tabel transaksi
                    Using cmd As SqlCommand = New SqlCommand("Insert transaksi (id_transaksi,tanggal) values ('TR01','2015-08-08 20:00:00')", conn)

cmd.Transaction = transcation
                        cmd.ExecuteNonQuery()
                        Console.WriteLine("Perintah SQL 1 Berhasil Eksekusi")
                    End Using

' menyimpan data ke dalam tabel detailtransaksi
                    Using cmd As SqlCommand = New SqlCommand("Insert detailtransaksi (id_detail,id_transaksi,nama_barang,jumlah) values ('DT01','TR01','Kecap','5')", conn)

cmd.Transaction = transcation
                        cmd.ExecuteNonQuery()
                        Console.WriteLine("Perintah SQL 2 Berhasil Eksekusi")
                    End Using

cmd.Transaction = transcation
                        cmd.ExecuteNonQuery()
                        Console.WriteLine("Perintah SQL 3 Berhasil Eksekusi")
                    End Using

transcation.Commit()
                    Console.WriteLine("Commit")

Catch ex As Exception

transcation.Rollback()
                    Console.WriteLine("Rollback")
                End Try
            End Using
        End Using

Console.ReadLine()</pre>
<br />
4. Jalankan program tersebut maka akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiCMZ3SPrWdlZk1XbOwWJF5A46mJEE_PhpvCqNgyHn6S0jSWn0Iu_M-UPxk-PlVSCpQTtLmfxuy_lsAdnlyUQKw-XE9rdafYg9kPqrW0-GETAD8XlDEO1tLBtOrhf4VopbwxnNcw4kIcHAd/s1600/Screenshot_2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" border="0" height="161" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiCMZ3SPrWdlZk1XbOwWJF5A46mJEE_PhpvCqNgyHn6S0jSWn0Iu_M-UPxk-PlVSCpQTtLmfxuy_lsAdnlyUQKw-XE9rdafYg9kPqrW0-GETAD8XlDEO1tLBtOrhf4VopbwxnNcw4kIcHAd/s320/Screenshot_2.png" title="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" width="320" /></a></div>
<br />
5. Cek data pada tabel transaksi dan detail transaksi<br />
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjaR2pC7OU09gHWC_7R7ZFC54-u3EW9S-xod5lxnV83WWUp2XzJxZZHNEJJQBMwvXBp2gNEMYckyMOfuFm49-hhTyFkydi88KnQvriS7wWHpb2hwVmFkEf-_5Zp27fzxZa2kpl3yIZ420K8/s1600/Screenshot_3.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" border="0" height="135" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjaR2pC7OU09gHWC_7R7ZFC54-u3EW9S-xod5lxnV83WWUp2XzJxZZHNEJJQBMwvXBp2gNEMYckyMOfuFm49-hhTyFkydi88KnQvriS7wWHpb2hwVmFkEf-_5Zp27fzxZa2kpl3yIZ420K8/s320/Screenshot_3.png" title="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Data brhasil ditambahkan ke tabel transaksi</td></tr>
</tbody></table>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj0ozX3vJirYTQhd45Gn69sPRxUq3ajUtfy4iK8kkUMeR0g61Isj3WRTBfh1pGA70bjLi8yewIiKLpbEzrTM_Qf41E4vqpcYHOsJhQJlAPMYryGO8Lp1YnqFLgUqrvI7uTjgU4WCWxI4eKS/s1600/Screenshot_4.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj0ozX3vJirYTQhd45Gn69sPRxUq3ajUtfy4iK8kkUMeR0g61Isj3WRTBfh1pGA70bjLi8yewIiKLpbEzrTM_Qf41E4vqpcYHOsJhQJlAPMYryGO8Lp1YnqFLgUqrvI7uTjgU4WCWxI4eKS/s1600/Screenshot_4.png" title="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Data berhasil ditambahkan ke tabel detailtransaksi</td></tr>
</tbody></table>
6. sekarang kita coba ubah perintah insert tabel transaksi menjadi<br />
<pre class="brush:html">Insert transaksi (id_transaksi,tanggal) values ('TR01','2015-08-08 20:00:00')</pre>
<br />
7. Jalankan program kembali dengan menekan F5<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj1WzgF744efXun-7Q1Oj_ZiHo2JCBzEvmo0EbC4TTJthxf4wS0I1liyCxUZrY59OBNZVVTSvl43mEjelbE8PWcMAOWUoBuMi75PX4g0PG5YsJgDrJPriPl_PGGtDbAEiFrKp7azI5PhPpt/s1600/Screenshot_5.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" border="0" height="162" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj1WzgF744efXun-7Q1Oj_ZiHo2JCBzEvmo0EbC4TTJthxf4wS0I1liyCxUZrY59OBNZVVTSvl43mEjelbE8PWcMAOWUoBuMi75PX4g0PG5YsJgDrJPriPl_PGGtDbAEiFrKp7azI5PhPpt/s320/Screenshot_5.png" title="Menggunakan Transactions di ADO.NET dengan C# dan VB.NET" width="320" /></a></div>
<blockquote class="tr_bq">
kita bisa lihat pada console tersebut hanya perintah SQL 1 saja yang berhasil di eksekusi sementara lainnya gagal, naum karena kita menggunakan sqltransaction maka perintah SQL 1 akan di rollback sehingga tidak ada data baru yang tersimpan ke tabel transaksi</blockquote>
Sekian pembahasan tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/08/menggunakan-transactions-di-adonet.html">Menggunakan Transactions di ADO.NET dengan C# dan VB.NET,</a><br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Menggunakan Transactions di ADO.NET dengan C# dan VB.NET

Assalamualaikum agan semua, maaf karena sudah lumayan lama tidak posting :D, dikarenakan menyibukan diri :D, pada malam hari ini saya ingin ...

Sunday, August 09, 2015

Menggunakan Backgroundworker di C# dan VB.NET

Assalamualaikum agan semua, jika sebelumnya saya memposting tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-application-configuration.html">Menggunakan Application Configuration File (App.Config)</a>. Pada malam hari ini saya akan memposting tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-backgroundworker-di-c-dan.html">Menggunakan Backgroundworker di C# dan VB.NET.</a><br />
<br />
Apa itu Backgroundworker ?<br />
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,<br />
<br />
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 '<b>Not Responding'. </b><br />
Mungkin bagi kita sebagai orang yang membuat aplikasi tersebut kita mengerti bahwa aplikasi sedang menyelesaikan proses yang cukup lama sehingga menyebabkan <b>Not Responding, </b><br />
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.<br />
<br />
Baiklah langsung saja Langkah - langkah <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-backgroundworker-di-c-dan.html">Menggunakan Backgroundworker di C# dan VB.NET</a><br />
<br />
1. Buat project pada visual studio (disini saya menggunakan visual studio 2013)<br />
<br />
2. Tambahkan 2 Button, 2 Label, 1 Progressbar dan 1 Backgroundworker<br />
<br />
3. Lalu desain form seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgihHcq1w-BKeWNvp1gfR5hVaQ686w-9_1Gp8GCeuv0wDReiBHvBYRaKNupcvdxNsEX8ZSoa8rupmzyULwKBz5I94ngvXnnrTA2X2i4g0QNHqLFpD5BxeyYUtAXIlYfm0J2vKdBatHE3SOf/s1600/Menggunakan+Backgroundworker+di+C+dan+VBNET.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="198" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgihHcq1w-BKeWNvp1gfR5hVaQ686w-9_1Gp8GCeuv0wDReiBHvBYRaKNupcvdxNsEX8ZSoa8rupmzyULwKBz5I94ngvXnnrTA2X2i4g0QNHqLFpD5BxeyYUtAXIlYfm0J2vKdBatHE3SOf/s320/Menggunakan+Backgroundworker+di+C+dan+VBNET.png" width="320" /></a></div>
<br />
4. Pada event Form_Load tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">' setting property backgroundworker
        backgroundWorker1.WorkerSupportsCancellation = True 'agar backgroundworker bisa di cancel
        backgroundWorker1.WorkerReportsProgress = True 'agar backgroundworker dapat memperbarui report progress
</pre>
VB.NET<br />
<pre class="brush:html">// setting property backgroundworker
            backgroundWorker1.WorkerSupportsCancellation = true; // agar backgroundworker bisa di cancel
            backgroundWorker1.WorkerReportsProgress = true; // agar backgroundworker dapat memperbarui report progress
</pre>
<br />
5. Pada Event button_start_Click tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">// jika backgroundworker tidak sedang berjalan/busy
            if (!backgroundWorker1.IsBusy)
            {
                // menjalankan backgroundworker
                backgroundWorker1.RunWorkerAsync();
            }
</pre>
VB.NET<br />
<pre class="brush:html">' jika backgroundworker tidak sedang berjalan/busy
        If (backgroundWorker1.IsBusy = False) Then
            ' menjalankan backgroundworker
            backgroundWorker1.RunWorkerAsync()
        End If
</pre>
<br />
6. Pada Event button_cancel_Click tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">// jika backgroundworker sedang berjalan
            if (backgroundWorker1.IsBusy)
            {
                // membatalkan proses backgroundworker
                backgroundWorker1.CancelAsync();
            }
</pre>
VB.NET<br />
<pre class="brush:html">'jika backgroundworker sedang berjalan
        If (backgroundWorker1.IsBusy) Then
            'membatalkan proses backgroundworker
            backgroundWorker1.CancelAsync()
        End If
</pre>
<br />
7. Pada Event Backgroundworker1_DoWork tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">// 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;
                }
            }</pre>
VB.NET<br />
<pre class="brush:html"> ' 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</pre>
<br />
8. Pada Event Backgroundworker1_Progresschanged tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">        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</pre>
VB.NET<br />
<pre class="brush:html">        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</pre>
<br />
9. Pada Event Backgroundworker1_RunworkerCompleted tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">            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");
            }</pre>
VB.NET<br />
<pre class="brush:html">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</pre>
<br />
10. Jalankan program yang telah kita buat dengan menekan F5, maka akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjFn_dM_lWX3BtTq_K10v5InkszUJczOecG_mciaIqov9XNs5HxvyrTN1xHmGOQH3m-NpRljYsW1jMHEHIzh5Rj2oaj-YBjt86VR6S77Mz-D_Lea-Zc-zHQcAAI8UdR_zaUEGMYlNudTOQ3/s1600/Menggunakan+Backgroundworker+di+C+dan+VBNET+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Backgroundworker di C# dan VB.NET" border="0" height="200" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjFn_dM_lWX3BtTq_K10v5InkszUJczOecG_mciaIqov9XNs5HxvyrTN1xHmGOQH3m-NpRljYsW1jMHEHIzh5Rj2oaj-YBjt86VR6S77Mz-D_Lea-Zc-zHQcAAI8UdR_zaUEGMYlNudTOQ3/s320/Menggunakan+Backgroundworker+di+C+dan+VBNET+2.png" title="Menggunakan Backgroundworker di C# dan VB.NET" width="320" /></a></div>
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhtQj8oUt8ZxHjrn-xvNjq_rumVVUHrKdv2_BF8AK-hhGpJ9UaWp9tip3ul7_dSy31PqHM-dPChYyanrc1EkHr2SJoAsTXY81uqxUw2ogzBoXfJy8MXiKE3odiYRyVdT2Qklr3BpKnw85ke/s1600/Menggunakan+Backgroundworker+di+C+dan+VBNET+3.png" imageanchor="1" style="margin-left: auto; margin-right: auto; text-align: center;"><img alt="Menggunakan Backgroundworker di C# dan VB.NET" border="0" height="200" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhtQj8oUt8ZxHjrn-xvNjq_rumVVUHrKdv2_BF8AK-hhGpJ9UaWp9tip3ul7_dSy31PqHM-dPChYyanrc1EkHr2SJoAsTXY81uqxUw2ogzBoXfJy8MXiKE3odiYRyVdT2Qklr3BpKnw85ke/s320/Menggunakan+Backgroundworker+di+C+dan+VBNET+3.png" title="Menggunakan Backgroundworker di C# dan VB.NET" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Proses berjalan pada Thread yang berbeda dari UI Sehingga tidak menyebabkan terjadinya Not Responding dan Form menjadi Responsif</td></tr>
</tbody></table>
<br />
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEnyQX7GFtQbcN8u-IaLd-jnJ0EnPSJO893xUCIjKAgqxQoxNb1gYcORSErjOhpOps-R0FQqXQKsArWNA9UX9NjV-kGt5z566vIrMenLxfVzqPs5aafyiZ4EJ8TQ2WrHprrJ8886VTNeRB/s1600/Menggunakan+Backgroundworker+di+C+dan+VBNET+4.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Menggunakan Backgroundworker di C# dan VB.NET" border="0" height="202" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEnyQX7GFtQbcN8u-IaLd-jnJ0EnPSJO893xUCIjKAgqxQoxNb1gYcORSErjOhpOps-R0FQqXQKsArWNA9UX9NjV-kGt5z566vIrMenLxfVzqPs5aafyiZ4EJ8TQ2WrHprrJ8886VTNeRB/s320/Menggunakan+Backgroundworker+di+C+dan+VBNET+4.png" title="Menggunakan Backgroundworker di C# dan VB.NET" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Membatalkan proses yang sedang berjalan pada backgroundworker</td></tr>
</tbody></table>
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 '<b>Not Responding' </b><br />
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini </div>
<div style="text-align: center;">
| <a href="http://www.tusfiles.net/lumgaijwm6a2">VB.NET</a> | <a href="http://www.tusfiles.net/7hjgh1kmgqj5">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://tny.cz/cca303d4">disini </a></div>
<br />
<br />
Sekian pembahasan tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-backgroundworker-di-c-dan.html">Menggunakan Backgroundworker di C# dan VB.NET</a><br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Menggunakan Backgroundworker di C# dan VB.NET

Assalamualaikum agan semua, jika sebelumnya saya memposting tentang Menggunakan Application Configuration File (App.Config) . Pada malam har...

Saturday, May 30, 2015

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.<br />
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 <a href="http://dwirandyherdinanto.blogspot.com.tr/2014/03/writeread-file-ini-dengan-vbnet.html">Read/Write File .ini Dengan VB.NET</a>.<br />
<br />
Tapi kali ini saya akan menggunakan Application Configuration FIle (app.config).<br />
<br />
Langsung saja <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-application-configuration.html">Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi</a><br />
<br />
1. Buat sebuah project baru Visual Basic/Visual C# Windows Forms Application<br />
<br />
2. Pada bagian solution explorer, jika tidak ada file app.config maka tambahkan app.config dengan cara klik kanan nama project->add->New Item<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhQ0OVx1u5GoWrCDJgtZsh8gq8Mslkg8ci19zgPPRvTVxR8F0X5ZBZFHFxhyhDS6FtoQtRgJVhWltExT5cUdoV38cTm7X1UszOh5pp0_WlpxBrTRZwZ7R38HmAKv7zK1xYGnCqS0Kuxg9Vd/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhQ0OVx1u5GoWrCDJgtZsh8gq8Mslkg8ci19zgPPRvTVxR8F0X5ZBZFHFxhyhDS6FtoQtRgJVhWltExT5cUdoV38cTm7X1UszOh5pp0_WlpxBrTRZwZ7R38HmAKv7zK1xYGnCqS0Kuxg9Vd/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+1.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" /></a></div>
<br />
3. Cari Application Configuration File lalu klik Add<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhxAeNzI0XXb3miLEEje5WkEh9SB5l5IKKwBjuhxjKJhxNdxrrAt9gG9-k5mvFYrMbXrSy2WS7EmBlNZfw0zOteOjILzfBADn7e1bsQH718oAmod-dx8H9_RUDu4pnPRLjKH83jW8OpDWXw/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="192" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhxAeNzI0XXb3miLEEje5WkEh9SB5l5IKKwBjuhxjKJhxNdxrrAt9gG9-k5mvFYrMbXrSy2WS7EmBlNZfw0zOteOjILzfBADn7e1bsQH718oAmod-dx8H9_RUDu4pnPRLjKH83jW8OpDWXw/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+2.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></div>
<br />
4. Klik 2 kali pada file app.config lalu tambahkan script ini setelah <configuration><br />
<br />
<pre class="brush:html"><appSettings>
    <add key="server" value="localhost"/>
    <add key="username" value="root"/>
    <add key="password" value=""/>
    <add key="database" value="belajar"/>
  </appSettings>
    
</pre>
5. Tambahkan 4 Label, 4 Textbox dan 2 Button lalu desain form seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgKnaAhTbwaymNwoGPAGp4VojdyRmz5kY4sw5jOjxfe4_sWeRSWGBFriJM81C9BcbI40LIE3VBKdE_AVGjx_1wr07DbMclvsc1Kn-CLLC-F_Rx7c1nwwKhBoYG-rl2IU1e2EP4VQyJ4xB7u/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+5+copy.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="266" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgKnaAhTbwaymNwoGPAGp4VojdyRmz5kY4sw5jOjxfe4_sWeRSWGBFriJM81C9BcbI40LIE3VBKdE_AVGjx_1wr07DbMclvsc1Kn-CLLC-F_Rx7c1nwwKhBoYG-rl2IU1e2EP4VQyJ4xB7u/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+5+copy.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></div>
<br />
<br />
6. Tambahkan references <b>System.Configuration.dll </b>dengan cara klik menu project->add references pilih Assemlby lalu Checklist <b>System.Configuration </b>setelah itu klik add<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj63aXjTf5hCR4cZ4lR9huhUsjAQKppCYzmv-YelxTMLt-3YVSGDQLtgErGt3E3juLirLsULaLhNKq1TJY4jxwZNYuogm2U21cJ-1AdqEfVQ6QQ7mh-sbmRCXJiYkxiHMUXqIUx1SbxcfdK/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+6.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="158" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj63aXjTf5hCR4cZ4lR9huhUsjAQKppCYzmv-YelxTMLt-3YVSGDQLtgErGt3E3juLirLsULaLhNKq1TJY4jxwZNYuogm2U21cJ-1AdqEfVQ6QQ7mh-sbmRCXJiYkxiHMUXqIUx1SbxcfdK/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+6.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></div>
<br />
<br />
7. Klik 2 kali pada form tersebut tambahkan namespace <b>System.Configuration </b><br />
C#<br />
<pre class="brush:html">using System.Configuration;</pre>
VB.NET<br />
<pre class="brush:html">Imports System.Configuration</pre>
<br />
7. Pada event click tombol Baca tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">var appSettings = ConfigurationManager.AppSettings;
            txt_server.Text = appSettings["server"];
            txt_username.Text = appSettings["username"];
            txt_password.Text = appSettings["password"];
            txt_database.Text = appSettings["database"];</pre>
VB.NET<br />
<pre class="brush:html">Dim appSettings = ConfigurationManager.AppSettings
        txt_server.Text = appSettings("server")
        txt_username.Text = appSettings("username")
        txt_password.Text = appSettings("password")
        txt_database.Text = appSettings("database")</pre>
<br />
8. Pada event click tombol Simpan tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">            var appSettings = ConfigurationManager.AppSettings;
            txt_server.Text = appSettings["server"];
            txt_username.Text = appSettings["username"];
            txt_password.Text = appSettings["password"];
            txt_database.Text = appSettings["database"];</pre>
VB.NET<br />
<pre class="brush:html">        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)</pre>
<br />
9. Jalankan program tersebut dengan menekan tombol F5 maka akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg61d9QPUphB8zAYrnEQYZgP2_KPkUS3xtFDAPEl9JrTsbCLedUPz9EPmnu1yfUypaqjmD9nyDacKVmlLlTJ4GzMs9uJ33JTFx8Vz-FhuoMAD8j77yVYEgJ4CjRv2ADuR26XuyYTa4IpgUF/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+7.png" imageanchor="1"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="262" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg61d9QPUphB8zAYrnEQYZgP2_KPkUS3xtFDAPEl9JrTsbCLedUPz9EPmnu1yfUypaqjmD9nyDacKVmlLlTJ4GzMs9uJ33JTFx8Vz-FhuoMAD8j77yVYEgJ4CjRv2ADuR26XuyYTa4IpgUF/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+7.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></div>
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjQri-IKOa3eyT-mbc9_F70K8Z53thb5SMJlHNV2SAIf1YWvvPjYRFFIL7yGcFD5JYMtRRyd7UqaV0Nbh7RA997c6lLwPtCB1WI0oHsjq200LJ5k9plSpybErzGqsoLNgzbH697-ms-kO9A/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+8.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="260" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjQri-IKOa3eyT-mbc9_F70K8Z53thb5SMJlHNV2SAIf1YWvvPjYRFFIL7yGcFD5JYMtRRyd7UqaV0Nbh7RA997c6lLwPtCB1WI0oHsjq200LJ5k9plSpybErzGqsoLNgzbH697-ms-kO9A/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+8.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Ketika Tombol Baca di klik</td></tr>
</tbody></table>
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgYtn4biqsbDMeWyY0ZJJfcYdeko2JMSpPgba6YJj69CavzyV6ZyhAPrIY0rpXwZvwDqH1yyGvGJiFGQttDqaGiluNauIP0cxVI0lYaSG4aRNiQb68tqtoBbrIwdkTtf3YtDwcPgQmyDDxM/s1600/Menggunakan+Application+Configuration+File+%2528App.config%2529+9.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" border="0" height="260" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgYtn4biqsbDMeWyY0ZJJfcYdeko2JMSpPgba6YJj69CavzyV6ZyhAPrIY0rpXwZvwDqH1yyGvGJiFGQttDqaGiluNauIP0cxVI0lYaSG4aRNiQb68tqtoBbrIwdkTtf3YtDwcPgQmyDDxM/s320/Menggunakan+Application+Configuration+File+%2528App.config%2529+9.png" title="Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Tekan tombol simpan untuk penyimpan pengaturan yang baru</td></tr>
</tbody></table>
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://www.tusfiles.net/bk0hdxs7lb79">VB.NET</a> | <a href="http://www.tusfiles.net/69fe7fae9bqx">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://tny.cz/cca303d4">disini</a></div>
<br />
<br />
Sekian pembahasan tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/05/menggunakan-application-configuration.html">Menggunakan Application Configuration File (app.config) Untuk Menyimpan Pengaturan Aplikasi</a><br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

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 ke...

Saturday, May 23, 2015

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 <a href="http://dwirandyherdinanto.blogspot.com/2015/03/membuat-fungsi-terbilang-dengan-c-dan.html">Membuat Fungsi Terbilang dengan C# dan VB.NET</a> kali ini saya akan posting tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/04/konversi-bilangan-angka-ke-romawi-dan.html">Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,</a><br />
<br />
Apa itu Bilangan Romawi ?<br />
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.<br />
<br />
oke langsung saja <a href="http://dwirandyherdinanto.blogspot.com/2015/04/konversi-bilangan-angka-ke-romawi-dan.html">Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,</a><br />
<br />
1. Buat sebuah project Windows Form dengan visual studio anda<br />
<br />
2. Tambahkan 4 Textbox 2 button dan 4 label lalu desain form seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgC18JNxUe-DhEq1F9YFwuMPTKP2Y54iFtBuqQtqKUQMZyjGJMypB2sN6vwfpgBwzML1NIpZLDTsjhxmfpV_gmGQ-FqjMvjRGAUHwH3GPk1LgOqjBeCfE9mxkasMTWJRH89tIv-uMHXr_Bl/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" border="0" height="242" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgC18JNxUe-DhEq1F9YFwuMPTKP2Y54iFtBuqQtqKUQMZyjGJMypB2sN6vwfpgBwzML1NIpZLDTsjhxmfpV_gmGQ-FqjMvjRGAUHwH3GPk1LgOqjBeCfE9mxkasMTWJRH89tIv-uMHXr_Bl/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET.png" title="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<br />
3. Tambahkan namespace System.Collections.Generic<br />
<br />
4. Buat fungsi dengan nama RomanToInteger (fungsi ini digunakan untuk merubah romawi ke angka)<br />
C#<br />
<pre class="brush:html">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;
        }</pre>
VB.NET<br />
<pre class="brush:html">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
</pre>
<div>
<br /></div>
5. Buat fungsi dengan nama IntegerToRoman (fungsi ini untuk mengubah romawi ke angka)<br />
C#<br />
<pre class="brush:html">        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;
        }
</pre>
<div>
<br /></div>
VB.NET<br />
<pre class="brush:html">    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
</pre>
<div>
<br /></div>
6. Jalankan program tersebut maka akan seperti gambar dibawah ini<br />
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjyRyTliWJ7PAmSzMuihLrdidFgn-h4RVRzYV3hp0QSfuyk7zetFoiyjIp4MXkXPUd3SmppD0uWI5AEpGjZqR3Kp5cz7h3eHq5JPZ9v_rHU43mFlXN7jttLRzE_tft3e9vmL7JJuo_MVfAE/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+2.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" border="0" height="241" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjyRyTliWJ7PAmSzMuihLrdidFgn-h4RVRzYV3hp0QSfuyk7zetFoiyjIp4MXkXPUd3SmppD0uWI5AEpGjZqR3Kp5cz7h3eHq5JPZ9v_rHU43mFlXN7jttLRzE_tft3e9vmL7JJuo_MVfAE/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+2.png" title="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Mengubah Romawikke Angka</td></tr>
</tbody></table>
<br />
<table align="center" cellpadding="0" cellspacing="0" class="tr-caption-container" style="margin-left: auto; margin-right: auto; text-align: center;"><tbody>
<tr><td style="text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjyNBd3p8iX4OG2Jc8c7ERWrXsI5isU1b-5U6oh67_bdrahhhDcl0FsYm1eZJD6lO5Tz77COX6aRa5tQdP_X85U4fBEuAFadD5usmUvuZh4dsVPhT3LH9bd1GRHuQDql6aM5FIrpPAeS7Z7/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+3.png" imageanchor="1" style="margin-left: auto; margin-right: auto;"><img alt="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" border="0" height="242" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjyNBd3p8iX4OG2Jc8c7ERWrXsI5isU1b-5U6oh67_bdrahhhDcl0FsYm1eZJD6lO5Tz77COX6aRa5tQdP_X85U4fBEuAFadD5usmUvuZh4dsVPhT3LH9bd1GRHuQDql6aM5FIrpPAeS7Z7/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+3.png" title="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" width="320" /></a></td></tr>
<tr><td class="tr-caption" style="text-align: center;">Mengubah Angka ke Romawi</td></tr>
</tbody></table>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjzCrbaEHjNydneM-aypLhGCtAx76umP6UlfGO1Wnyewh4IuLTj6B-La6afaTKrPDiTeuoYD64OKxDfKgqTCuNHCFogg65hTEBSj8AspTAVDzdE_5Zih1OGMn8VpucMx2dJ00K2YEjKTCAF/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+4.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" border="0" height="244" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjzCrbaEHjNydneM-aypLhGCtAx76umP6UlfGO1Wnyewh4IuLTj6B-La6afaTKrPDiTeuoYD64OKxDfKgqTCuNHCFogg65hTEBSj8AspTAVDzdE_5Zih1OGMn8VpucMx2dJ00K2YEjKTCAF/s1600/Konversi+Bilangan+Angka+ke+Romawi+dan+Sebaliknya+dengan+CSharp+dan+VBNET+4.png" title="Konversi Bilangan Angka ke Romawi dan Sebaliknya dengan C# dan VB.NET" width="320" /></a></div>
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://www.tusfiles.net/1hrwe9xmdx2i">VB.NET</a> | <a href="http://www.tusfiles.net/bp5fg04sttv9">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://tny.cz/cca303d4">disini</a></div>
<br />
<br />
Sekian pembahasan tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/04/konversi-bilangan-angka-ke-romawi-dan.html">Konversi Bilangan Angka ke Romawi dengan C# dan VB.NET,</a><br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

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...

Wednesday, April 15, 2015

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,<br />
oke kali ini saya akan memposting tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/03/membuat-fungsi-terbilang-dengan-c-dan.html">Membuat Fungsi Terbilang dengan C# dan VB.NET</a><br />
<br />
Apa itu fungsi terbilang ?<br />
fungsi terbilang adalah fungsi yang digunakan untuk mengubah angka menjadi kalimat dalam bahasa indonesia<br />
<br />
Langkah - langkah <a href="http://dwirandyherdinanto.blogspot.com/2015/03/membuat-fungsi-terbilang-dengan-c-dan.html">Membuat Fungsi Terbilang dengan C# dan VB.NET</a><br />
<br />
1. Buat sebuah project baru di visual studio anda, dengan nama fungsi_terbilang<br />
<br />
2. Tambahkan 2 buah textbox dan 1 button lalu atur lokasi object seperti dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi94W94p8YGHsC-R_xF_OwrCenww82XlYYm-vx-zG_BxepdSEI0V3iNTuvCl0E0CJUtlkq6Zuw-Lel25Kh1prlqI2C2HyJ3cZ72z2SvFwVUf4BJaY3ufu6QacSYQ4usOWJnv6NdmE5sZIQY/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Fungsi Terbilang dengan C# dan VB.NET" border="0" height="218" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi94W94p8YGHsC-R_xF_OwrCenww82XlYYm-vx-zG_BxepdSEI0V3iNTuvCl0E0CJUtlkq6Zuw-Lel25Kh1prlqI2C2HyJ3cZ72z2SvFwVUf4BJaY3ufu6QacSYQ4usOWJnv6NdmE5sZIQY/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+1.png" title="Membuat Fungsi Terbilang dengan C# dan VB.NET" width="320" /></a></div>
<br />
3. buat sebuah fungsi dengan nama fungsi terbilang lalu isikan code dibawah ini<br />
C#<br />
<pre class="brush:html">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;</pre>
<pre class="brush:html">}
</pre>
VB.NET<br />
<pre class="brush:html">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</pre>
<br />
4. Klik 2 kali pada button1 lalu tambahkan script dibawah ini<br />
C#<br />
<pre class="brush:html">// menampilkan hasil dari fungis terbilang ke textbox 2 berdasarkan angka dari textbox 1
            textBox2.Text = this.terbilang(Convert.ToInt32(textBox1.Text)).TrimStart();</pre>
VB.NET<br />
<pre class="brush:html">        ' menampilkan hasil dari fungis terbilang ke textbox 2 berdasarkan angka dari textbox 1
        textBox2.Text = LTrim(Me.terbilang(Convert.ToInt32(textBox1.Text)))</pre>
<br />
5. Jalankan project yang kita buat dengan menekan tombol F5 maka akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgIKZ676sUjIUwsn5xeklRtREzDznnbYt77NWT8GPmirinKUQqv408rklQr0VC1Tufc5q6b0hcebxiQBp6gPUBi7a0bMycSDaHf8Fbdn-im_LyTfdXfw96Qybz71hO_8gRAsM-Oa8z5zd1z/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Fungsi Terbilang dengan C# dan VB.NET" border="0" height="218" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgIKZ676sUjIUwsn5xeklRtREzDznnbYt77NWT8GPmirinKUQqv408rklQr0VC1Tufc5q6b0hcebxiQBp6gPUBi7a0bMycSDaHf8Fbdn-im_LyTfdXfw96Qybz71hO_8gRAsM-Oa8z5zd1z/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+2.png" title="Membuat Fungsi Terbilang dengan C# dan VB.NET" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj2V9xYK5N7dizf0NQ3EXXTrGnle8EvCF1iFmy9n4voWcHuavZkmjURwZT9VVz0giGJwKhIG1PpW1xCnq_UyN0ciaN6dT4jNIk6tA23JWHYxzWJNbfeh63yxt90x4oKpPbh-bMTssauKe9_/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Fungsi Terbilang dengan C# dan VB.NET" border="0" height="219" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj2V9xYK5N7dizf0NQ3EXXTrGnle8EvCF1iFmy9n4voWcHuavZkmjURwZT9VVz0giGJwKhIG1PpW1xCnq_UyN0ciaN6dT4jNIk6tA23JWHYxzWJNbfeh63yxt90x4oKpPbh-bMTssauKe9_/s1600/Membuat+Fungsi+Terbilang+dengan+C%23+dan+VBNET+3.png" title="Membuat Fungsi Terbilang dengan C# dan VB.NET" width="320" /></a></div>
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://www.tusfiles.net/qtoq7ob0dxzi">VB.NET</a> | <a href="http://www.tusfiles.net/pqgb968aoe2s">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://tny.cz/cca303d4">disini</a></div>
<div style="text-align: center;">
<br /></div>
Sekian pembahasan tentang <a href="http://dwirandyherdinanto.blogspot.com/2015/03/membuat-fungsi-terbilang-dengan-c-dan.html">Membuat Fungsi Terbilang dengan C# dan VB.NET</a><br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

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 - tutori...

Wednesday, March 25, 2015

Perulangan Foreach di VB.NET dan C#

Setelah kemarin saya memposting tentang <a href="http://dwirandyherdinanto.blogspot.com/2014/09/menampilkan-progress-bar-di-taskbar.html">Menampilkan Progress bar di Taskbar dengan VB.NET dan C#</a>, pada pagi yang cerah ini saya akan memposting Request dari teman saya tentang Perulangan Foreach di VB.NET dan C#.<br />
<br />
Foreach adalah fungsi yang digunakan untuk melakukan perulangan pada elemen-elemen larik pada suatu array tanpa kita perlu menspesifikasikan batas atas lari yang bersangkutan.<br />
Bentuk umum perulangan foreach adalah<br />
VB.NET<br />
<pre class="brush:html">Dim arr As Integer() = {masukan nilai array yang diinginkan}
For Each i As Integer In arr ' untuk setiap integer yang ada dalam array
   ' statement yang anda inginkan
Next</pre>
C#<br />
<pre class="brush:html">int[] arr = {masukan nilai array yang diinginkan};
foreach (int i in arr) // untuk setiap integer yang ada dalam array
{
   // statement yang anda inginkan
}</pre>
<br />
Contoh Penggunaan Perulangan Foreach<br />
VB.NET<br />
<pre class="brush:html">Module Module1

Sub Main()
        Dim arr As Integer() = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
        For Each i As Integer In arr
            Console.WriteLine("Nomor ke " & i)
        Next
        Console.ReadLine()
    End Sub

End Module
</pre>
<div>
<br /></div>
C#<br />
<pre class="brush:html">using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Foreach_C
{
    class Program
    {
        static void Main(string[] args)
        {
            int[] arr = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
            foreach (int i in arr)
            {
                Console.WriteLine("Nomor ke " + i);
            }
            Console.ReadLine();
        }
    }
}
</pre>
<div>
<br />
Maka ketika dijalankan outputnya akan seperti gambar di bawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhbd8VuKKl7q_p8mzZ4-JbIOVuuwp0zl7nn6y83XR_cV8m3SqJ9RfLUNSqIUfj6ANrePgEpjG6EP7rEx0mOLSmaGkc52KlFw_btxwNjXaV9Av-6eBIb_o5S6m9vN5IcWMyIGsrO_zAN47i7/s1600/perulangan+foreach+vbnet+dan+C%23.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Perulangan Foreach di VB.NET dan C#" border="0" height="165" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhbd8VuKKl7q_p8mzZ4-JbIOVuuwp0zl7nn6y83XR_cV8m3SqJ9RfLUNSqIUfj6ANrePgEpjG6EP7rEx0mOLSmaGkc52KlFw_btxwNjXaV9Av-6eBIb_o5S6m9vN5IcWMyIGsrO_zAN47i7/s1600/perulangan+foreach+vbnet+dan+C%23.png" title="Perulangan Foreach di VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
Foreach tidak hanya bisa digunakan pada suatu array bertipe data integer tapi juga bisa bertipe data yang lain, misalnya string</div>
<div class="separator" style="clear: both; text-align: left;">
VB.NET</div>
<div class="separator" style="clear: both; text-align: left;">
</div>
<pre class="brush:html">Dim arr As String() = {"Guilty Crown", "Sword Art Online", "Full Metal Alchemist", "Akame ga Kill", "No Game No Life"}
For Each a As String In arr
     Console.WriteLine(a)
Next
Console.ReadLine()</pre>
<div class="separator" style="clear: both; text-align: left;">
C#</div>
<div class="separator" style="clear: both; text-align: left;">
</div>
<pre class="brush:html">string[] arr = { "Guilty Crown", "Sword Art Online", "Full Metal Alchemist", "Akame ga Kill", "No Game No FIle" };
foreach (string a in arr)
{
    Console.WriteLine(a);
}
Console.ReadLine();</pre>
</div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjD33BwG6zdJDxF2wYF0yNnxQjJ-tmLnQwTVIfkrsghw1aFOBBG7ElSjun9i2f32ZECiYp8_4Q-lJxzSGJwQexTV0Q7IofyD_XMoOVzTQZcDbY1QdApWXdhQ6VWOjz7UHhuQ3UcaHt5a1zd/s1600/perulangan+foreach+vbnet+dan+C%23+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Perulangan Foreach di VB.NET dan C#" border="0" height="159" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjD33BwG6zdJDxF2wYF0yNnxQjJ-tmLnQwTVIfkrsghw1aFOBBG7ElSjun9i2f32ZECiYp8_4Q-lJxzSGJwQexTV0Q7IofyD_XMoOVzTQZcDbY1QdApWXdhQ6VWOjz7UHhuQ3UcaHt5a1zd/s1600/perulangan+foreach+vbnet+dan+C%23+2.png" title="Perulangan Foreach di VB.NET dan C#" width="320" /></a></div>
<br />
<br />
Untuk melihat lebih lanjut bagaimana perbandingan antara perluangan foreach dan for dalam segi kecepatan, performa dan lainnya anda bisa mengunjungi link ini <a href="http://www.dotnetperls.com/foreach">http://www.dotnetperls.com/foreach</a><br />
<br />
Semoga artikel ini bisa bermanfaat untuk anda<br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Perulangan Foreach di VB.NET dan C#

Setelah kemarin saya memposting tentang Menampilkan Progress bar di Taskbar dengan VB.NET dan C# , pada pagi yang cerah ini saya akan mempos...

Friday, September 26, 2014

Menampilkan Progress bar di Taskbar dengan VB.NET dan C#

<div class="separator" style="clear: both; text-align: left;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi8YwPJpOCGajzYGDwxi0VTVaib6eTjwuSO6GR1q8QnawhbLzv5dNuAOIZG5WOWFBqOeWZt3A43BasyrXfPDyvCpTM_63ug_m-tb7bc-ZPl7g82WS815bn26AkipnL_Ohyphenhyphen5OXh4J5aHmpas/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="210" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi8YwPJpOCGajzYGDwxi0VTVaib6eTjwuSO6GR1q8QnawhbLzv5dNuAOIZG5WOWFBqOeWZt3A43BasyrXfPDyvCpTM_63ug_m-tb7bc-ZPl7g82WS815bn26AkipnL_Ohyphenhyphen5OXh4J5aHmpas/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a>Untuk mengawali pagi ini saya akan memposting tentang Menampilkan Progress bar di Taskbar dengan VB.NET dan C#. Mungkin jika anda sering menggunakan Internet Download Manager ketika anda sedang mendownload maka pada taskbar IDM tersebut akan muncul progressbar yang menandakan proses download ada.</div>
<br />
Sebelumnya pertama - tama anda perlu mendownload DLL bernama Micrososft.WindowsApiCodePack, Microsoft.WindowsApiCodePack.Shell dan Microsoft.WindowsApiCodePack.Shell.Extensions yang bisa anda download <a href="http://www.tusfiles.net/4ecs2d3dgoj1">disini</a><br />
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
Langkah - langkah Menampilkan Progress bar di Taskbar dengan VB.NET dan C#</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
1. Buat sebuah project baru, tambahkan sebuah form dan pada form tersebut tambahkan 1 progressbar, 2 button dan 1 timer</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4v6sx_hMddZ_cfoedU0kZ-hHzWid_2Giy3I0yNCLD5_RtrdTjLH6ma2EeaklIvFrD2vZG2li5X7NIgsSu3LNbWyT383WbDc1jp4oYWKsAgyce5iBuiucshtjGXZR6MeBFXMAxigPPMIYZ/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="148" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4v6sx_hMddZ_cfoedU0kZ-hHzWid_2Giy3I0yNCLD5_RtrdTjLH6ma2EeaklIvFrD2vZG2li5X7NIgsSu3LNbWyT383WbDc1jp4oYWKsAgyce5iBuiucshtjGXZR6MeBFXMAxigPPMIYZ/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+2.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
2. Tambahkan references Micrososft.WindowsApiCodePack, Microsoft.WindowsApiCodePack.Shell dan Microsoft.WindowsApiCodePack.Shell.Extension dengan cara Klik kanan nama project anda lalu pilih properties</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjPrcatSqM8-CvhzjPZtbVRB2GZDQ16NgXyI6I5KBazBs1ehnNDHVGABrFzJtkuJWTDIKRHyr_d6TEdW-rH5luUW1Oq9fF3IWOwnhWqSp_wWsQ-taOh-4XwKggA-GM4_aFJsq3F0QVNuA6c/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="320" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjPrcatSqM8-CvhzjPZtbVRB2GZDQ16NgXyI6I5KBazBs1ehnNDHVGABrFzJtkuJWTDIKRHyr_d6TEdW-rH5luUW1Oq9fF3IWOwnhWqSp_wWsQ-taOh-4XwKggA-GM4_aFJsq3F0QVNuA6c/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+3.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="307" /></a></div>
<div class="separator" style="clear: both; text-align: left;">
   Pilih Tab References klik add</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjcDYNmMOkq2X7fRrEzaOhNBRb5lRAOD7mimPvkBIjB3LWkshatiEfOJ83eAwjgssKI-0NJl6z5FUjaCHHIQYtMXi6TF19ze_ln0pB23R9nRK2SnHL4UG2LtTAFW5gMFKUlkUpO93jMqU33/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%234.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="172" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjcDYNmMOkq2X7fRrEzaOhNBRb5lRAOD7mimPvkBIjB3LWkshatiEfOJ83eAwjgssKI-0NJl6z5FUjaCHHIQYtMXi6TF19ze_ln0pB23R9nRK2SnHL4UG2LtTAFW5gMFKUlkUpO93jMqU33/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%234.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: left;">
  Pilih Browse, cari File DLL nya lalu klik add dan yang terakhir klik OK</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgwEJYAP9y7avLKlODVMnAgMOJWjueuSPbuTfePSHZHKwNerCAR6Xa4lwXUayDxJx-ec-79eaFUJuyx0A3vKlOOI7ZwTyyuQ8Jcyam_JiUrol6LHJQUsmarj7y-3sx0COqpgFJvgJzfYU5V/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+5.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="131" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgwEJYAP9y7avLKlODVMnAgMOJWjueuSPbuTfePSHZHKwNerCAR6Xa4lwXUayDxJx-ec-79eaFUJuyx0A3vKlOOI7ZwTyyuQ8Jcyam_JiUrol6LHJQUsmarj7y-3sx0COqpgFJvgJzfYU5V/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+5.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
3. Klik 2 kali pada form lalu pada bagian paling atas tambahkan script</div>
<div class="separator" style="clear: both; text-align: left;">
VB.NET</div>
<div class="separator" style="clear: both; text-align: left;">
</div>
<pre class="brush:html">Import Microsoft.WindowsAPICodePack;
Import Microsoft.WindowsAPICodePack.Taskbar;</pre>
<div class="separator" style="clear: both; text-align: left;">
C#</div>
<div class="separator" style="clear: both; text-align: left;">
</div>
<pre class="brush:html">using Microsoft.WindowsAPICodePack;
using Microsoft.WindowsAPICodePack.Taskbar;</pre>
<br />
4. Pada Form_load tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">progressBar1.Value = 0 ' atur value progressbar menjadi 0</pre>
C#<br />
<pre class="brush:html">progressBar1.Value = 0; // atur value progressbar menjadi 0</pre>
<br />
5. Klik 2 kali pada timer1 lalu tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">If (progressBar1.Value = 100) Then ' jika value progressbar adalah 100
      timer1.Stop() ' menghentikan timer
Else
      progressBar1.Value += 2 ' menambah value pada progressbar
      If (TaskbarManager.IsPlatformSupported = True) Then
          TaskbarManager.Instance.SetProgressValue(progressBar1.Value, 100) ' menampilkan progressbar pada taskbar
      End If
End If</pre>
C#<br />
<pre class="brush:html">if (progressBar1.Value == 100) // jika value progressbar adalah 100
{
   timer1.Stop(); // menghentikan timer
}
else
{
   progressBar1.Value += 2; // menambah value pada progressbar
   if (TaskbarManager.IsPlatformSupported == true)
   {
       TaskbarManager.Instance.SetProgressValue(progressBar1.Value, 100); // menampilkan progressbar pada taskbar
   }</pre>
<pre class="brush:html">}</pre>
<br />
6. Klik 2 kali pada button start lalu tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">timer1.Start() ' menjalankan timer</pre>
C#<br />
<pre class="brush:html">timer1.Start(); // menjalankan timer</pre>
<br />
7. Klik 2 kali pada button stop lalu tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">timer1.Stop() ' menghentikan timer</pre>
C#<br />
<pre class="brush:html">timer1.Stop(); // menghentikan timer</pre>
<br />
8. Jalakan form tersebut, lalu klik button start dan perhatikan pada taskbar akan muncul progressbar sesuai dengan progressbar yang ada di form anda<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEE69fE8oeM9EEi9ihW9G17n5W7bi3CmoPruN7ZLw3re5FwmTirHDEiZ-jkYXRKLNeff9IJscZETnIIP2ZmriTNz_SbabkbfE0GrJp_9HSmsKhEzm412dQ886FCVV9_BPDdIocw6iDMaTW/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+5.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="199" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEE69fE8oeM9EEi9ihW9G17n5W7bi3CmoPruN7ZLw3re5FwmTirHDEiZ-jkYXRKLNeff9IJscZETnIIP2ZmriTNz_SbabkbfE0GrJp_9HSmsKhEzm412dQ886FCVV9_BPDdIocw6iDMaTW/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+5.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi8YwPJpOCGajzYGDwxi0VTVaib6eTjwuSO6GR1q8QnawhbLzv5dNuAOIZG5WOWFBqOeWZt3A43BasyrXfPDyvCpTM_63ug_m-tb7bc-ZPl7g82WS815bn26AkipnL_Ohyphenhyphen5OXh4J5aHmpas/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="210" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi8YwPJpOCGajzYGDwxi0VTVaib6eTjwuSO6GR1q8QnawhbLzv5dNuAOIZG5WOWFBqOeWZt3A43BasyrXfPDyvCpTM_63ug_m-tb7bc-ZPl7g82WS815bn26AkipnL_Ohyphenhyphen5OXh4J5aHmpas/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiicYFEml1DENUNvoMT2z2CMBwNoff7sspiushiT7ZRv1BxURhlqKmi3GFKncGm07w-mPQs47Pf0CIc3Sb8Rh1IvDhkRxXrxjdU9vB9u_WkJcwvQ4-JzzQGoZaSI8JfLJkzN3fwXjAONvS0/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+6.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" border="0" height="201" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiicYFEml1DENUNvoMT2z2CMBwNoff7sspiushiT7ZRv1BxURhlqKmi3GFKncGm07w-mPQs47Pf0CIc3Sb8Rh1IvDhkRxXrxjdU9vB9u_WkJcwvQ4-JzzQGoZaSI8JfLJkzN3fwXjAONvS0/s1600/Menampilkan+Progress+bar+di+Taskbar+dengan+VB+dan+C%23+6.png" title="Menampilkan Progress bar di Taskbar dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://adf.ly/sL6cy">VB.NET</a> | <a href="http://adf.ly/sL6bZ">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH">disini</a></div>
<br />
Tunggu tutorial menarik lainnya, karena itu kunjungi terus blog ini

Menampilkan Progress bar di Taskbar dengan VB.NET dan C#

Untuk mengawali pagi ini saya akan memposting tentang Menampilkan Progress bar di Taskbar dengan VB.NET dan C#. Mungkin jika anda sering me...

Thursday, September 25, 2014

Export Data ke HTML dengan VB.NET dan C#

Setelah cukup lama tidak memposting :D, kali ini saya akan kembali memposting tutorial tentang <a href="http://adf.ly/rfIio" rel="nofollow" target="_blank">Export Data ke HTML dengan VB.NET dan C</a>#.<br />
<br />
Langkah - langkah <a href="http://adf.ly/rfIio" rel="nofollow" target="_blank">Export Data ke HTML dengan VB.NET dan C#</a><br />
<br />
1. Tambahkan 1 buah datagridview,savefiledialog,button lalu design form seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjel9colZhoTwmOKbArObkuSL-Q84emOB9byW796OCFdX7AiEEBEcFAy6z7Fx1ATYWwoslkMcxcfLBOo0TTRFxAx1TKq8FXkkY_08r4nMBiYcIUr8KGB7NmR8ypXeCSwGIR0yjiFnW4Wk69/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Export Data ke HTML dengan VB.NET dan C#" border="0" height="202" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjel9colZhoTwmOKbArObkuSL-Q84emOB9byW796OCFdX7AiEEBEcFAy6z7Fx1ATYWwoslkMcxcfLBOo0TTRFxAx1TKq8FXkkY_08r4nMBiYcIUr8KGB7NmR8ypXeCSwGIR0yjiFnW4Wk69/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_1.png" title="Export Data ke HTML dengan VB.NET dan C#" width="320" /></a></div>
<br />
2. Pada Form Load tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">' filter file
        SaveFileDialog1.Filter = "HTML (*.html)|*.html"

' membuat datatable untuk menampung data yang akan di tampilkan ke datagridview
        Dim dt As DataTable = New DataTable
        dt.Columns.Add("npm")
        dt.Columns.Add("nama")
        dt.Columns.Add("alamat")

For i As Integer = 1 To 20
            dt.Rows.Add(i, "nama " & i, "alamat " & i)
        Next

' menampilkan data ke datagridview
        DataGridView1.DataSource = dt</pre>
C#<br />
<pre class="brush:html">// filter file
            SaveFileDialog1.Filter = "HTML (*.html)|*.html";

// membuat datatable untuk menampung data yang akan di tampilkan ke datagridview
            DataTable dt = new DataTable();
            dt.Columns.Add("npm");
            dt.Columns.Add("nama");
            dt.Columns.Add("alamat");

for (int i=0; i <= 20; i++)
            {
                dt.Rows.Add(i, "nama " + i, "alamat " + i);
            }

// menampilkan data ke datagridview
            DataGridView1.DataSource = dt;</pre>
<br />
3. Buat sebuah fungsi untuk mengexport data ke html dengan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">Private Function ExportKeHTML(dgv As DataGridView) As String
        Dim result As String = ""
        Dim strhtml As System.Text.StringBuilder = New System.Text.StringBuilder
        strhtml.Append("<html>") ' membuat tag html
        strhtml.Append("<head>") ' membuat tag head
        strhtml.Append("<title>[Tutorial_Koding]_Export_DGV_to_HTML</title>") ' membuat titie
        strhtml.Append("</head>") ' menutup tag head
        strhtml.Append("<table border='2'>") ' membuat table

' membuat column
        strhtml.Append("<tr>")
        For Each dgvcolumn As DataGridViewColumn In dgv.Columns
            strhtml.Append("<td>")
            strhtml.Append(dgvcolumn.HeaderText)
            strhtml.Append("</td>")
        Next
        strhtml.Append("</tr>")

' menampilkan isi dari datagridview
        For Each row As DataGridViewRow In dgv.Rows
            strhtml.Append("<tr>")
            For Each dgvcolumn As DataGridViewColumn In dgv.Columns
                strhtml.Append("<td>")
                strhtml.Append(row.Cells(dgvcolumn.Index).Value)
                strhtml.Append("</td>")
            Next
            strhtml.Append("</tr>")
        Next

strhtml.Append("</table>") 'menutup tag table
        strhtml.Append("</body>") ' menutup tag body
        strhtml.Append("</html>") ' menutup tag html

result = strhtml.ToString()

Return result
    End Function</pre>
C#<br />
<pre class="brush:html">private string ExportKeHTML(DataGridView dgv)
        {
            string result = "";
            System.Text.StringBuilder strhtml = new System.Text.StringBuilder();
           
            strhtml.Append("<html>"); // membuat tag  html
            strhtml.Append("<head>"); // membuat tag  head
            strhtml.Append("<title>[Tutorial_Koding]_Export_DGV_to_HTML</title>"); // membuat title
            strhtml.Append("</head>"); // menutup tag head
            strhtml.Append("<table border='2'"); // membuat table

// membuat column
            strhtml.Append("<tr>");
            foreach (DataGridViewColumn dgvcolumn in dgv.Columns)
            {
                strhtml.Append("<td>");
                strhtml.Append(dgvcolumn.HeaderText);
                strhtml.Append("</td>");
            }
            strhtml.Append("</tr>");

// menampilkan isi dari datagridview
            foreach (DataGridViewRow row in dgv.Rows)
            {
                strhtml.Append("<tr>");
                    foreach (DataGridViewColumn dgvcolumn in dgv.Columns)
                    {
                        strhtml.Append("<td>");
                        strhtml.Append(row.Cells[dgvcolumn.Index].Value);
                        strhtml.Append("</td>");
                    }
                strhtml.Append("</tr>");
            }
            
            strhtml.Append("</table"); // menutup tag table
            strhtml.Append("</body>"); // menutup tag body
            strhtml.Append("</html>"); // menutup tag html

result = strhtml.ToString();

return result;
        }</pre>
<br />
4. Pada event Button1 Click tambahkan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            ' menyimpan file html
            System.IO.File.WriteAllText(SaveFileDialog1.FileName, ExportKeHTML(DataGridView1))
            MsgBox("Data berhasil di export")
        End If</pre>
C#<br />
<pre class="brush:html">DialogResult result = SaveFileDialog1.ShowDialog();
            if (result == DialogResult.OK)
            {
                // menyimpan file html
                System.IO.File.WriteAllText(SaveFileDialog1.FileName, ExportKeHTML(DataGridView1));
                MessageBox.Show("Data berhasil diexport");
            }</pre>
<br />
5. Jalankan program tersebut maka akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjX3oUmXOCqenLW5IG_5_FYSUT1imh7YGUprqLFGWoBh-0H4RqxNDfLtorfGC7EkrP6zNuy4AC_oDRwUNbKW7rle67bJ6oMa83I3-HrD-2TzNmit33GU-HaddQAAQ0OZyxkSXcSZya1d35d/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="206" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjX3oUmXOCqenLW5IG_5_FYSUT1imh7YGUprqLFGWoBh-0H4RqxNDfLtorfGC7EkrP6zNuy4AC_oDRwUNbKW7rle67bJ6oMa83I3-HrD-2TzNmit33GU-HaddQAAQ0OZyxkSXcSZya1d35d/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_2.png" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgHAk35WIfUYceQZKQ9gA7FpMs8IbchwY2smMQ8POOyo9agSyr8nE7Eh1c2wom_qkvaeA3ABgqFkq1ysdU-lpOA-K-iJWrMAvC87WuMJZrP2yrLyRfOvZy-B7_floi4YzGpAmFt3zgGLTUM/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Export Data ke HTML dengan VB.NET dan C#" border="0" height="320" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgHAk35WIfUYceQZKQ9gA7FpMs8IbchwY2smMQ8POOyo9agSyr8nE7Eh1c2wom_qkvaeA3ABgqFkq1ysdU-lpOA-K-iJWrMAvC87WuMJZrP2yrLyRfOvZy-B7_floi4YzGpAmFt3zgGLTUM/s1600/Export_Data_ke_HTML_dengan_VB_NET_dan_C%23_3.png" title="Export Data ke HTML dengan VB.NET dan C#" width="108" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div class="separator" style="clear: both; text-align: center;">
| <a href="http://adf.ly/rfKGd">VB.NET</a> | <a href="http://adf.ly/rfKEp" target="_blank">C#</a> |</div>
<div class="separator" style="clear: both; text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH" target="_blank">disini</a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
Sekian dari saya.</div>
<div class="separator" style="clear: both; text-align: left;">
Terima kasih atas kunjugannya semoga bermanfaat</div>

Export Data ke HTML dengan VB.NET dan C#

Setelah cukup lama tidak memposting :D, kali ini saya akan kembali memposting tutorial tentang Export Data ke HTML dengan VB.NET dan C #. ...

Monday, September 01, 2014

Memberi Warna Baris pada Datagridview & Listview dengan VB.NET & C#

Setelah 2 hari yang lalu saya memposting tentang <a href="http://adf.ly/r4HUP">Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#</a>, kali ini saya akan memposting tentang <a href="http://adf.ly/r81oe">Memberi Warna Baris pada Datagridview & Listview dengan VB.NET & C#.</a><br />
<br />
Ketika kita membuat program biasanya kita sering menggunakan Datagridview & Listview untuk menampilkan data.<br />
<div>
Namun terkadang jika baris pada Datagridview & Listview tersebut terlalu banyak user akan merasa sulit untuk melihatnya, oleh karena itu disini saya akan share source code untuk memberikan warna background pada baris Datagridview & Listview, dan karena ini hanyalah contoh sederhana anda dapat mengembangkannya sesuai dengan kebutuhan anda masing - masing<br />
<div>
<br /></div>
<div>
Berikut screenshotnya :</div>
<div>
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEge5baa2GTqvW13Igq3MPA22dIW6EpIIdoq43NmxRe5KehVE_-mTAynYn8rdr8VJ0Y5yuwvV6yxnLJyS1a73LlGxsB9LeDrn3V-EN75Po_o8YMefZy7v_eXupBAf-416xfzCU1tn2uBSPqg/s1600/Memberi+Warna_Baris+pada_Datagridview_&_Listview_dengan_VBNET_&_C%23.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Memberi Warna Baris pada Datagridview & Listview dengan VB.NET & C#" border="0" height="209" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEge5baa2GTqvW13Igq3MPA22dIW6EpIIdoq43NmxRe5KehVE_-mTAynYn8rdr8VJ0Y5yuwvV6yxnLJyS1a73LlGxsB9LeDrn3V-EN75Po_o8YMefZy7v_eXupBAf-416xfzCU1tn2uBSPqg/s1600/Memberi+Warna_Baris+pada_Datagridview_&_Listview_dengan_VBNET_&_C%23.png" title="Memberi Warna Baris pada Datagridview & Listview dengan VB.NET & C#" width="320" /></a></div>
<div>
<br /></div>
<blockquote class="tr_bq">
Anda juga dapat mengganti bacground dan juga forecolor sesuai dengan keinginan anda</blockquote>
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://adf.ly/r81bK">VB.NET</a> | <a href="http://adf.ly/r81Zr">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH">disini</a></div>
<br />
Sekian dari saya.<br />
Terima kasih atas kunjugannya semoga bermanfaat</div>

Memberi Warna Baris pada Datagridview & Listview dengan VB.NET & C#

Setelah 2 hari yang lalu saya memposting tentang Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C# , kali ini saya akan mem...

Thursday, August 14, 2014

Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang <a href="http://adf.ly/r1b3A" target="_blank">Membuat Placeholder pada Textbox dengan VB.NET dan C#</a><br />
pada postingan kali ini saya akan membahas tentang <a href="http://adf.ly/r4HUP" target="_blank">Membersihkan Seluruh Control pada Form dengan VB.NET dan C#</a>.<br />
Terkadang ketika membuat sebuah form dimana form tersebut memiliki banyak control seperti textbox, listview, listbox atau yang lainnya, lalu anda ingin membersihkan isi dari control tersebut misalnya saja pada textbox dengan script textbox1.Text = "", mungkin jika hanya beberapa textbox akan mudah namum bagaiman jika kita memiliki banyak textbox dan juga control - control yang lainnya? kita pasti akan menggunakan banyak code untuk membersihkan isi dari control tersebut, saya juga terkadang merasa lelah jika melakukan itu terus - menerus. Tapi disini saya akan share source code hasil cari - cari google untuk <a href="http://adf.ly/r4HUP" target="_blank">Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#</a> dengan mudah dan cepat<br />
<br />
1. Buka visual studio yang anda punya<br />
<br />
2. Buatlah sebuah fungsi seperti dibawah ini<br />
<br />
VBNET<br />
<pre class="brush:html">Private Sub Clear(frm As Form)
        For Each obj As Object In frm.Controls
            If TypeOf obj Is TextBox Or TypeOf obj Is MaskedTextBox Or TypeOf obj Is RichTextBox Or TypeOf obj Is ComboBox Then 'jika tipe obj adalah textbox atau maskedtextbox atau richtextbox atau combobox
                obj.Text = ""
            ElseIf TypeOf obj Is ListView Or TypeOf obj Is ListBox Or TypeOf obj Is ComboBox Then ' jika tipe obj adalah listview atau listbox atau combobox
                obj.Items.Clear()
            ElseIf TypeOf obj Is DataGridView Then ' jika tipe obj adalah datagridview
                obj.Rows.Clear()
            ElseIf TypeOf obj Is PictureBox Then ' jika tipe obj adalah picturebox
                obj.Image = Nothing
            ElseIf TypeOf obj Is CheckBox Or TypeOf obj Is RadioButton Then ' jika tipe obj adalah checkebox atau radiobutton
                obj.Checked = False
            ElseIf TypeOf obj Is NumericUpDown Then ' jika tipe obj adalah numericupdown
                obj.Value = 0
            End If
        Next
    End Sub</pre>
C#<br />
<pre class="brush:html">private void Clear(Form frm)
        {
            foreach (object obj in frm.Controls)
            {
                if (obj.GetType() == typeof(TextBox)) // jika tipe obj adalah textbox
                {
                    TextBox txtbox = (TextBox)obj;
                    txtbox.Text = "";
                }
                else if (obj.GetType() == typeof(MaskedTextBox)) // jika tipe obj adalah maskedtextbox
                {
                    MaskedTextBox msktextbox = (MaskedTextBox)obj;
                    msktextbox.Text = "";
                }
                else if (obj.GetType() == typeof(NumericUpDown)) // jika tipe obj adalah numericupdown
                {
                    NumericUpDown numeric = (NumericUpDown)obj;
                    numeric.Value = 0;
                }
                else if (obj.GetType() == typeof(CheckBox)) // jika tipe obj adalah checkbox
                {
                    CheckBox chkbox = (CheckBox)obj;
                    chkbox.Checked = false;
                }
                else if (obj.GetType() == typeof(RadioButton)) // jika tipe obj adalah radiobutton
                {
                    RadioButton rbutton = (RadioButton)obj;
                    rbutton.Checked = false;
                }
                else if (obj.GetType() == typeof(ComboBox)) // jika tipe obj adalah combobox
                {
                    ComboBox cbox = (ComboBox)obj;
                    cbox.Items.Clear();
                    cbox.Text = "";
                }
                else if (obj.GetType() == typeof(PictureBox)) // jika tipe obj adalah picturebox
                {
                    PictureBox pbox = (PictureBox)obj;
                    pbox.Image = null;
                }
                else if (obj.GetType() == typeof(RichTextBox)) // jika tipe obj adalah richtextbox
                {
                    RichTextBox rtbox = (RichTextBox)obj;
                    rtbox.Text = "";
                }
                else if (obj.GetType() == typeof(ListBox)) // jika tipe obj adalah listbox
                {
                    ListBox lstbox = (ListBox)obj;
                    lstbox.Items.Clear();
                }
                else if (obj.GetType() == typeof(ListView)) // jika tipe obj ada listview
                {
                    ListView lv = (ListView)obj;
                    lv.Items.Clear();
                }
                else if (obj.GetType() == typeof(DataGridView)) // jika tipe obj adalah datagridview
                {
                    DataGridView dgv = (DataGridView)obj;
                    dgv.Rows.Clear();
                }
            }
        }</pre>
<pre class="brush:html"></pre>
<blockquote class="tr_bq">
Anda juga bisa menyesuaikan control apa saja yang anda butuhkan dengan menambahkan IF baru atau yang lainnya</blockquote>
<br />
3. Untuk cara penggunaannya seperti dibawah ini<br />
<br />
VB.NET<br />
<pre class="brush:html">Clear(Me)</pre>
C#<br />
<pre class="brush:html">Clear(this)</pre>
<br />
Berikut beberapa screenshotnya<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhOTwvuCkIwNVdC-cf8EFtHzKlhiZCnagCLp7emzbrG6dIwA_Itk0C55BqK_BhgNdyEQ0htJ1Dv8syZ7jovVpJvWFijGCXigZBYKKLjPBi8XDdmCRvracXTqyycBirGeLshc7mvnzaeVncf/s1600/Membersihkan_Seluruh_Control_Object_pada_Form_dengan_VBNET_dan_C_2.png" imageanchor="1"><img alt="Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#" border="0" height="189" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhOTwvuCkIwNVdC-cf8EFtHzKlhiZCnagCLp7emzbrG6dIwA_Itk0C55BqK_BhgNdyEQ0htJ1Dv8syZ7jovVpJvWFijGCXigZBYKKLjPBi8XDdmCRvracXTqyycBirGeLshc7mvnzaeVncf/s1600/Membersihkan_Seluruh_Control_Object_pada_Form_dengan_VBNET_dan_C_2.png" title="Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgTqMlDkKmbGJR6nS4XHq5pDfspxNtD3FAXJVU0tkP4huDB5Kbcr1yVadzRMVt7l_PcUuRI4LpIxOUw7ljsRT1jBIiiPWZQMp10cqrizCc26E7nRmGHjvE1JxIimNhiIapkHu9nZDpYlDh6/s1600/Membersihkan_Seluruh_Control_Object_pada_Form_dengan_VBNET_dan_C.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#" border="0" height="188" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgTqMlDkKmbGJR6nS4XHq5pDfspxNtD3FAXJVU0tkP4huDB5Kbcr1yVadzRMVt7l_PcUuRI4LpIxOUw7ljsRT1jBIiiPWZQMp10cqrizCc26E7nRmGHjvE1JxIimNhiIapkHu9nZDpYlDh6/s1600/Membersihkan_Seluruh_Control_Object_pada_Form_dengan_VBNET_dan_C.png" title="Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div class="separator" style="clear: both; text-align: center;">
| <a href="http://adf.ly/r4IBB">VB.NET</a> | <a href="http://adf.ly/r4I9f" target="_blank">C#</a> |</div>
<div class="separator" style="clear: both; text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH" target="_blank">disini</a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
Sekian dari saya.</div>
<div class="separator" style="clear: both; text-align: left;">
Terima kasih atas kunjugannya semoga bermanfaat</div>

Membersihkan Seluruh Control/Object pada Form dengan VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang Membuat Placeholder pada Textbox dengan VB.NET dan C# pada postingan kali ini saya ...

Tuesday, August 12, 2014

Membuat Placeholder pada TextBox dengan VB.NET dan C#

<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjnmqlnrA8HpTjoHOJB_wq0Bff8sFk602nshdJecs6Q-HGL3IFcwdfSOJ96MdKrZ3IaNsUFGKvC84C_nv1saXsMUUNtljBEb9VNbsNFnWJMU3b8KlnjuKlELD3-MGJTIh5r371xNLaOOQl1/s1600/Placeholder_TextBox_dengan_VBNET_C%2523.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img alt="Membuat Placeholder pada TextBox dengan VB.NET dan C#" border="0" height="102" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjnmqlnrA8HpTjoHOJB_wq0Bff8sFk602nshdJecs6Q-HGL3IFcwdfSOJ96MdKrZ3IaNsUFGKvC84C_nv1saXsMUUNtljBEb9VNbsNFnWJMU3b8KlnjuKlELD3-MGJTIh5r371xNLaOOQl1/s1600/Placeholder_TextBox_dengan_VBNET_C%2523.png" title="Membuat Placeholder pada TextBox dengan VB.NET dan C#" width="320" /></a></div>
Setelah cukup lama saya tidak memposting tutorial, maka pada pagi hari ini saya akan memposting tentang <a href="http://adf.ly/r1b3A" target="_blank">Membuat Placeholder pada TextBox dengan VB.NET dan C#</a><br />
<br />
<br />
Apa itu placeholder? Placeholder atribut yang digunakan untuk menentukan petunjuk singkat yang menggambarkan nilai yang diharapkan dari sebuah filed input (Misalnya nilai sampel atau deskripsi singkat dari format yang diharapkan)<br />
<br />
oke langsung saja<br />
<br />
Cara <a href="http://adf.ly/r1b3A" target="_blank">Membuat Placeholder pada TextBox dengan VB.NET dan C#</a><br />
<br />
1. Buka Visual Studio yang anda punya disini saya menggunakan visual studio 2012<br />
<br />
2. Tambahkan 2 buah textbox dan berinama txt_nama dan txt_blog lalu design form seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi-dmno3IaOyF0Kh-ykCXdD7oRZ1w5oIRqjlF9pS65Np54TaoVX_QdIw5s9SYthysGoHOYpL-cCEv1KegVoE-yF67DUGlw6LONTYk86E35wiVvM0nwxydC_nh1gVVendWHHy3QYDbj3HZhc/s1600/Placeholder_TextBox_dengan_VBNET_C%23_1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Placeholder pada TextBox dengan VB.NET dan C#" border="0" height="100" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi-dmno3IaOyF0Kh-ykCXdD7oRZ1w5oIRqjlF9pS65Np54TaoVX_QdIw5s9SYthysGoHOYpL-cCEv1KegVoE-yF67DUGlw6LONTYk86E35wiVvM0nwxydC_nh1gVVendWHHy3QYDbj3HZhc/s1600/Placeholder_TextBox_dengan_VBNET_C%23_1.png" title="Membuat Placeholder pada TextBox dengan VB.NET dan C#" width="320" /></a></div>
<br />
3. Lalu ketikan source code dibawah ini<br />
<br />
VBNET<br />
<pre class="brush:html">' mengimport namespace
Imports System.Runtime.InteropServices

Public Class Form1
    ' mengimport user32.dll
    <dllimport charset:="CharSet.Auto)" user32.dll=""> _
    Private Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal msg As Integer, ByVal wParam As Integer, <marshalas nmanagedtype.lpwstr=""> ByVal lParam As String) As Int32
    End Function

Private Const EM_SETCUEMBANNER As Integer = 5377

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' memanggil fungsi untuk membuat placeholder pada txt_blog dan txt_nama
        SendMessage(txt_blog.Handle, EM_SETCUEMBANNER, 0, "Alamat Blog")
        SendMessage(txt_nama.Handle, EM_SETCUEMBANNER, 0, "Nama")
    End Sub
End Class</marshalas></dllimport></pre>
C#<br />
<pre class="brush:html">using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
// mengimport namespace
using System.Runtime.InteropServices;

namespace _Tutorial_Koding__C_Placeholder_Textbox
{
    public partial class Form1 : Form
    {
        // mengimport user32.dll
        [DllImport("user32.dll", CharSet = CharSet.Auto)]
        private static extern Int32 SendMessage(IntPtr hWnd, int msg, int wParam, [MarshalAs(UnmanagedType.LPWStr)]string iParam);

private const int EM_SETCUEBANNER = 0x1501;

public Form1()
        {
            InitializeComponent();
        }

private void Form1_Load(object sender, EventArgs e)
        {
            // memanggil fungsi untuk membuat placeholder pada txt_blog dan txt_nama
            SendMessage(txt_blog.Handle, EM_SETCUEBANNER, 0, "Alamat Blog");
            SendMessage(txt_nama.Handle, EM_SETCUEBANNER, 0, "Nama");
        }
    }
}</pre>
<br />
4. Jalankan program tersebut dengan menekan F4 maka hasilnya akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEix7ssXPxn3KMqFRaijSgnw-d5bfsMpUyWRDpuc6exc7Y3VKhs8FJbrN0N7L5xzh1wjux-gFhOHpb5jCCt7UWRvPUcrPEQakF1nbiUBucl-HPUmwqm3QbjvqWVLMBEkt6qJNV5cl8PIVmrQ/s1600/Placeholder_TextBox_dengan_VBNET_C%23_2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Placeholder pada TextBox dengan VB.NET dan C#" border="0" height="101" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEix7ssXPxn3KMqFRaijSgnw-d5bfsMpUyWRDpuc6exc7Y3VKhs8FJbrN0N7L5xzh1wjux-gFhOHpb5jCCt7UWRvPUcrPEQakF1nbiUBucl-HPUmwqm3QbjvqWVLMBEkt6qJNV5cl8PIVmrQ/s1600/Placeholder_TextBox_dengan_VBNET_C%23_2.png" title="Membuat Placeholder pada TextBox dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhue-4E0UpPi_prHNeun6YR_NzlzeHY0TG8JPr1FD4afznN-5_czxV3XSbvRCZQkgRl0j_QytUUPnP48go9c1klUvUnzkG_fA6QBK-Gj1cy-AHPWI6MehuAKh6Mp4SKC6NBdSInmdxIH6e6/s1600/Placeholder_TextBox_dengan_VBNET_C%23_3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Placeholder pada TextBox dengan VB.NET dan C#" border="0" height="101" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhue-4E0UpPi_prHNeun6YR_NzlzeHY0TG8JPr1FD4afznN-5_czxV3XSbvRCZQkgRl0j_QytUUPnP48go9c1klUvUnzkG_fA6QBK-Gj1cy-AHPWI6MehuAKh6Mp4SKC6NBdSInmdxIH6e6/s1600/Placeholder_TextBox_dengan_VBNET_C%23_3.png" title="Membuat Placeholder pada TextBox dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://adf.ly/r1bTo" rel="nofollow" target="_blank">VB.NET</a> | <a href="http://adf.ly/r1bSO" rel="nofollow" target="_blank">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH" target="_blank">disini</a></div>
<br />
Sekian dari saya.<br />
Terima kasih atas kunjugannya semoga bermanfaat

Membuat Placeholder pada TextBox dengan VB.NET dan C#

Setelah cukup lama saya tidak memposting tutorial, maka pada pagi hari ini saya akan memposting tentang Membuat Placeholder pada TextBox ...

Monday, August 11, 2014

Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang <a href="http://dwirandyherdinanto.blogspot.com/2014/07/filter-kata-kata-burukkotor-dengan.html" target="_blank">Filter Kata-Kata Buruk/Kotor dengan VB.NET dan C#</a> pada sore kali ini saya akan membahas tentang <a href="http://adf.ly/qWmle" rel="" target="_blank">Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#.</a><br />
<div>
Mungkin terkadang anda ingin merubah value pada textbox dari 100000 menjadi Rp1.000.000 agar lebih mudah dibaca oleh user/pengguna, oke langsung saja</div>
<div>
<br /></div>
<div>
Langkah - langkah Membuat<a href="http://adf.ly/qWmle" target="_blank"> Format Currency/Mata Uang Indonesia dengan VB.NET dan C#</a></div>
<div>
<br /></div>
<div>
1. Buka Visual Studio anda lalu tambahkan 1 buah label dan juga textbox, dan atur lah tata letaknya seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg5xuswshUaQ97o_J8bFWN7babsK5SHsm0e9doOFItgeJwDtGKzgzVBzVBWGFCBIIYJjLfOl7sOWnI6plkk8vC8ABjh216IDVIgA2kNT2nE3jqEdN2ZgaIpQcQ3hfM5WZeTKbKbKDOm5kA4/s1600/format_currency_vbnet_dan_C%23+3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" border="0" height="151" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg5xuswshUaQ97o_J8bFWN7babsK5SHsm0e9doOFItgeJwDtGKzgzVBzVBWGFCBIIYJjLfOl7sOWnI6plkk8vC8ABjh216IDVIgA2kNT2nE3jqEdN2ZgaIpQcQ3hfM5WZeTKbKbKDOm5kA4/s1600/format_currency_vbnet_dan_C%23+3.png" title="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" width="320" /></a></div>
<br /></div>
<div>
2. Pada Event Form_Load ketikan script dibawah ini<br />
VB.NET<br />
<pre class="brush:html">' merubah cultureinfo menjadi indonesia
System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("id-ID")
System.Threading.Thread.CurrentThread.CurrentUICulture = New System.Globalization.CultureInfo("id-ID")

textBox1.Text = FormatCurrency(0)</pre>
C#<br />
<pre class="brush:html">// merubah cultureinfo menjadi indonesia
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("id-ID");
System.Threading.Thread.CurrentThread.CurrentUICulture = new System.Globalization.CultureInfo("id-ID");

textBox1.Text = Convert.ToDecimal(0).ToString("c");</pre>
<br />
3. Pada Event textbox1_KeyPress ketikan script dibawah ini<br />
VBNET<br />
<pre class="brush:html">If ((e.KeyChar >= Convert.ToChar(48)) AndAlso (e.KeyChar <= Convert.ToChar(57))) Then ' 0 - 9
    e.Handled = False
ElseIf (e.KeyChar = Convert.ToChar(8)) Then ' backspace
    e.Handled = False
ElseIf (e.KeyChar = Convert.ToChar(13)) Then ' enter
    e.Handled = False
Else
    e.Handled = True
End If</pre>
C# <br />
<pre class="brush:html">if (e.KeyChar >= Convert.ToChar(48) && e.KeyChar <= Convert.ToChar(57)) // 0 - 9
{
    e.Handled = false;
}
else if (e.KeyChar == Convert.ToChar(8)) // backspace
{
    e.Handled = false;
}
else if (e.KeyChar == Convert.ToChar(13)) // enter
{
    e.Handled = false;
}
else
{
    e.Handled = true;
}</pre>
<br />
4. Pada Event textbox1_TextChanged ketikan script dibawah ini<br />
VBNET<br />
<pre class="brush:html">If textBox1.Text.Length <= 2 Then ' jika panjang karakter pada textbox1 <= 2
    textBox1.Text = FormatCurrency(0) ' menampilkan Rp0
Else ' jika tidak
    textBox1.Text = FormatCurrency(textBox1.Text) ' mengubah format pada textbox1 menjadi currency
    textBox1.SelectionStart = textBox1.Text.Length '  menetapkan titik awal dari teks yang dipilih pada textbox
End If</pre>
C# <br />
<pre class="brush:html">if (textBox1.Text.Length <= 2) // jika panjang karakter pada textbox1 <= 2
{
    textBox1.Text = Convert.ToDecimal(0).ToString("c"); // menampilkan Rp0
}
else // jika tidak
{
    textBox1.Text = decimal.Parse(textBox1.Text, System.Globalization.NumberStyles.Currency).ToString("c"); // mengubah format pada textbox1 menjadi currency
    textBox1.SelectionStart = textBox1.Text.Length; // menetapkan titik awal dari teks yang dipilih pada textbox
}</pre>
<br />
5. Jalankan program tersebut dengan menekan F5 maka tampilannya akan seperti gambar dibawah ini<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjU43P8TL3jS0Wnn8bfJHJoYiCu2XdPxDtSDoTFlMgXxlgGygDDwQKDXVENH0JvdWU1PZrKT7aNp5qnRActa3vmofcrvWMBmvn9bcLpjitmAtts5kmtCRGR6aWe457lcUY3DFvsEqmlrcmF/s1600/format_currency_vbnet_dan_C%23.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" border="0" height="147" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjU43P8TL3jS0Wnn8bfJHJoYiCu2XdPxDtSDoTFlMgXxlgGygDDwQKDXVENH0JvdWU1PZrKT7aNp5qnRActa3vmofcrvWMBmvn9bcLpjitmAtts5kmtCRGR6aWe457lcUY3DFvsEqmlrcmF/s1600/format_currency_vbnet_dan_C%23.png" title="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiWGgnv_PNdlP03C1zctNiCPMNoAEKv1K5lZb5aTKI4MMEJfw5veiFj5Pu5vgIlwY3KKdB4ikrWR5uXyMctacJ2iUSG-hnLeHUKua5y1b4zXzaMRCid-l_TdiRT7ft1YvTINl4zgLkSUWba/s1600/format_currency_vbnet_dan_C%23+2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img alt="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" border="0" height="149" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiWGgnv_PNdlP03C1zctNiCPMNoAEKv1K5lZb5aTKI4MMEJfw5veiFj5Pu5vgIlwY3KKdB4ikrWR5uXyMctacJ2iUSG-hnLeHUKua5y1b4zXzaMRCid-l_TdiRT7ft1YvTINl4zgLkSUWba/s1600/format_currency_vbnet_dan_C%23+2.png" title="Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#" width="320" /></a></div>
<br />
<div style="text-align: center;">
Anda dapat mendownload source codenya dibawah ini</div>
<div style="text-align: center;">
| <a href="http://adf.ly/qWqTa" rel="nofollow" target="_blank">VB.NET</a> | <a href="http://adf.ly/qWqRW" target="_blank">C#</a> |</div>
<div style="text-align: center;">
Untuk password silahkan klik <a href="http://adf.ly/fHCDH" rel="nofollow" target="_blank">disini</a></div>
<br />
Sekian dari saya.<br />
Terima kasih atas kunjugannya semoga bermanfaat</div>

Membuat Format Currency/Mata Uang Indonesia dengan VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang Filter Kata-Kata Buruk/Kotor dengan VB.NET dan C# pada sore kali ini saya akan memb...

Wednesday, July 23, 2014

Tutorial Koding