membuat fungsi pencarian di vb net 2008 or 2010

<h3 class="post-title entry-title" itemprop="name" style="background-color: white; color: #666666; font-family: 'Trebuchet MS', Trebuchet, Verdana, sans-serif; font-size: 22px; margin: 0.75em 0px 0px; position: relative;"> fungsi pencarian....................</h3> <h3 class="post-title entry-title" itemprop="name" style="background-color: white; color: #666666; font-family: 'Trebuchet MS', Trebuchet, Verdana, sans-serif; font-size: 22px; font-weight: normal; margin: 0.75em 0px 0px; position: relative;"> Membuat Fungsi Pencarian Data (VB.NET)</h3> <div class="post-header" style="background-color: white; color: #666666; font-family: 'Trebuchet MS', Trebuchet, Verdana, sans-serif; font-size: 11px; line-height: 1.6; margin: 0px 0px 1.5em;"> <div class="post-header-line-1"> </div> </div> <div class="post-body entry-content" id="post-body-6008585264862376622" itemprop="articleBody" style="background-color: white; color: #666666; font-family: 'Trebuchet MS', Trebuchet, Verdana, sans-serif; font-size: 13px; line-height: 1.4; position: relative; width: 546px;"> <div dir="ltr" trbidi="on"> <div class="separator" style="clear: both; text-align: center;"> </div>  Tutorial kali ini kita akan membahas mengenai cara untuk membuat pencarian data di VB.Net<br /> <a href="https://www.blogger.com/null" name="more"></a><br /> berikut adalah source code untuk membuat tombol dengan fungsi pencarian data :<br /> <br /> <br /> <br /> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="color: blue; font-family: "courier new"; font-size: 10pt;">Imports</span><span style="font-family: "courier new"; font-size: 10pt;"> System.Data</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="color: blue; font-family: "courier new"; font-size: 10pt;">Imports</span><span style="font-family: "courier new"; font-size: 10pt;"> System.Data.SqlClient</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="color: blue; font-family: "courier new"; font-size: 10pt;">Public</span><span style="font-family: "courier new"; font-size: 10pt;"> <span style="color: blue;">Class</span> F_CARI</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Public</span> dtadapter <span style="color: blue;">As</span> SqlDataAdapter = <span style="color: blue;">Nothing</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Public</span> SQL1 <span style="color: blue;">As</span> <span style="color: blue;">String</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Public</span> koneksi <span style="color: blue;">As</span> <span style="color: blue;">String</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Public</span> conn <span style="color: blue;">As</span> <span style="color: blue;">New</span> SqlConnection</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: green;">'----- sub untuk koneksi ke database, disini saya menggunakan ms.sql sever 2000----</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: green;">'  untuk koneksinya sendiri diubah sesuai dengan koneksi yang kalian gunakan</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Sub</span> konek()</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        koneksi = <span style="color: #a31515;">"Data Source=MALADOANK;Initial Catalog=BERBAGI;Integrated Security=true;User ID=mdbk;Password=123"</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        conn = <span style="color: blue;">New</span> SqlConnection(koneksi)</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        conn.Open()</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: green;">''===========fungsi button untuk pencarian id petugas</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> bt_CARI_Click(<span style="color: blue;">ByVal</span> sender <span style="color: blue;">As</span> System.Object, <span style="color: blue;">ByVal</span> e<span style="color: blue;">As</span> System.EventArgs) <span style="color: blue;">Handles</span> bt_CARI.Click</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        konek()</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        <span style="color: blue;">Dim</span> sql2 <span style="color: blue;">As</span> <span style="color: blue;">String</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        sql2 = <span style="color: #a31515;">"select * from PETUGAS where id_petugas like '%"</span> & TX_ID.Text & <span style="color: #a31515;">"%'"</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        dtadapter = <span style="color: blue;">New</span> SqlDataAdapter(sql2, conn)</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        <span style="color: blue;">Dim</span> SRT <span style="color: blue;">As</span> <span style="color: blue;">New</span> DataTable</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        SRT.Clear()</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        dtadapter.Fill(SRT)</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">        DataGridView1.DataSource = SRT</span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <span style="font-family: "courier new"; font-size: 10pt;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub</span></span></div> <div class="MsoNormal" style="line-height: normal; margin-bottom: 0cm;"> <br /></div> <div class="MsoNormal"> <span style="color: blue; font-family: "courier new"; font-size: 10pt; line-height: 15.333332061767578px;">End</span><span style="font-family: "courier new"; font-size: 10pt; line-height: 15.333332061767578px;"> <span style="color: blue;">Class</span></span></div> <div class="MsoNormal"> <br /></div> <div class="MsoNormal"> <span style="font-family: "courier new"; font-size: 10pt; line-height: 15.333332061767578px;"><span style="color: blue;"> </span></span>## Selamat mencoba, jika ada yang error atau ada yang belum paham silahkan tinggalkan komentar kalian. terima kasih.</div> </div> </div>

membuat fungsi pencarian di vb net 2008 or 2010

fungsi pencarian.................... Membuat Fungsi Pencarian Data (VB.NET)  Tutorial kali ini kita akan membahas mengenai cara ...

+ Baca selengkapnya »