Hari ini adalah hari pahlawan tepat pada tanggal 10 November 2016
Buat pembaca blogger, saya ingin mengucapkan
Selamat hari pahlawan 10 November
Semoga kita bisa terus berjuang seperti para pahlawan pahlawan negara kita. Amin

Salam dari Komunitas sepeda senusantara
KOSTI Sumut
Monkeybike Lowrider Medan
Gepes Medan
Geco Bike
ChopperBike Independent Medan
Semoga kita bisa menjadi pahlawan untuk keluarga, dan saudara saudara senusantar

Assalamu'alaikum

Dua tahun berlalu saya terjun di jalanan menggunakan Sepeda Lowrider chopper satu satunya ini.

Awalnya sih sepeda saya ini sangat sangat lah sederhana. sampai sekarang pun tetap aja sederhana kayaknya... :D

Intinya jangan pernah merasa malu dengan hal yang membuat mu tidak bisa berkembang.

jadikan lah hinaan sebagai motifasi dalam hidupmu. Apabila karya mu di hina seseorang, teruslah berkarya sampai kata hinaan tadi berubah menjadi pujian.

TIDAK ADA KATA TERLAMBAT KAWAN.

Ada banyak macam-macam sepeda lowrider yaitu:

• Stingray Lowrider. Boleh dibilang ini eyangnya sepeda lowrider, di tahun 1963 pabrikan sepeda Schwinn meluncurkannya dipasaran dan diberi nama “new cruiser stingray”, model yang mirip moge-moge yang ngetop pada saat itu.

image: lowrider bandung

• Cruiser Lowrider. Model cruiser biasanya identik dengan ukuran ban yang lebih besar (ukuran 26″), kalo dari segi kenyamanan, nyaman banget kalo buat riding.. nah sepeda model gini masih banyak terdapat di Belanda sampe sekarang.

image: roowery

• Limo Lowrider. Sesuai dengan namanya Limo = Limousine, panjaaaaaaaaang.. bentuknya unik, cuma rada ribet kalo mau nyari tempat parkir. Kalau spesifikasinya sih ga beda jauh dari Cruiser, cuma bedanya di framenya aja.

image: bursa klaten

• Basman Lowrider. Kalau diliat hampir mirip sama Cruiser, cuma model Basman ini jarang yang pakai springer. Kebanyakan pakai “Triple Three Fork”. Biasanya model gini lumayan langka, selain partnya lumayan susah, dan harganya pun lebih mahal.

image: lowrider bandung

• Chopper Lowrider. Basic nya mengacu pada moge-moge dengan ban belakang lebih kecil, tapi gambot.

sumber gambar : Situs Sepeda Indonesia

Kalau saya sih pengen nya buat model yang sangat extreme. Tapi, modalnya kurang. hehehe..

sangkin biar hematnya, saya motong besi pakai gergaji besi manual, dan bengkokkan besinya di selipan pohon jambu.

Apabila teman-teman ingin melihat perkembangan sepeda saya dari zaman ke zaman, klik di bawah ini:

1. Album Facebookku
2. Komunitas 1
3. http://r-joep.blogspot.co.id/2015/01/liburan-akhir-tahun-bersama-gepes-medan.html
4. http://lowrider-medan.blogspot.co.id/
5. Tahapan Awal Proses Dari Sepeda Saya

Terimakasih Telah berkunjung ke Blog saya..
maap apabila ada kesalahan dalam kata saya.
wabilahitopikwalhidayah wassalamu'alaikum wr.wb

Bosan banget nih  klo kuliah tak da dosen..

Selagi saya banyak waktu, pengen aja gitu di blog saya ada sejarah tentang sepeda lowrider atau sering juga di sebut sepeda custom bike.

Sepeda Low Rider pertama kali di perkenalkan pada tahun 1960an, sepeda ini pertama kali di perkenalkan oleh The “custom” king George Barris, sebelum menemukan sepeda low rider si Tuan King ini pekerjaanya adalah menceperkan mobil, Memang saat itu virus Mobil Low Rider sedang mewabah di kalangan anak muda Amerika, Tetapi trend itu hanya bisa dirasakan oleh anak2 muda dari keluarga kaya saja karena untuk membuat sebuah mobil low rider membutuhkan uang yang tidak sedikit, sementara anak2 dari kalangan bawah hanya bisa melongo.

Melihat situasi seperti itu si King mendapatkan ide dengan mencoba membangun sebuah sepeda yang mengacu pada kesan low rider, untuk eksperimen pertama kali si King menerapkan pada sepedanya. Mulailah si King ini memperkenalkan kreasinya dari situ bisa di tebak banyak anak2 dari keluarga yang kurang mampu beralih berkreasi membuat sepeda low rider.

Melihat peluang trend sepeda LR yang mulai di gandrungi akhirnya pada tahun 1963 pabrik sepeda SCHWIIN untuk pertama kalinya mengeluarkan model revolusi baru “New Cruiser STING RAY, model ini dibuat mengacu pada model motor model dragster yang sedang ngetop pd saat itu.Karena model tersebut nyaman di kendarai begitu juga dengan desainnya yg unik maka model tersebut menjadi booming dan digemari oleh anak2 muda.

Model Sting Ray

Dikalangan sekelompok anak muda di daerah selatan Los Angeles Chicanos sepeda Low Rider banyak yang telah di modifikasi seperti framenya, fork di buat spring fork trus dikasih tambahan spion dan yang paling extreme adalah frame di buat lebih ceper / pendek lagi, tapi kebanyakan dari mereka adalah memendekannya. Pabrikan sepeda Schwiin juga tidak mau kalah terispirasi kaum latin yang suka blink-blink maka mereka menambahkan lapisan krom pada sepeda buatannya seperti mobil2 low rider.

II. Sejarah Sepeda Lowrider di IndonesiaSepeda jenis Lowrider masuk ke Indonesia sekitar akhir tahun 70an dengan sebutan yang bermacam-macam seperti salah satunya sepeda kumbang mini. Karena waktu peredaran atau penyebaran yang terbilang sempit kurang lebih sepuluh tahun, menjadikan sepeda jenis ini berjumlah lebih sedikit dibandingkan sepeda jenis ontel, MTB, mini dan BMX. Selain dari Indonesia, kebanyakan sepeda lowrider dengan jenis stingray 20 dan beach cruiser 26 didatangkan (import) dari negara-negara asia seperti jepang dan cina, walaupun terdapat pula sebagian kecil dari benua barat seperti Amerika dan Eropa. Dari Indonesia merk yang terkenal adalah Benny Indonesia, dari Jepang terkenal dengan merk Benny Japan, Fuji Feather, dan lain-lain, negara Cina dengan Phoenix dan negara benua barat dengan Schwinn (Chicago AS), Raleigh (Inggris), Stelber (Amerika), Murray (Amerika), Western Flyer (Amerika) atau pun dari Lowrider Bicycle Inc (Amerika/Australia).

Aliran Lowrider atau yang sering disebut dengan ceper masuk Indonesia sekitar pertengahan 90an. Pada awalnya Lowrider hanya dilakukan untuk kendaraan bermotor khususnya mobil. Karena modal yang dikeluarkan tidaklah terlalu mahal, banyak yang mengadopsi aliran ini. Pada akhir ‘90 aliran ini banyak diadopsi oleh para pemakai sepeda motor. Untuk sepeda sendiri tidak ada yang tahu pasti kapan aliran Lowrider mulai diikuti, sekitar tahun 2003 seiring dengan banyaknya pemakai dan pemodifikasi sepeda motor yang tertarik memainkan sepeda jenis ini, aliran lowrider pun mulai banyak dikuti sebagai dasar memodifikasi sepeda.

=> Beberapa Gambar Yang dapat saya tampilkan:

 Maap jika gambar sepeda saya jelek.. :)karna memang jelek :D

post saya copy dari http://sepedalowrider.weebly.com/sejarah.html

بِسْمِ اللّهِ الرَّحْمَنِ الرَّحِيْمِ

السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

 

 Pada Artikel kali ini saya akan membahas Apa itu "GePeS"???

Pada awalnya GePeS itu adalah singkatan dari "Generasi Pecinta Sepeda"

Sebenarnya lebih cocok Gerakan Pendayung Sepeda. Karena kebanyakan dari kami lebih suka mendayung sepedanya daripada mencintai sepedanya.

Misalnya Sepeda BMX. Itu sepeda dibuat untuk di angkat-angkat. Atau istilahnya jemping. Berarti kan tidak ada rasa sayangnya dengan sepeda. :D . Tapi, memang itu pulak fungsinya sepeda itu. dibuat untuk freestyle atau street agar hidupnya suasana.

GePeS ini bisa juga dibilang sebagai comunitas. Dulunya sih sekedar isenk doang buat logo ini. Sekedar belajar desain.

Tapi, di satu sisi saya ingin menyatukan anak-anak bersepeda di sekitar saya agar bisa berkumpul dan terjadi adanya kekompakan.

Pada Logo ini semuanya mempunyai makna masing-masing yaitu:

=> Lambang lingkar. Jadi, di komunitas ini semua sepeda bisa ikut. Karna apa pun bentuk sepedanya, pasti menggunakan lingkar yang berbentuk lingkaran.

=> Topi : Atau penutup kepala. baik itu helem, sapu tangan, atau apalah. Buat kenyamanan masing2.

=> Kacamata : Kesel x rasanya kalau naik sepeda di dahului oleh mobil. Karena mereka selalu saja menaikkan abu-abu di jalanan. Jadi, biar mata tetap sehat, pakailah pelindung.

=> Masker : sama juga agar udara kotor yang kita hirup tersaring.

=> Kunci Inggris : Kunci ini adalah kunci yang bisa membuka baut besar dan kecil. Kerenggangan dapat disesuaikan. Jadi, kita tak payah bawa kunci banyak -banyak.

Kalau kepala sengaja saya ambil kepala tengkorak.

karena kepala tengkorak bisa awet sampai bertahun-tahun, Bahkan berabad-abad. 

Semoga komunitas ini dapat bertahan lama. dan bisa dikenang di saat kami tua nanti.

GePeS di publikkan pada tanggal "9 Maret 2014"

Bendera Gepes pertama kali dikibarkan tanggal 27 Desember 2014 di Pantai Pondok Permai.

Di komunitas ini Yang kaya, miskin, tua, dan muda semua sama saja. 

Begitu juga dengan spedanya. BMX, Sepeda Lowrider, Chopper, dan lain sbagainya bole gabung.

 

Demikian lah Artikel ini saya sampaikan

Jika ada kata-kata saya yang tidak sopan, atau kata yang salah, jangan segan-segan tuk memberi komentar.

 

وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

 

Hormat Kami

 

 

Gepes Medan

بِسْمِ اللّهِ الرَّحْمَنِ الرَّحِيْمِ 

السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Tepatnya tanggal 27 Desember 2014.

Momen akhir tahun. Bingung ingin jalan-jalan di akhir tahun.

berhubung semuanya pada libur, kami mewujudkan impian tuk bersepeda ke pantai.

awalnya sih banyak peminatnya. Tapi, pas hari keberangkatannya, hanya 7 orang yg bisa.

Berkurangnya pasukan bukanlah hal yang mematahkan semangat kami.

akhirnya kami berangkat jam 4 pagi dari medan amplas. Walaupun kami bersepeda, kami tidak lupa melaksanakan kewajiban. Yaitu sholat subuh.

Adzan subuh kami telah memasuki wilayah lubuk pakam. Setelah selesai sholat, kami melanjutkan perjalanan lagi.

Perjalanan demi perjalanan, akhirnya ada yg minta istirahat juga.

Di tempat pemberhentian, tak lupa dong untuk poto-poto.. hehehe :D

 Ini dia hasilnya :

Dengan sepeda yang apa adanya, akhirnya kami mampu betahan melakukan perjalanan yang menurut orang lain jauh.

Kami tidak ada yang naik sepeda gunung. Sepeda kami terdiri atas: 4 (empat) sepeda BMX, 1 (satu) sepeda fixie, dan 2 (dua) sepeda Lowrider.

Tak berapa lama, kami kembali melanjutkan perjalanan. Waktu demi waktu, akhirnya kami sampai di tujuan jam 8 kurang.

Tapi, penjaga pintu masuk pantai tidak ada. di tempat mau masuk pantai dipenuhi oleh banyak anjing. Awalnya sih takut. Tp, setelah didekati, ternyata anjingnya cacat semua. Banyak yg pincang kakinya. Anjing pun minggir semua waktu kami ingin masuk.

Beruntungnya kami, Tidak ada yang minta uang tuk beli tiket.

sesampainya di sana, Tak lupa kami mengabadikan momen - momen seperti ini. yaitu dengan cara berpoto - poto.

hehehehe..

sayang sekali kami hanya menggunakan camera handphone.

Maklumlah. Blum mampu beli :p

Jika saudara ingin melihat hasil poto kami silahkan klik di sini.

Demikian lah Cerita dari perjalanan kami di akhir tahun.

وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Hormat kami :

Gepes Medan

 Sejarah Sepeda Lowrider

Sepeda Low Rider pertama kali di perkenalkan pada tahun 1960an, sepeda ini pertama kali di perkenalkan oleh The “custom” king George Barris, sebelum menemukan sepeda low rider si Tuan King ini pekerjaanya adalah menceperkan mobil, Memang saat itu virus Mobil Low Rider sedang mewabah di kalangan anak muda Amerika, Tetapi trend itu hanya bisa dirasakan oleh anak-anak muda dari keluarga kaya saja karena untuk membuat sebuah mobil low rider membutuhkan uang yang tidak sedikit, sementara anak-anak dari kalangan bawah hanya bisa melongo.

Melihat situasi seperti itu si King mendapatkan ide dengan mencoba membangun sebuah sepeda yang mengacu pada kesan low rider, untuk eksperimen pertama kali si King menerapkan pada sepedanya. Mulailah si King ini memperkenalkan kreasinya dari situ bisa di tebak banyak anak-anak dari keluarga yang kurang mampu beralih berkreasi membuat sepeda low rider.

Melihat peluang trend sepeda LR yang mulai di gandrungi akhirnya pada tahun 1963 pabrik sepeda SCHWIIN untuk pertama kalinya mengeluarkan model revolusi baru “New Cruiser “ STING RAY, model ini dibuat mengacu pada model motor model dragster yang sedang ngetop pada saat itu.Karena model tersebut nyaman di kendarai begitu juga dengan desainnya yg unik maka model tersebut menjadi booming dan digemari oleh anak-anak muda.

Model Sting Ray

Dikalangan sekelompok anak muda di daerah selatan Los Angeles Chicanos sepeda Low Rider banyak yang telah di modifikasi seperti framenya, fork di buat spring fork trus dikasih tambahan spion dan yang paling extreme adalah frame di buat lebih ceper / pendek lagi, tapi kebanyakan dari mereka adalah memendekannya. Pabrikan sepeda Schwiin juga tidak mau kalah terispirasi kaum latin yang suka blink-blink maka mereka menambahkan lapisan krom pada sepeda buatannya seperti mobil-mobil low rider.

Sepeda klasik tahun 1970-an ala Amerika ini memang jarang dijumpai. Selain stang tinggi dan kerangka sepeda yang rendah, sepeda low rider merupakan barang tua yang jumlahnya sangat terbatas.

Sepeda LR bukan hanya sepeda modifikasi atau yang disebut custom, ada juga sepeda orisinal dari negara Amerika dan Meksiko dengan merek Schwinn, Western Flyer, Giant, Phoenix dan lainnya.Sepeda jenis ini memiliki diameter roda ada yang 20 inci, 24 inci, dan 26 inci.

Perkembangan Low Rider kian pesat seiring dengan ide-ide kreatif anak muda yang menciptakan disain rangka sepeda berbeda dengan yang lainnya. Desain sepeda ini awalnya diilhami oleh model wheelie bikes yang telah muncul sebelumnya. Ciri-ciri yang nampak menonjol dari sepeda low rider ini adalah setangnya yang tinggi dan lebar (apehanger handlebar) atau garpu depannya yang panjang kedepan sampai hampir menyentuh tanah dengan sadel model pisang (banana seat) dengan sandarannya (sissy bar). Framenya biasanya menggunakan model pelangi (rainbow bent frame). Namun kadangkala ada yang ekstrim dengan setang yang tinggi dan fork yang panjang dengan menggunakan per (bent springer fork)….kadangkala menyerupai motor tua.

Ada beberapa aliran yang menggolongkan low rider ini kedalam beberapa jenis yaitu clasic alias original, vegas alias continental dengan cirinya memakai ban serep di bagian belakang seperti vespa. Aliran lain membagi sepeda low rider ini menjadi low rider bicycle, chopper atau stretch dan mountain cruiser.

Jenis sepeda ini sempat tidak diproduksi dalam waktu yg cukup lama di Negara asalnya, Amerika, karena minat pasar menurun. Namun sekarang trend menggunakan sepeda low rider berulang kembali, dan menjadikan sepeda ini di incar banyak orang saat ini.

 

Mengatsi port USB tidak bisa membaca Flashdisk

Cara Mengatasi Flashdisk Tidak Terbaca / Terdeteksi di Komputer
Kali ini saya mau berbagi tips sederhana dalam mengatasi flashdisk yang tidak terbaca atau tidak terdeteksi. Sering sekali pasti sobat menemukan hal yang seperti ini bayangkan saja yang belum pernah alami masalah ini banyak kerjaan laptop ga bisa conect Flasdik, Modem bahkan Wifi juga ikut Tepar ga bisa connect.
Ada beberapa alasan kenapa flashdisk tidak bisa terbaca di komputer, antara lain:
Flashdisk tidak terdeteksi karena rusak secara fisik
Flashdisk tidak dapat terbaca karena kemungkinan driver bermasalah
Flahsdisk tidak terbaca karena port USB rusak
Flashdisk tidak Connect bisa jadi karena settingan bios, Windows bermasalah
Dan masih banyak lagi penyebab lainnya mengapa flashdisk tidak dapat terbaca di PC atau Laptop
Lalu bagaimana Cara Mengatasi Flashdisk yang tidak terbaca atau flashdisk tidak terdeteksi di PC/Laptop
Coba colokkan USB pada Port USB yang lain atau pindah-pindah, jika belum berhasil coba colokan ke PC lain, apabila berhasil maka USB kita tidak bermasalah dan kecurigaan 100% kepada PC.
Atau dilakukan sebaliknya, coba colokan USB lain di PC kita (jika ada) dan/atau perangkat lain yang menggunakan usb port. Dengan asumsi, jika alat yang kita hubungkan terdeteksi, maka port USB tidak bermasalah.
1 Cek di settingan BIOS barangkali disable sengaja atau tidak, hal ini bisa saja terjadi perubahan setting dengan tidak kita sadari manakala baterai MotherBoard kita udah soak / lemah.
2 Cek di Device Manager , caranya :
Klik start > settings > Control Panels>Klik tombol Device Manager
Kemudian cek di bagian Universal Serial Bus Controllers, terlihat ada masalah
Tanda tanya pada bagian ini menandakan hardware tidak dikenal atau td ada driver
Tanda silang berwarna merah pada bagian ini menandakan disable, maka jika ini terjadi lakukan klik kanan dan pilih enable
Termasuk dalam hal ini kemungkinan perlu install ulang driver USB Flash disk
***Tambahan aja kl darurat biar bisa connect sementara tadi sudah buka device manager ya
Perhatikan apakah ada yang tanda seru (!) kuning , di bawah universal serial bus controller, maka tanda kuning itu harus dihilangkan caranya klik kanan pada port yang bertanda (!) kuning itu, trus uninstal satu persatu,kl sudah restart laptop, tunggu komputer biar instal ulang port2 yang error itu tanda usaha kita sukses jangan colokkin ke port usb apappun sebelum selesai instal ulang port, kalau dah ga ada aktifitas di port Device silahkan coba colokin FD , ta raaaa sukses dah usaha kita.
Ha haa ha jangan senang dulu itu cuma darurat aja to tadi aku bilangin, kalau komputer di shutdown itu akan kembali error seperti tadi, kl mau colokin FD lagi setelah shutdown harus ngulang proses tadi

3. Cek pada registry, caranya :
Klik Start > Run
Ketikan : “regedit” (tanpa tanda petik) kemudian enter
Masuk ke : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\UsbStor
Pada value Dwords harus bernilai 3 (enable), jika bukan 3 maka update dengan 3 lalu close dan restart
Kemungkinan yang lainnya adalah PC terjangkit Virus, maka harus dibersihkan dari virus dengan menggunakan anti virus
Jika mencurigai sebuah software yang baru diinstall sebagai penyebabnya maka coba uninstall dahulu software tersebut.
Itulah beberapa alasan dan cara mengatasi USB/Flashdisk tidak bisa terbaca atau tidak terdeteksi di komputer maupun laptop. Jika Anda mengalami hal ini, silakan ikuti petunjuk-petunjuk diatas untuk mengatasinya. Mudah-mudahan dapat membantu.
Terima kasih.

Mesran.Net merupakan salah website yang berguna untuk belajar bahasa pemrograman. Pada mesran.net terdiri beberapa artikel diantaranya artikel mengenai tips tips belajar bahasa pemrograman serta beberapa bahasa pemrograman salah satunya Visual Basic dot Net serta program berorientasi Database sebagai contoh : Program Visual Basic Net Simpan Edit Hapus Record Pada Database Access
 Pada blog ini, anda bisa memahami banyak bahasa program.
contoh :

Penyelesaian Pembayaran Tagihan Air Minum Menggunakan Visual Basic dot Net

Berikut ini program untuk menyelesaikan pembayaran tagihan air minum.

 

Program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        KP.Items.Add("TOK-MED-100")

        KP.Items.Add("PAB-BEL-101")

        KP.Items.Add("SWA-BEL-102")

        KP.Items.Add("PAB-MED-103")

        KP.Items.Add("RUM-MED-104")

    End Sub

    Private Sub KP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KP.SelectedIndexChanged

        Dim x As String

        x = Microsoft.VisualBasic.Right(KP.Text, 3)

        Select Case x

            Case "100" : Nama.Text = "Muhammad Ardianto"

            Case "101" : Nama.Text = "Jekson Sinaga"

            Case "102" : Nama.Text = "Triani Arista"

            Case "103" : Nama.Text = "Aldyan"

        End Select

        x = Microsoft.VisualBasic.Left(KP.Text, 3)

        Select Case x

            Case "PAB"

                HargaM3.Text = 500

                BBeban.Text = 250000

                Tipe.Text = "Pabrik"

            Case "TOK"

                HargaM3.Text = 500

                BBeban.Text = 25000

                Tipe.Text = "Toko"

            Case "RUM"

                HargaM3.Text = 500

                BBeban.Text = 10000

                Tipe.Text = "Rumah"

            Case "SWA"

                HargaM3.Text = 200

                BBeban.Text = 15000

                Tipe.Text = "Swalayan"

        End Select

        x = Microsoft.VisualBasic.Mid(KP.Text, 5, 3)

        Select Case x

            Case "MED" : Daerah.Text = "Medan"

            Case "BEL" : Daerah.Text = "Belawan"

        End Select

    End Sub

    Private Sub Pemakaian_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Pemakaian.KeyPress

        If Asc(e.KeyChar) = 13 Then

            TTagihan.Text = HargaM3.Text * Pemakaian.Text + Val(BBeban.Text)

            Pajak.Text = 0.01 * TTagihan.Text

            Pembayaran.Text = Val(TTagihan.Text) + Val(Pajak.Text)

        End If

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        End

    End Sub

    Private Sub btnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHapus.Click

        KP.Text = ""

        Nama.Text = ""

        Tipe.Text = ""

        TTagihan.Text = ""

        HargaM3.Text = ""

        Pajak.Text = ""

        Pembayaran.Text = ""

        Pemakaian.Text = ""

        Daerah.Text = ""

        BBeban.Text = ""

    End Sub

End Class

Demikianlah program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

copas http://www.mesran.blogspot.com


demikian penjelasan tentan mesran.net
untuk lebih memahami lagi, kunjungi blog http://www.mesran.blogspot.comu untuk belajar banyak hal. seperti:
- visual Basic 6
- visual basic net
- visual c sharp
- Delphi
- Paschal
- C / C++
- PHP
- Java dan banyak lagi

semoga artikel ini bermanfaat.
terimakasi

Mesran.Net merupakan salah website yang berguna untuk belajar bahasa pemrograman. Pada mesran.net terdiri beberapa artikel diantaranya artikel mengenai tips tips belajar bahasa pemrograman serta beberapa bahasa pemrograman salah satunya Visual Basic dot Net serta program berorientasi Database sebagai contoh : Program Visual Basic Net Simpan Edit Hapus Record Pada Database Access
 Pada blog ini, anda bisa memahami banyak bahasa program.
contoh :

Penyelesaian Pembayaran Tagihan Air Minum Menggunakan Visual Basic dot Net

Berikut ini program untuk menyelesaikan pembayaran tagihan air minum.

 

Program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        KP.Items.Add("TOK-MED-100")

        KP.Items.Add("PAB-BEL-101")

        KP.Items.Add("SWA-BEL-102")

        KP.Items.Add("PAB-MED-103")

        KP.Items.Add("RUM-MED-104")

    End Sub

    Private Sub KP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KP.SelectedIndexChanged

        Dim x As String

        x = Microsoft.VisualBasic.Right(KP.Text, 3)

        Select Case x

            Case "100" : Nama.Text = "Muhammad Ardianto"

            Case "101" : Nama.Text = "Jekson Sinaga"

            Case "102" : Nama.Text = "Triani Arista"

            Case "103" : Nama.Text = "Aldyan"

        End Select

        x = Microsoft.VisualBasic.Left(KP.Text, 3)

        Select Case x

            Case "PAB"

                HargaM3.Text = 500

                BBeban.Text = 250000

                Tipe.Text = "Pabrik"

            Case "TOK"

                HargaM3.Text = 500

                BBeban.Text = 25000

                Tipe.Text = "Toko"

            Case "RUM"

                HargaM3.Text = 500

                BBeban.Text = 10000

                Tipe.Text = "Rumah"

            Case "SWA"

                HargaM3.Text = 200

                BBeban.Text = 15000

                Tipe.Text = "Swalayan"

        End Select

        x = Microsoft.VisualBasic.Mid(KP.Text, 5, 3)

        Select Case x

            Case "MED" : Daerah.Text = "Medan"

            Case "BEL" : Daerah.Text = "Belawan"

        End Select

    End Sub

    Private Sub Pemakaian_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Pemakaian.KeyPress

        If Asc(e.KeyChar) = 13 Then

            TTagihan.Text = HargaM3.Text * Pemakaian.Text + Val(BBeban.Text)

            Pajak.Text = 0.01 * TTagihan.Text

            Pembayaran.Text = Val(TTagihan.Text) + Val(Pajak.Text)

        End If

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        End

    End Sub

    Private Sub btnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHapus.Click

        KP.Text = ""

        Nama.Text = ""

        Tipe.Text = ""

        TTagihan.Text = ""

        HargaM3.Text = ""

        Pajak.Text = ""

        Pembayaran.Text = ""

        Pemakaian.Text = ""

        Daerah.Text = ""

        BBeban.Text = ""

    End Sub

End Class

Demikianlah program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

copas http://www.mesran.blogspot.com


demikian penjelasan tentan mesran.net
untuk lebih memahami lagi, kunjungi blog http://www.mesran.blogspot.comu untuk belajar banyak hal. seperti:
- visual Basic 6
- visual basic net
- visual c sharp
- Delphi
- Paschal
- C / C++
- PHP
- Java dan banyak lagi

semoga artikel ini bermanfaat.
terimakasi