Latihan Pertama Menampilkan Hasil Inputan

<span style="font-family: Arial, Helvetica, sans-serif;">Latihan Pertama Menampilkan Hasil Inputan</span><br /><span style="font-family: Arial, Helvetica, sans-serif;"><br /></span><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: Arial, Helvetica, sans-serif;"><img border="0" height="257" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg4N29JUF22GCr56b3dKxdoR4P28TjiQ-8zONklxMbIQR2DRdQWJ1JcJl-IIy1nNfG4J1Z3RWXPemd-7BRPhncj0pN6u65K_PR18_YJewwbFK08uI1vEIfpFgOTxYM-Q1Gfgre4ig1M5umA/s320/Screenshot_3.png" width="320" /></span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: Arial, Helvetica, sans-serif;"><br /></span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: Arial, Helvetica, sans-serif;">Coding nya :</span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: Arial, Helvetica, sans-serif;"><br /></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-family: Arial, Helvetica, sans-serif;"><span style="color: blue; font-size: 10pt;">Public</span><span style="font-size: 10pt;"> <span style="color: blue;">Class</span> PrLatihan3<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btKeluar_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> btKeluar.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        <span style="color: blue;">If</span>MsgBox(<span style="color: #a31515;">"Anda Yakin Ingin Keluar dari Aplikasi Ini"</span>, vbYesNo + vbQuestion + vbDefaultButton2, <span style="color: #a31515;">"Keluar"</span>) = vbYes <span style="color: blue;">Then<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">            <span style="color: blue;">Me</span>.Close()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        <span style="color: blue;">End</span> <span style="color: blue;">If<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btBersih_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> btBersih.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        txtNama.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        txtAlamat.ResetText()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        txtUmur.Text = <span style="color: #a31515;">""<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        txtNama.Focus()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btTampilkan_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> btTampilkan.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">        MsgBox(<span style="color: #a31515;">"Nama Anda Adalah :"</span> & txtNama.Text & vbNewLine & _<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">               <span style="color: #a31515;">"Alamat Anda Adalah :"</span> & txtAlamat.Text & vbNewLine & _<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">               <span style="color: #a31515;">"Sekarang Umur Anda Adalah :"</span> & txtUmur.Text & vbNewLine)<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: Arial, Helvetica, sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="separator" style="clear: both; text-align: justify;"> </div><div class="MsoNormal"><span style="font-family: Arial, Helvetica, sans-serif;"><span style="color: blue; font-size: 10pt; line-height: 115%;">End</span><span style="font-size: 10pt; line-height: 115%;"> <span style="color: blue;">Class</span></span></span><span lang="EN-US" style="color: blue; font-family: "Courier New"; font-size: 10.0pt; line-height: 115%; mso-ansi-language: EN-US; mso-no-proof: yes;"><o:p></o:p></span></div><span style="font-family: Arial, Helvetica, sans-serif;"><br /></span>

Latihan Pertama Menampilkan Hasil Inputan

Latihan Pertama Menampilkan Hasil Inputan Coding nya : Public Class PrLatihan3     Private Sub btKeluar_Click( ByVal sender As System.O...

Read more »

Latihan Pertama Menampilkan Nilai Object

<span style="color: #a31515; font-size: 10pt; line-height: 115%;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Latihan Pertama Menampilkan Nilai Object</span></span><br /><span style="color: #a31515; font-size: 10pt; line-height: 115%;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></span><br /><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><img border="0" height="207" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg91BxANsALXi7_r4B5f3mOfjrAA8mj_uis7OtoczKwv5h-PygsTEAU2wiXrpBQMzV8KFD776e57-7vTKrQCPWFJDC7FknQxFXOZZeQ73OfI3V9BE0o-6VIZgpd7IJ2sc4BR_9Meiv3aDu0/s320/Screenshot_2.png" width="320" /></span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Coding nya :</span></div><div class="separator" style="clear: both; text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue; font-size: 10pt;">Public</span><span style="font-size: 10pt;"> <span style="color: blue;">Class</span> Frlatihan1<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> Form1_Load(<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> <span style="color: blue;">MyBase</span>.Load<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: green;">'---mengisi properti objek Form<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.Text = <span style="color: #a31515;">"Latihan Pertama Menampilkan Nilai Object"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: green;">'---Mengisi objek label<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.lblNim.Text = <span style="color: #a31515;">"No.Induk Mahasiswa"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.lblNama.Text = <span style="color: #a31515;">"Nama Lengkap"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.lblKelamin.Text = <span style="color: #a31515;">"Jenis Kelamin"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.lblAlamat.Text = <span style="color: #a31515;">"Alamat lengkap"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.lblKota.Text = <span style="color: #a31515;">"Asal Kota"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: green;">'---mengisis objek Button<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.btList.Text = <span style="color: #a31515;">"&List"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.btClear.Text = <span style="color: #a31515;">"&Clear"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.btExit.Text = <span style="color: #a31515;">"&Exit"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btList_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> btList.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtNim.Text = <span style="color: #a31515;">"2007-001"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtNama.Text = <span style="color: #a31515;">"Zen Munawar ST"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtKelamin.Text = <span style="color: #a31515;">"Pria"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtAlamat.Text = <span style="color: #a31515;">"Jl. Gatsu No 123, Binong Jati"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtKota.Text = <span style="color: #a31515;">"Bandung"<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btClear_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> btClear.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtNim.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtNama.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtKelamin.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtAlamat.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtKota.Clear()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.txtNim.Focus()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><br /></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">Private</span> <span style="color: blue;">Sub</span> btExit_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> btExit.Click<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">        <span style="color: blue;">Me</span>.Close()<o:p></o:p></span></span></div><div class="MsoNormal" style="line-height: normal; margin-bottom: 0.0001pt; text-align: justify;"><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;">    <span style="color: blue;">End</span> <span style="color: blue;">Sub<o:p></o:p></span></span></span><br /><span style="font-size: 10pt;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue;"><br /></span></span></span></div><div class="separator" style="clear: both; text-align: justify;"></div><div class="MsoNormal" style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="color: blue; font-size: 10pt; line-height: 115%;">End</span><span style="font-size: 10pt; line-height: 115%;"> <span style="color: blue;">Class</span></span></span><span lang="EN-US" style="color: blue; font-family: "courier new"; font-size: 10.0pt; line-height: 115%;"><o:p></o:p></span><br /><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="font-size: 10pt; line-height: 115%;"><span style="color: blue;"><br /></span></span></span><span style="font-family: "arial" , "helvetica" , sans-serif;"><span style="font-size: 10pt; line-height: 115%;"><span style="color: blue;"><a href="http://cbiciamis.lkp.disdikbudcms.net/html/download.php?id=lihmateri&kode=55">Download di sini PDF</a></span></span></span></div><span style="color: #a31515; font-size: 10pt; line-height: 115%;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></span>

Latihan Pertama Menampilkan Nilai Object

Latihan Pertama Menampilkan Nilai Object Coding nya : Public Class Frlatihan1     Private Sub Form1_Load( ByVal sender As System.Object...

Read more »

Materi VISUAL BASIC

<span style="font-family: "arial" , "helvetica" , sans-serif;">Materi VISUAL BASIC</span><br /><br /><div class="separator" style="clear: both; text-align: center;"><img border="0" height="386" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjXHNSiICEYZPe0m9pddBbwBUpjNHZmaSbwSLUdqIYoQqnXh5d8dOsK-zs-A4psMOLP4z0Pu1i4z6z2DpXhwfnuT7cm0URLyXqRsRc660V19P5zi2dCgC2duxowRUPbG9EJLhaddUkvUHyU/s640/indonesia_wallpaper_by_ghozai-d3kqb61.jpg" width="640" /></div><ol><li><span style="font-family: "arial" , "helvetica" , sans-serif;"><a href="http://cbiciamis.lkp.disdikbudcms.net/html/download.php?id=lihmateri&kode=55">Materi Pertemuan Pertama</a></span></li><li><span style="font-family: "arial" , "helvetica" , sans-serif;"><a href="http://cbiciamis.lkp.disdikbudcms.net/html/download.php?id=lihmateri&kode=56">Materi Pertemuan Kedua</a></span></li><li><span style="font-family: "arial" , "helvetica" , sans-serif;">Materi Pertemuan Ketiga</span></li></ol>

Materi VISUAL BASIC

Materi VISUAL BASIC Materi Pertemuan Pertama Materi Pertemuan Kedua Materi Pertemuan Ketiga

Read more »

Materi Program Paket Niaga II PPN II

<div dir="ltr" style="text-align: left;" trbidi="on"> <span style="font-family: "arial" , "helvetica" , sans-serif;">Materi Program Paket Niaga II PPN II</span><br /> <br /> <div class="separator" style="clear: both; text-align: center;"> <img border="0" height="400" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgHltf-L0_b7-XuOFnZ8Rf7I9tfAXhHbBwmEA39tSAlImzCsAdP_RWVdbsakFSxvBNOXtxhuNCOp05kirFGVWFeg2hC3KXBuLMqrHRPZAJ6S34wLIZ_JG696-juNH0wl3JX79F-UC58aFbi/s640/unnamed.jpg" width="640" /></div> <ol> <li><span style="font-family: "arial" , "helvetica" , sans-serif;">Materi PPN2- Ms Power Point 2007</span></li> <li><span style="font-family: "arial" , "helvetica" , sans-serif;">Materi PPN2- Ms Access</span></li> </ol> </div>

Materi Program Paket Niaga II PPN II

Materi Program Paket Niaga II PPN II Materi PPN2- Ms Power Point 2007 Materi PPN2- Ms Access

Read more »

Bisnis Kerupuk Padang Pasir Omset 90 juta/bulan

<div class="separator" style="clear: both; text-align: justify;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh-QVY86XW3oRSTAoyIdm9jl4Q89ezSha08kHaMITQQx4L1M9yUfOAxRjpjM7Zp7ATG1wronXuo8WUmjzIec8aI9crM5rva5-dGcL0NNTCjkdgRSUXxFJ7xSQz4A12uJBMUPE9ti77vQnGC/s1600/Bisnis-Kerupuk-Padang-Pasir1.jpg" imageanchor="1" style="margin-left: 1em; margin-right: 1em; text-align: center;"><img border="0" height="132" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh-QVY86XW3oRSTAoyIdm9jl4Q89ezSha08kHaMITQQx4L1M9yUfOAxRjpjM7Zp7ATG1wronXuo8WUmjzIec8aI9crM5rva5-dGcL0NNTCjkdgRSUXxFJ7xSQz4A12uJBMUPE9ti77vQnGC/s200/Bisnis-Kerupuk-Padang-Pasir1.jpg" width="200" /></a><span style="font-family: "arial" , "helvetica" , sans-serif;">Kedengarannya Aneh jika kita belum pernah dengar yang namanya “Kerupuk Padang Pasir”. Sebutan kerupuk Padang pasir sangat beralasan karena proses penggorengannya yang dilakukan dengan menggunakan media pasir halus</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Bambang Suparno (49), warga Dusun Jeruk, Desa Tugurejo, Kecamatan Ngasem, Kabupaten Kediri, Jawa Timur, ini patut diacungi jempol. Dari usahanya berdagang kerupuk goreng pasir, mantan buruh migran ini dapat mengantongi omzet hingga Rp 90 juta per bulan.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Pekerjaan yang dilakukan Bambang adalah menggoreng kerupuk tanpa minyak. Ia mengganti minyak goreng dengan pasir halus hasil penyaringan. Dengan bantuan pengapian, kerupuk tetap mekar. Cara penggorengan inilah yang membuat jenis kerupuk ini disebut kerupuk padang pasir.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Kerupuk yang digoreng dengan teknik ini rasanya akan sedikit berbeda jika dibandingkan dengan yang menggunakan minyak goreng. Kelebihan lain adalah rendah kolesterol dan tentu saja lebih hemat dalam menekan biaya produksi. Bahkan, risiko untuk melempem dapat ditekan karena dapat didaur ulang.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Varian rasanya juga bernacam-macam. Setidaknya ada tujuh rasa yang dibuat oleh pria yang memulai usahanya sejak tahun 2001 ini. Ada rasa pedas, manis, pedas manis, terasi, rujak, seledri, bawang, serta ubi. Pemberian rasa dilakukan dengan dua cara, yaitu bumbu dicampur dengan kerupuk sebelum digoreng atau dicampur setelah digoreng.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Kerupuk yang selesai digoreng kemudian dikemas dalam plastik ukuran setengah kilogram dan panjang 30-40 sentimeter. Setiap bungkus ukuran besar ia jual seharga Rp 1.000-Rp 2.500. Tiap rasa juga memengaruhi harga.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Kerupuk yang sudah dikemas kemudian dikirim kepada agennya yang tersebar di beberapa kota, seperti Kediri, Nganjuk, Kertosono, Jombang, Bojonegoro, Tuban, Ngawi, Malang, dan Sidoarjo. Agen tersebut adalah pedagang di pusat oleh-oleh di kota masing-masing.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Bisnis Kerupuk Padang Pasir1Bambang termasuk pengusaha yang ulet dalam bekerja. Untuk usahanya itu, ia hanya mempekerjakan empat tenaga pria yang bertugas mulai dari menjemur kerupuk hingga menggoreng. Pengemasan dilakukan oleh istri dan enam anaknya serta beberapa tenaga borongan yang juga para tetangganya.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">“Kalau saya sendiri bertugas di pengaturan serta pengiriman barang ke kota-kota,” kata pemilik usaha penggorengan kerupuk padang pasir dengan merek Arofah ini, Senin (4/6/2012). Perkembangan usahanya lumayan bagus. Pada awal memulainya, ia hanya memproduksi 30 kilogram kerupuk dan itu pun untuk beberapa hari. Karena permintaan yang selalu ada, ia terus terpacu untuk mengembangkan usahanya sehingga kini produksi per hari mencapai 2,5 kuintal.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">“Kalau tentang omzet begini saja, harga bahan kerupuknya per kilo Rp.12.000, lalu kalikan 250 kilogram, dikali lagi selama 30 hari. Berapa itu hasilnya, silakan dikira-kira sendiri,” ungkapnya.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">Menemukan jenis usaha ini bukanlah jalan yang mudah baginya. Beberapa profesi pernah ia jalani, mulai dari kuli bangunan di negeri seberang hingga penjual bakso keliling. Pernah pula ia hendak berdagang oli pelumas sesuai ajakan rekannya, tetapi urung dilakukan karena khawatir dengan risikonya.</span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div><div style="text-align: justify;"><span style="font-family: "arial" , "helvetica" , sans-serif;">“Saya berjualan kerupuk karena melihat saudara saya ada di bidang ini. Setelah saya pelajari, saya menjadi yakin sehingga saya ikut terjun,” tutur Bambang sambil mengingat masa lalunya.</span></div>

Bisnis Kerupuk Padang Pasir Omset 90 juta/bulan

Kedengarannya Aneh jika kita belum pernah dengar yang namanya “Kerupuk Padang Pasir”. Sebutan kerupuk Padang pasir sangat beralasan karena p...

Read more »

Materi Program Paket Niaga I

<span style="font-family: "arial" , "helvetica" , sans-serif;">DAFTAR ISI</span><br /><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span><br /><div class="separator" style="clear: both; text-align: left;"><img border="0" height="385" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjXHNSiICEYZPe0m9pddBbwBUpjNHZmaSbwSLUdqIYoQqnXh5d8dOsK-zs-A4psMOLP4z0Pu1i4z6z2DpXhwfnuT7cm0URLyXqRsRc660V19P5zi2dCgC2duxowRUPbG9EJLhaddUkvUHyU/s640/indonesia_wallpaper_by_ghozai-d3kqb61.jpg" width="640" /></div><span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span><ol><li><span style="font-family: "arial" , "helvetica" , sans-serif;"><a href="https://drive.google.com/open?id=0B88qqVkO4O1NVnFlelh2dm5XQ28">Materi 1 - PPN1 - MsWord</a></span></li><li><span style="font-family: "arial" , "helvetica" , sans-serif;"><a href="https://drive.google.com/open?id=0B88qqVkO4O1NTFhSMkVJM2JkNUE">Materi 1 - PPN1 - EXCEL - LEMBAR KERJA MAHASISWA</a></span></li></ol>

Materi Program Paket Niaga I

DAFTAR ISI Materi 1 - PPN1 - MsWord Materi 1 - PPN1 - EXCEL - LEMBAR KERJA MAHASISWA

Read more »

Perkenalan Pribadi

<div dir="ltr" style="text-align: left;" trbidi="on"> <span style="font-family: "arial" , "helvetica" , sans-serif;">Data Pribadi</span><br /> <span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span> <div class="separator" style="clear: both; text-align: center;"> <a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjDcDD82bwJKsLRC4kODZdhDio_Mu4iTgTqergMwEj_XKSEuOHBNO1ZdkzhIB8Krfy4o7XjvrkFKplbDnpbGjFHgsqmkm5QLQvvtj-kgY5BPr99kigKsrwl-YiTDx3T42x-f2sDc5-m0SPW/s1600/28112aaa.jpg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="200" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjDcDD82bwJKsLRC4kODZdhDio_Mu4iTgTqergMwEj_XKSEuOHBNO1ZdkzhIB8Krfy4o7XjvrkFKplbDnpbGjFHgsqmkm5QLQvvtj-kgY5BPr99kigKsrwl-YiTDx3T42x-f2sDc5-m0SPW/s200/28112aaa.jpg" width="197" /></a></div> <span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span><span style="font-family: "arial" , "helvetica" , sans-serif;">Nama lengkap : Aceng Taofik, S.Kom</span><br /> <span style="font-family: "arial" , "helvetica" , sans-serif;">Alamat :</span><br /> <span style="font-family: "arial" , "helvetica" , sans-serif;">Tempat, Tanggal Lahir :</span><br /> <span style="font-family: "arial" , "helvetica" , sans-serif;"><br /></span></div>

Perkenalan Pribadi

Data Pribadi Nama lengkap : Aceng Taofik, S.Kom Alamat : Tempat, Tanggal Lahir :

Read more »