Love Or Responsibility 2

Antara cinta dan tanggung jawab
Karena janji adalah hutang
Dan hutang adalah bagian dari tanggung jawab
Dalam cinta tak perlu berjanji yang muluk muluk
Cinta memang tak sempurna, kecuali yang berasal dari Sang Pencipta
Dia selalu menjaga dan selalu menepati janji
Karena itu jika kau cinta cobalah menjaga, walaupun tak berakhir jodoh
Dan jika kau putus setidaknya kejahatan yang kau lakukan hanya menghancurkan hatinya

Baca Selengkapnya »

Love Or Responsibility

Aku tak suka menyebut itu cinta
Aku lebih suka menyebutnya tanggung jawab
Karena saat seseorang mencintaimu
Maka kau dianggap berharga baginya
Dan saat seseorang mencintaimu
Dan mungkin sulit baginya melepasmu
Cobalah untuk menghargai cinta yang telah diberi
Dan hal seperti itu hanya bisa dilakukan oleh orang-orang tertentu

Baca Selengkapnya »

Kamu Perlu Tahu Apa Bedanya Tertarik, Kagum, Suka, Sayang dan Cinta!

“Walau mendefinisikan perasaan sangat susah, tapi setidaknya perbedaan ini bisa membantumu untuk tahu isi hatimu.”

1. Tertarik
Rasa tertarik biasanya muncul paling pertama kali. Perasaan itu biasanya menyelip muncul ketika kamu tidak sengaja melihat atau menemukan sesuatu. Rasa tertarik ini adalah perasaan yang paling mendasar sebelum kamu bisa merasa kagum sama seseorang. Kalau kamu nggak tertarik sama seseorang, kamu nggak mungkin mendekati atau mencari tahu hingga bisa kagum, bahkan hingga suka, sayang dan cinta sama seseorang.
Waktu kamu tertarik, ada satu hal kecil dari diri seseorang yang membuatmu ingin mengenal dia lebih jauh lagi. Penulis percaya, setiap orang memiliki daya tarik yang hanya dianggap menarik oleh seseorang atau sebagian orang saja. Misalnya nih, mungkin kelebihanmu adalah orang yang straight to the point. Bagi sebagian orang mungkin hal itu bukan hal yang menarik dan menyenangkan, tapi mungkin buat seseorang atau sebagian orang, mereka melihatnya sebagai daya tarikmu.
Rasa tertarik ini mudah sekali untuk pudar, apalagi bila tidak dibarengi dengan kemauan untuk mengenal orang itu lebih dalam lagi. Dengan frekuensi pertemuan dan interaksi yang minim, rasa tertarik itu mungkin akan mengapung di sana. Menjadi sekadar rasa tertarik, tanpa bisa bertumbuh menjadi rasa kagum

2. Kagum
Rasa kagum itu bisa muncul kapan saja, dimana saja, sama siapa saja dan biasanya muncul setelah rasa tertarik muncul. Rasa kagum nggak terbatas hanya sama lawan jenis, tapi kamu juga bisa kagum sama temanmu yang sesama jenis. Rasa kagum biasanya muncul setelah kamu tertarik sama seseorang. Kamu jadi kagum karena orang itu memiliki kelebihan yang menurutmu menarik.
Contohnya nih, kamu bisa saja kagum sama cowok yang cakep dan tampan atau cewek berparas cantik dan anggun , kamu bisa juga kagum sama pemain gitar yang baru kamu lihat di konser, walau kamu nggak kenal siapa orang itu atau pun bagaimana kebiasaannya sehari-hari setelah kamu tertarik melihat permainan gitarnya yang lihai. Kamu juga bisa saja kagum dengan temanmu yang baru selesai presentasi dengan flawless dan berhasil meyakinkan dirimu serta seisi ruangan bahwa pemikirannya itu super keren.
Biasanya, rasa kagum ini sifatnya sementara. Ketika kamu menemukan seseorang yang dapat membuatmu berdecak kagum lebih keras, maka rasa kagummu pada orang yang lama bisa saja hilang. Tapi ingat lho, guys, rasa kagum itu juga benih dari cinta, yang kalau disirami secara rutin dan teratur bisa bertumbuh.
Bedanya kagum sama rasa lainnya? Saat kamu mengagumi seseorang, kamu akan selalu memperhatikan sisi atau kulit luarnya. Kamu hanya sebatas senang dengan apa yang ia lakukan dan ketika ada sisi buruk dari dirinya yang kamu temukan, rasa kagummu juga bisa hilang. Ketika seseorang itu tidak mencapai ekspektasimu, maka ucapkan sampai jumpa dengan orang itu.

3. Suka
Ketika kamu sudah tertarik dan kagum sama seseorang, lama kelamaan kamu bisa suka sama orang tersebut. Bagaimana bisa? Tidak ada penjelasan ilmiah di balik pernyataan ini tapi, satu hal yang penulis pegang pasti. Bila rasa kagum itu terus bertambah setiap waktunya, maka lama kelamaan secara tidak sadar, rasa suka bisa bertumbuh juga. Mungkin awalnya kamu kagum karena sifatnya yang super pengertian. Kamu heran karena ternyata di dunia ini masih ada sosok yang bisa mengerti dirimu yang memang mudah panik. Setiap hari ada saja yang membuatmu kagum, kamu membuka lapis demi lapis hal yang menarik tentang dirinya dan secara tidak sadar, kamu suka padanya.
Kamu ingin dia jadi milikmu. Kadang rasa suka itu sifatnya egois karena secara tidak sadar, kita menuntut orang lain untuk tetap berlaku seperti yang telah dia lakukan sebelumnya. Melakukan hal-hal yang membuat kita suka padanya. Kadang di tahap suka ini, kamu merasa sudah mengenal orang itu sepenuhnya. Tapi pada kenyataannya, masih banyak ‘sisi lain’ dari orang itu yang belum kamu ketahui. Kenyataannya, banyak orang yang setelah tahu ‘sisi lain’ tersebut, mereka memutuskan untuk mundur dari medan pertempuran.

4. Sayang
Rasa sayang ini porsinya lebih besar dari rasa suka. Kalau di depot-depot, bisa dibilang rasa sayang itu porsi jumbo. Rasa sukamu sudah terakumulasi dan kini berubah menjadi rasa sayang. Rasa ingin memiliki, rasa ingin menghabiskan waktu bersama. Kamu bisa dibilang sayang seseorang saat kamu sadar ingin bertemu dengan dirinya setiap hari karena kamu senang dan nyaman di sisinya.
Kamu merasa sayang padanya saat kamu melihat dia dari hatimu, bukan sekadar kulit luarnya saja. Kamu tahu sifat-sifat jeleknya dan berusaha untuk menemukan solusi untuk dirimu pribadi dan juga dirinya. Ketika kamu sayang seseorang, kamu bakalan berusaha supaya kalian berdua bisa bersatu, saling memiliki selamanya. Sebisa mungkin kamu akan menjadi yang terbaik untuknya dan berharap dia juga akan menjadi yang terbaik untuk dirimu.
Secara tidak langsung, ada tuntutan walau kesannya lebih halus dan rapi.

5. Cinta
Ini dia nih kasta tertingi dari perasaan seseorang di dunia. Nggak ada yang lebih tinggi lagi dari kata C-I-N-T-A. Ketika kamu sudah bertemu cinta, kamu juga akan bertemu dengan yang namanya pengorbanan. Karena tidak ada cinta yang benar-benar nyata di dunia ini tanpa pengorbanan. Jangan langsung percaya ketika seseorang berkata, “Aku cinta padamu” karena kalau dia tidak menunjukkannya lewat tindakan nyata (sebuah pengorbanan), maka semuanya sia-sia.
Ketika kamu merasakan cinta, kamu akan (bahkan wajib) memberikan 100 persen dari yang kamu miliki. Ketika kamu tahu apa yang namanya cinta, kamu tidak akan menuntut dia memberikan balasan. Mengapa? Alasannya ada dua. Pertama, karena kamu cinta pada orang itu dan cinta tidak menuntut. Kedua, karena cinta tidak menuntut, cinta hanya mengharapkan. Kamu akan menunggu, walau kadang kamu tahu penantianmu bakal sia-sia.
Kamu akan tetap memperhatikannya, walau kamu tahu dia memperhatikan orang lain. Kamu tetap memandangnya, walau kamu tahu di bola matanya ada sosok lain yang ia dambakan. Karena cinta berada di kasta paling tinggi, tidak heran tantangannya juga sangat besar.
Kamu yang mengerti cinta, berarti kamu juga mengerti ketika seseorang menjadi duniamu. Seakan-akan, dia jadi gravitasi yang selalu membuatmu jatuh berulang-ulang. Walau ada rasa sakit, tapi kamu indahkan karena dialah yang menjadi pusat duniamu.

Published by Azka Pradipta Pramudya 12 Maret 2015. 18:08

http://www.idntimes.com/azka/kamu-perlu-tahu-apa-bedanya-tertarik-kagum-suka-sayang-dan-cinta

Baca Selengkapnya »

Tentang Emosi

Ini tentang emosimu
Saat kau sedih
Dan kau menangis
Saat kau senang
Dan mulai tertawa
Saat kau marah
Dan mulai menjauh
Saat kau takut
Dan mulai mendekat
Saat kau yakin
Dan tersenyum lebar
Saat kau ragu
Dan kaupun berlalu
Saat kau tenang
Dan hidup terus berjalan
Ya, ini emosimu
Ini tentang rasamu
Ini tentang dirimu
Yang timbul dari hati
Karena hati itu cermin
Dari hati kau pantulkan
Semuanya itu
Dari bahasa dirimu
Kau ungkap semua itu
Ini kamu
Kamu mungkin tertutup
Tapi biarkan hatimu terbuka
Kau mungkin terluka
Tapi ingat juga
Bahwa kamu manusia
Tak bisa selalu sedih
Namun tak bisa selalu bahagia
Karena hidup bagaikan sebuah jalan
Kadang kau naik
Kadang kau turun
Itu emosimu
Kadang kau belok kiri
Kadang belok ke kanan
Untuk mengambil keputusan
Hidup memang tak pernah kau minta
Namun karena kau hidup maka kau harus tetap bertahan.

Baca Selengkapnya »

Tentang Emosi

Ini tentang emosimu
Saat kau sedih
Dan kau menangis
Saat kau senang
Dan mulai tertawa
Saat kau marah
Dan mulai menjauh
Saat kau takut
Dan mulai mendekat
Saat kau yakin
Dan tersenyum lebar
Saat kau ragu
Dan kaupun berlalu
Saat kau tenang
Dan hidup terus berjalan
Ya, ini emosimu
Ini tentang rasamu
Ini tentang dirimu
Yang timbul dari hati
Karena hati itu cermin
Dari hati kau pantulkan
Semuanya itu
Dari bahasa dirimu
Kau ungkap semua itu
Ini kamu
Kamu mungkin tertutup
Tapi biarkan hatimu terbuka
Kau mungkin terluka
Tapi ingat juga
Bahwa kamu manusia
Tak bisa selalu sedih
Namun tak bisa selalu bahagia
Karena hidup bagaikan sebuah jalan
Kadang kau naik
Kadang kau turun
Itu emosimu
Kadang kau belok kiri
Kadang belok ke kanan
Untuk mengambil keputusan
Hidup memang tak pernah kau minta
Namun karena kau hidup maka kau harus tetap bertahan.

Baca Selengkapnya »

Mencari Kejujuran

Entah dimana kau berada
Karena ku hanya mendengar
Dan ku hanya ingin tahu
Atau kau bagaikan gula yang
Larut dalam samudra nan asin
Mengapa masih tertutup?
Mengapa masih tersembunyi?
Mengapa ku harus tahu?
Jika pada akhirnya kau hanya bayang semu
Akankah kau timbul?
Akankah kau muncul?
Ku tak ingin habiskan hidupku hanya tuk mencarimu
Mungkin kau akan jadi bahagiaku
Tapi jangan kau buatku menyerah tuk mencarimu
Karena di tempat lain bisa ku temukan yang lebih
Namun jika kau hanya akan jadi penyebab kesedihan
Mengapa kau harus kuketahui?

Baca Selengkapnya »

Beban Pikiran

Entahlah, saat sendiri saya berpikir tapi pikiran saya tertuju pada cewek.
Saya benci memikirkan hal seperti ini, memikirkan seseorang yang bahkan saya tidak tahu dia memikirkan saya atau tidak.
Saya berpikir sendiri mengapa saya tidak begitu memikirkan orang tua atau anggota keluarga saya yang sebenarnya lebih peduli pada saya ketimbang cewek yang hanya membuat saya ngarep.
Buruknya lagi adalah saya tidak tahu cara mengalihkan agar pikiran ini lebih berfokus pada hal positif.
Saya sendiri bingung mengapa saya kurang suka membaca Kalam Ilahi dan lebih suka mengalihkan diri ke @wifi.id hanya untuk sekedar membuka jejaring sosial yang bahkan sebenarnya hanya berisi orang-orang yang oleh jejaring sosial itu disebut "Teman", teman di dunia maya tak bisa selalu membantu, apalagi di dunia maya siapapun bebas menjadi dirinya yang lain atau bahkan menjadi anonymous.
Ya, saya memang tidak begitu peduli dengan teman-teman saya, bahkan saat saya ditawari bantuan oleh mereka saya lebih cenderung menolak mereka karena menurut saya hasil yang saya dapatkan melalui usaha sendiri lebih berarti.
Seperti kemarin (5 Desember 2015), sebenarnya kemarin adalah hari pengumpulan tugas struktur data, dimana kami disuruh mempraktikkan pascal dan file codingnya diserahkan pada dosen, tugasnya diberikan hari senin dan hari sabtu kemarin pada jam 13.00 adalah batas pengumpulan tugas tersebut dan saya memilih tidak mengumpulkan karena charger laptop rusak, ada teman saya yang menawarkan codingnya, ya.... dan semua "teman" saya menggunakan coding yang sama, mereka hanya tinggal memasukkan nama dan NIM mereka dalam coding itu dan masalahpun teratasi.
Saat berpikir tentang seorang "teman", kadang saya bertanya "sebenarnya aku ini pantas jadi temanmu atau tidak?", temanmu yang satu ini terlalu terbiasa alias terlalu sering sendiri karena tak terlalu merasa berharga.
"Jika memang aku temanmu, apa yang pernah aku berikan?", ya, karena aku terlalu pelit untuk berbagi.
"Terkadang candaanku berlebihan terhadapmu, mengapa kau tidak menjauh?", temanmu yang satu ini hampir bukan teman yang bisa kau ajak bercanda atau kau candai, ia terlihat polos namun dia terlalu rapuh akan kata-kata.
"Sebahagia apa kamu saat jadi temanku?", karena aku bahkan hampir sangat sulit tertawa dan lebih cenderung membuatmu kesal.
"Apakah aku cukup baik untukmu?", karena aku tahu aku bukan orang baik.
"Tidakkah aku terlalu merepotkanmu saat ku butuh bantuan?", maaf jika seandainya suatu saat kau menyesal saat kau sudah membantuku.
Saya memang suka sendiri, namun saya juga sadar saya juga manusia, makhluk sosial yang butuh teman dan saya juga sadar bahwa saya sebenarnya tidak bisa kalau sendiri, namun saya lebih suka menyerahkan urusan hidup saya pada Allah, karena jika memang manusia tidak bisa membantu saya, saya masih punya Dia untuk saya mintai bantuan.
Percayalah kawan, jika suatu saat aku bisa melakukan sesuatu sendiri maka memang itulah yang Allah kehendaki, namun jika suatu saat aku minta tolong padamu maka aku merasa kau pilihan yang Dia berikan, namun jika seandainya kau memang tak mampu membantu maka aku mengerti bahwa Dia sedang membuatku lebih berharap pada-Nya daripada berharap pada manusia.
Tidak kawan, aku masih makhluk sosial dan pasti memerlukanmu, namun kau mungkin bertanya mengapa aku lebih suka sendiri? Bukan begitu kawan, aku hanya terlalu memikirkan diriku dan khawatir jika aku suatu saat menyakitimu atau orang lain, Maafkan aku jika terlalu egois, dan Terima Kasih atas semua yang kau lakukan........
Sekarang biar kutenangkan hati dan pikiran ini karena kutahu hidupku tetap harus berjalan dan tak bisa terus begini.

Baca Selengkapnya »

Terinspirasi Dari Fast & Furious 6

Siapa yang belum nonton Fast & Furious 6 ?

Dalam film ini, Dom (Dominic Toretto) kembali bertemu dengan Letty (Leticia Ortiz) dimana saat itu Letty sedang kehilangan ingatan karena kecelakaan (Cerita Lebih lengkapnya ada di Fast & Furious 4).

Dom ingin untuk mengajak Letty pulang, Demi menyatukan keluarganya kembali.

Satu kata yang sempat saya ingat dan dikatakan oleh Dom adalah "Kau tak boleh mencampakkan keluarga. Bahkan saat keluarga mencampakkanmu."

Kita semua punya keluarga masing - masing, terkadang ada saat dimana kita pernah dimarahi oleh orang tua, dan kita sendiri yang marah (baik langsung atau dipendam).

Saya juga pernah begitu, saya terkadang disaat seperti itu ingin sekali untuk tidak dilihat, tapi terkadang terbayang juga apa yang pernah orangtua lakukan buat saya, semua pengorbanan mereka, semua tawa dan tangis mereka, semua begitu berarti, karena mereka keluarga saya.

Jangan abaikan keluarga, mereka mungkin menyebalkan tapi mereka adalah yang pertama kali ada untukmu.....

Camkan ini, dan ketahuilah bahwa keluargamu begitu berarti......

Karena keluarga adalah anugerah, bersyukurlah selama anda masih memiliki keluarga, karena cinta yang pertama kali anda dapatkan berasal dari sebuah keluarga.....

Baca Selengkapnya »

Fungsi Select Case di Visual Studio 2010

Select case jika diartikan per kata berarti pilih kasus, ya......
Sebenarnya fungsi Select Case sama seperti fungsi If-Then-Else, hanya saja dalam Select Case apa yang akan terjadi selanjutnya menggunakan case
OK, untuk fungsi Select Case saya membuat program untuk mengetahui nilai huruf dari nilai angka, penampakannya seperti ini :

Sederhana bukan? bentuk tampilan formnya seperti ini

berikutnya adalah statement penamaan untuk masing - masing elemen :

Me.Text = "Select Case"
Label1.Text = "Nilai"
Button1.Text = ">"
Label2.Text = "-----"

Agar saat tombol diklik, maka akan keluar nilai hurufnya, saya memasukkan statement ini

Select Case angka
Case 80 To 100
       Label2.Text = "A"
Case 70 To 79
       Label2.Text = "B"
Case 60 To 69
       Label2.Text = "C"
Case 50 To 59
       Label2.Text = "D"
Case 0 To 49
       Label2.Text = "E"
End Select

jadi, syntax dari Fungsi Select Case adalah

Select Case kondisi
Case kondisi1
pernyataan
Case kondisi2
pernyataan
Case kondisi(n)
pernyataan
End Select

saya juga menggunakan fungsi Dim As di  program ini dimana variabel "angka" adalah angka dari TextBox1, penggunaannya seperti ini

Sehingga saat di debug, saya masukkan angka 65

dan nilai hurufnya adalah

Mudah bukan?

Baca Selengkapnya »

Drama Kehidupan

Ada yang tahu drama?
Ada yang pernah nonton film?
Ya.... pasti dan anda sudah tahu apa itu drama dan pernah nonton film.
Tapi kali ini bukan review film atau drama, kita akan membahas tentang hidup....(bukan kehidupan orang lain).
Ya, jadi hidup itu memang seperti drama atau film yang memiliki akhir entah buruk atau baik.
Namun dalam hidup tak ada yang namanya akhir yang buruk, semua dalam hidup pasti berakhir baik.
Anda mungkin bertanya "baiknya kapan"? Cepat atau lambatnya akhir yang baik itu yang dipermasalahkan karena ada yang bahagianya cepat dan ada yang bahagianya lama....
Nah.....
Anda belum merasa hidup anda baik?
Hidup anda baik sebenarnya, anda mungkin kurang bersyukur atau terlalu mempermasalahkan hal-hal kecil.
Sampai kapan saya harus menunggu agar hidup saya baik?
Anda seharusnya tidak menunggu, anda bisa mempercepat hidup yang baik dengan melakukan sesuatu agar hidup lebih berarti, karena bahkan sayapun tahu bahwa menunggu itu melelahkan tanpa melakukan sesuatu.
Namun jika kehidupan anda di dunia tidak baik setidaknya di akhirat nanti kehidupan anda bisa lebih baik, mungkin tidak dalam waktu cepat, namun percayalah bahwa jika berakhir buruk maka itu bukan akhir.
Karena walaupun hidup bagaikan drama, namun dalam hidup tak ada akhir yang buruk.
Yang ada itu yang baiknya lama dan ada yang baiknya cepat, hanya masalah waktu, yakinlah bahwa bahkan ada sesuatu yang baik dari hal yang buruk.

Baca Selengkapnya »

Pengalaman Gue Waktu NgeHack WiFi

Hacking suatu kata yang menarik, apalagi buat gue yang hobi banget konek internet.
Main-main di kampus cuma buat wifi-an....
Tapi, lo tau kan apa yang paling ngeselin dari wifi? PASSWORD.....
Usil-usil googling buat nyari software buat ngeHack WiFi, gue nemu alamat SecurityXploded.com
Yang coeg di alamat itu, isinya software untuk nyari password, password facebook, twitter, skype, etc.
Nah, di situs itu gue nyari pake kata kunci WiFi, gue nemu ini, file yang udah gue download....

Ada WiFi Password Decryptor, bukan untuk ngeHack WiFi, tapi cuma buat ngelihat password WiFi yang pernah lu konekin sebelumnya.
Ada WiFi Password Remover, bukan buat ngehapus password WiFi, tapi cuma buat ngehapus profile WiFi yang pernah lu konekin
Ada lagi WiFi Password Key Generator, buat bikin password WiFi, tapi giliran gue input ke WiFi yang ada password, malah nggak sesuai.....

Kalau lo googling pake kata kunci "wireless password hacker", "wifi password hacker", intinya hacking password wifi, lo bakal nemu wifi hacker v3 di hasil pencarian paling atas, gue pernah download, gue coba buka aplikasinya, didalam arsip ada arsip lagi, gue buka arsip malah nemu

gue disuruh klik ke http://bit.ly/1hHiHgV, buka URL, klik download malah disuruh survei, kan kampret..................

Nah.....
Yang paling banyak gue temuin tuh, WirelessKeyView, biar lo bisa lihat password WiFi katanya, tapi begitu gue test, yang kelihatan malah password WiFi yang pernah gue konekin sebelumnya.

Kesimpulan :
Gue bingung gimana cara ngeHack WiFi yang ada passwordnya, kalau Harus ngeHack Routernya, kan harus konek ke WiFinya dulu, itu malah makin ribet lagi.
Antara gue yang kurang tahu atau para pencipta software ini pada nggak bisa bikin software buat ngeHack WiFi tanpa Harus konek ke WiFinya dulu.
Mungkin ada softwarenya, tapi kalau mau dapetin harus bayar, atau apalah......
Intinya adalah, hacking itu .......
Ah sudahlah.

Baca Selengkapnya »

Program Penjualan di Visual Studio 2010

Kembali membahas Visual Basic, kali ini kita akan membuat program penjualan.

Atau lebih tepatnya program kasir, yang dibahas dalam program ini adalah penggunaan Dim As atau membuat variabel di Visual Studio 2010.

Ini dia preview programnya.....

Ini bentuk formnya.....

Berikut ini coding awal program (Klik ganda di Formnya) :

GroupBox1.Text = "Penjualan"

ComboBox1.Text = "Pilih >>>"

ComboBox2.Text = "Tunai / Kredit"

Button1.Text = "Hapus"

Label1.Text = "Kode"

Label2.Text = "Nama Barang"

Label3.Text = "Jumlah"

Label4.Text = "Tunai / Kredit"

Label5.Text = "Harga Satuan : Rp"

Label6.Text = "Total : Rp"

Label7.Text = "Diskon : Rp"

Label8.Text = "Bayar : Rp"

Label9.Text = "Jumlah Uang : Rp"

Label10.Text = "Kembali : Rp"

Nah………

Ini dia, bagian Dim As (bukan Dim Sum), 

Kita menggunakan Dim ____ As String jika datanya (inputannya) dalam bentuk teks dan Dim ____ As Integer jika datanya dalam bentuk angka.

letakkan Dim As Diatas bagian Privatesub ComboBox1, Codingnya begini :

Dim Kode_Brg, Nama_brg As String

Dim Hrg_Satu As Integer

Kode_Brg = ComboBox1.Text

If Kode_Brg = "Mo" Then

Nama_brg = "Mouse"

Hrg_Satu = "50,000"

TextBox6.Text = Hrg_Satu

ElseIf Kode_Brg = "Pr" Then

Nama_brg = "Printer"

Hrg_Satu = "750,000"

TextBox6.Text = Hrg_Satu

ElseIf Kode_Brg = "Ha" Then

Nama_brg = "Harddisc"

Hrg_Satu = "500,000"

TextBox6.Text = Hrg_Satu

ElseIf Kode_Brg = "Fl" Then

Nama_brg = "Flashdisc"

Hrg_Satu = "100,000"

TextBox6.Text = Hrg_Satu

ElseIf Kode_Brg = "Lc" Then

Nama_brg = "LCD Projector"

Hrg_Satu = "400,000"

TextBox6.Text = Hrg_Satu

End If

TextBox1.Text = Nama_brg

TextBox3.Text = Hrg_Satu

Kayak di gambar ya..... 

 Di bagian setelah PrivateSub itu, saya menjelaskan apa yang dimaksud dengan variabel yang telah saya sebut tadi (Maaf kalau membuat anda bingung)

Contoh :

Kode_Brg = ComboBox1.Text maksudnya adalah Kode barang ditunjukkan dengan teks yang ada di ComboBox1

Begitu Juga dengan

Textbox1.Text = Nama_Brg dan TextBox3.Text = Hrg_Satu

Anda mungkin bertanya mengapa Hrg_Brg dan Nama_Brg diletakkan diakhir? 

Jawabannya adalah : Karena itu akan dieksekusi setelah pilihan dibuat

Hasil dari coding tadi adalah, saat anda memasukkan kode barang (di ComboBox1) maka akan muncul apa nama barang tersebut (di TextBox1) dan harga satuannya (di TextBox3)

Berikutnya untuk ComboBox2 (Pilihan Kredit/Tunai), ketentuannya adalah : jika si pembeli membeli secara tunai, maka dia akan mendapat diskon 15% dari harga total

Codingnya :

Dim kre_tun As String

Dim diskon As Integer

kre_tun = ComboBox2.Text

If kre_tun = "Tunai" Then

diskon = (15 / 100) * Val(TextBox4.Text)

ElseIf kre_tun = "Kredit" Then

diskon = "0"

End If

TextBox5.Text = diskon

TextBox6.Text = Val(TextBox4.Text) - diskon

Masalahnya adalah bagaimana jika si pembeli membeli barang yang sama namun lebih dari satu

maka kita akan mengatur agar harga satuan dikalikan dengan jumlah

Dim jml As Integer

jml = Val(TextBox2.Text)

TextBox4.Text = Hrg_Satu * jml

TextBox6.Text = Val(TextBox4.Text) - diskon

Selengkapnya di gambar 

Saya memasukkan tombol untuk menghapus dan ini codingnya

Selamat Mencoba

Baca Selengkapnya »