Sabtu, 07 April 2012

Indahnya berjilbab & Manfaatnya
 Islam itu indah. Islam itu care, terutama pada wanita. Mengapa dalam Islam memerintahkan agar wanita berjilbab? Untuk apa wanita berjilbab? Ternyata, wanita disarankan untuk berjilbab itu untuk melndungi dirinya sendiri. Allah sudah berjanji di Quran Surat Al-Ahzab 59 bahwa wanita berjilbab tidak akan diganggu dan dapat dibedakan antara wanita muslim atau wanita bukan muslim. “Hai Nabi, katakanlah kepada isteri-isterimu, anak-anak perempuanmu, dan isteri-isteri orang mukmin: Hendaklah mereka mengulurkan jilbabnya ke seluruh tubuh mereka. Yang demikian itu supaya mereka lebih mudah untuk dikenal, karena itu mereka tidak diganggu. Dan Allah adalah Maha Pengampun lagi Maha Penyayang” (Surat Al-Ahzab ayat 59). Dalil lainnya : “Dua kelompok termasuk penghuni neraka, aku (sendiri) belum pernah melihat mereka, yaitu orang-orang yang membawa cemeti seperti ekor sapi, dengannya mereka mencambuki manusia dan para wanita yang berpakaian (tetapi) telanjang, bergoyang-goyang dan berlenggak lenggok, kepala mereka (ada sesuatu) seperti punuk unta yang bergoyang-goyang. Mereka tentu tidak akan masuk surga, bahkan tidak akan mendapatkan baunya. Dan sesungguhnya bau surga itu tercium dari jarak perjalanan sekian dan sekian”. (Hadits shahih riwayat Muslim, no. 2128)
1.Manfaat memakai Jilbab Mendapatkan pahala pastinya.
2. Terlindung dari sinar UV yang semakin lama semakin buruk karena berlubangnya lapisan ozon yang melindungi bumi.
3. Terhindar dari kanker kulit yang mengerikan.
4. Melindungi rambut supaya tidak rusak dan pecah-pecah, setidaknya rambut terlindungi dari sinar matahari langsung.
5. Kulit menjadi keliatan lebih cerah alias agak putihan, walaupun ga seputih orang bule kan kita orang asia jadi wajarlah kalo putihnya ga kaya orang bule.
6. Jilbab, baju muslim ini adalah solusi bagi orang yang suka memakai baju yang minim dan mengumbar “balloon” tersebut agar terhindar dari hal-hal yang tidak diinginkan, misalnya mengundang syhwat kaum laki – laki. Banyak kasus sampai memperkosa karena keelokan tubuhnya yg aduhai.
7. Terhindar dari tangan-tangan jahil yang iseng karena baju muslim ini dapat menutupi lekuk tubuh wanita dengan satu syarat bahwa busana yang dipakai longgar, kalo ketat atau membentuk tubuh sama saja bohong sukur-sukur kalo bentuk tubuhnya menarik kalo ga yah mirip lepet.
8. Orang yang berniat jahil atau tidak berniat jahil itu terkadang mengucapkan “Assalamu’alaikum bu Haji”. Keuntungan juga kan buat para wanita soalnya orang itu udah mendo’akan kita secara tidak langsung.
9. Terhindar dari omongan yang buruk. Sebagian wanita hanya memakai busana ini hanya untuk tameng buat perbuatan mereka yang buruk. Tapi setidaknya mereka sudah mau menutup auratnya walaupun tidak seutuhnya niat memakainya.
10. Wanita berbusana muslim akan terlihat lebih cantik di banding orang yang tidak memakainya. Wanita Berjilbab Lebih Dipilih Ternyata para lelaki yang baik-baik secara fitrah menyukai wanita berjilbab.
Coba Anda bayangkan saat Anda mungkin membeli kue di pasar. Pertama, ada kue yang terbungkus dengan daun pisang misalnya, dengan plastik putih transparan misalnya, namun ada juga kue yang tidak dibungkus dengan apa pun. Tidak tahu kalau kue itu tadi digerumbungi lalat. Nah, kue mana yang Anda pilih? Tentu saja kue yang dibungkus, sebab kue yang dibungkus itu lebih terjamin kebersihannya dari kontaminasi tangan-tangan yang penuh kuman dan virus. Begitu juga dengan wanita berjilbab. Mereka akan lebih indah dipilih sebagai pendamping hidup, kecuali wanita berjilbab yang masih tidak menjaga dirinya, misalnya masih berikhtilat di antara para lelaki. Wanita Berjilbab Lebih Anggun Wanita berjilbab lebih anggun jika menggunakan rok, baju tidak ketat, baju tidak transparan, menutupi seluruh tubuhnya, kecuali muka dan telapak tangan. Itulah yang dimaksud berjilbab secara kaffah. Wanita berjilbab lebih anggun dengan pakaian takwanya itu. Bukankah wanita berjilbab itu harus berpakaian tidak menyerupai laki-laki. Allah pun tidak menyukai wanita yang menyerupai laki-laki atau laki-laki yang menyerupai wanita. Wanita Berjilbab Juga Tidak Sempurna Manusia itu tidak ada yang sempurna. Oleh karena itu, Anda jangan pernah berkata, aku belum baik sehingga aku belum pantas berjilbab. Padahal memakai jilbab itu bukan untuk wanita-wanita yang baik-baik. Memakai jilbab itu hanya berarti mengikuti perintah Allah atau tidak. bukankah Allah sudah berfirman mengapa wanita muslim harus memakai jilbab?! Wanita Berjilbab Itu Lebih Taqwa Sejak wanita itu memakai jilbab, maka secara otomatis wanita itu taat pada Allah, yaitu taat pada perintah Allah yang memerintahkan muslimah memakai jilbab. Walaupun wanita itu jahat, namun dibalut dengan jilbab, maka wanita itu tetap taat pada Allah, taat khususnya dalam perintah berjilbab. Padahal zaman Rasulullah dulu, wanita-wanita beriman yang taat pada Allah atas wahyu yang turun kepada Rasulnya untuk memakai jilbab, wanita-wanita taat itu langsung menggunting kordengnya, taplak mejanya, hanya untuk dijadikan jilbab. Zaman sekarang? Jilbab sudah canggih, men?! Wanita berjilbab itu lebih takwa, sebab jilbablah yang membuat mereka taqwa. Contohnya: Ketika kita enggan shalat, maka kita akan malu. Malu dengan jilbab. "Aku malu jika tidak shalat, kan aku sudah berjilbab." Begitulah. Lalu misalnya, ketika kita makan sambil jalan, maka hati kita akan berkata lagi, "Aku malu makan sambil jalan, kan aku sudah pakai jilbab?!" Nah, begitula jilbab menjadikan diri kita lebih taqwa. Jadi tunggu apa lagi. Taatlah sekarang juga dengan perintah Allah yang satu ini, 'memakai jilbab'. Jangan tunggu nanti-nanti, siapa tahu dua menit lagi Anda akan mati mendadak. Jadi tidak sempat menjalankan perintah Allah yang satu ini. Wanita berjilbab itu bukan harus baik dulu, namun jilbablah yang akan menjadikan dirinya lebih baik dan lebih taqwa. Wallau a'lam. Mendengar kata cantik, yang terbayang adalah seorang wanita yang anggota wajahnya -mata, hidung dan bibir- proporsional, sedap dipandang mata. Cantik juga dikaitkan dengan kulit yang terawatt baik, rambut hitam bercahaya, bentuk tubuh langsing dan gaya berbusana yang up to date. Bicara soal busana, seringkali yang dituduh sebagai penyebab ketidakcantikan seorang adalah jilbab. Dengan pakaian yang syar’i, memang bentuk tubuhnya yang langsing tak tampak lagi. Kecantikan fisik merupakan salah satu nikmat dari Allah yang dikaruniakan kepada sebagian saudari kita. Misalnya saja, suatu ketika kita diberikan nikmat oleh Allah berupa harta yang sangat berharga. Tentunya kita hati-hati menjaga harta itu, melindunginya dari jamahan orang lain, tidak menghamburkan pada setiap orang, dan hanya mempergunakan di saat yang memang benar-benar tepat. Lalu, bagaimana jika kenikmatan itu berupa kenikmatan fisik, khususnya kecantikan seorang wanita? Mengobral kecantikan fisik pada setiap orang, seolah membiarkan barang yang amat berharga dijadikan keroyokan banyak orang. Dengan begitu, status berharga pun jadi barang rendah dan murah, karena setiap orang akan mudah menikmatinya, beginikah yang diinginkan para wanita? Hijab, Cantik Dimata Allah Semua itu tidak akan terjadi jika muslimah menuruti syariat Allah, mengenakan hijab. Berdasarkan perintah Allah, yang artinya: Di zaman Rasulullah para sahabiyah begitu mendengar ayat ini turun, langsung merobek selendang tebal mereka untuk dibuat menjadi kerudung. Ummu Salamah bercerita ketika ayat ini turun, maka wanita Anshar keluar dari rumah mereka dengan memakai kerudung, seakan-akan di atas kepala mereka ada burung gagak. Kecantikan fisik memang merupakan nikmat dari Allah. Nikmat akan bertambah jika pandai-pandai bersyukur kepada-Nya. Sebaliknya, nikmat bias berubah menjadi siksaan jika yang diberi nikmat tidak bias mensyukurinya. Ucapan “Alhamdulillah, wajah saya cantik,” saja, tidaklah cukup. Syukur yang benar adalah menggunakan nikmat itu untuk taat kepada Allah. Mensyukuri kecantikan fisik adalah dengan memperlakukan kenikmatan tersebut agar senantiasa sesuai dengan perintah Allah. Berjilbab Menjadikan Anda Cantik Berhijab itu cantik di mata Allah, walaupun di mata manusia pengumbar pandangan dianggap tidak kelihatan cantik. “Dengan berjilbab, saya jadi tetap cantik, kan?” begitulah kiranya komentar yang tepat. Tapi komentar ini pun bisa jadi salah besar. Lho? “Dengan berjilbab, kulit saya kan jadi tertutupi, tidak kepanasan, sehingga tidak menjadi coklat dan kusam. Nah saya kan jadi tambah cantik.” Wah, jika dimaknai seperti itu, amalan berjilbab pun jadi sia-sia. Memang, ada muslimah yang berhijab dengan niat yang tidak benar. Salah satunya seperti diatas tadi, berhijab untuk menjaga kecantikan kulit. Ada yang berhijab dengan niat menutupi cacat di tubuhnya. Ada pula yang berhijab agar terkesan sebagai wanita shalihah di mata masyarakat. Niat beramal shalih seharusnya dikembalikan ke jalan yang benar. Ingatlah, sabda Nabi, yang artinya: “ Sesungguhnya amalan itu tergantung pada niatnya. Setiap orang akan mendapatkan apa yang ia niatkan. Barangsiapa yang berhijrah karena Allah dan Rasul-Nya, maka ia akan sampai kepada Allah dan RasulNya. Dan barangsiapa yang hijarahnya karena dunia yang ingin diperolehnya, atau wanita yang akan dinikahinya, ia pun akan mendapatkannya.” (HR. Bukhari dan Muslim) Mungkin saja muslimah yang berniat tidak benar ini akan mendapatkan apa yang ia cari. Mungkin kulitnya memang akan tetap kuning, aib itu tertutupi dan nama baik bakal diperoleh. Tapi tentu saja tidak akan mendapatkan sesuatu yang lebih agung. Yaitu Ridha Allah. Saya Berjilbab Tapi Tetap Cantik, kan? Komentar di atas bisa jadi muncul dari seorang muslimah jilbaber. Sekali lagi, komentar di atas perlu di kritisi. Jika wajahnya memang sudah dari dulu cantik, tidak masalah komentar seperti itu. Tapi jika ‘tetap cantik’ ia artikan sebagai tetap bisa tampil cantik di luar rumah dengan pakaian ketat walaupun panjang, bibir berlipstik walaupun berjilbab, maka sama tidak bolehnya dengan yang di atas tadi. Muslimah yang seperti ini juga menjamur. Jilbab dalam pengertian mereka adalah ‘yang penting pakai kerudung’. Tidak perduli dengan criteria lainnya. Jadilah mereka jilbaber gaul yang kerudungnya mini, pakaiannya ketat, kakinya pun pake celana panjang sempit. Walaupun niatnya sudah benar karena Allah, namun jilbab yang ia kenakan seperti itu, tetap saja belum sempurna. Amal ibadah akan sempurna jika ada dua syarat, yaitu niatnya benar karena Allah, dan yang kedua sesuai dengan syariat. Berikut ini ketentuan hijab yang syar’i: Jilbab itu longgar, sehingga tidak memvisualisasikan lekuk-lekuk tubuh Tebal, sehingga tidak kelihatan sedikitpun bagian tubuhnya, warna kulitnya misalnya. Tidak memakai wangi-wangian Tidak meniru model pakaian wanita kafir. Tidak memilih warna kain yang mencolok, sehingga menjadi pusat perhatian orang. Menutupi seluruh tubuh, kecuali wajah dan kedua telapak tangan. Semua muslimah -yang cantik sejak lahir ataupun tidak- harus mempercantik dirinya sesuai dengan syariat. Jika sudah mengamalkan, jadikanlah kenikmatan yang Allah berikan itu selalu dijaga, tidak diobral layaknya barang murahan. Wallahu a’lam Keuntungan Berjilbab Bagi Wanita Kembali, saya akan memberikan wacana tentang jilbab untuk Anda, Sebagaimana sudah kita ketahui bersama bahwa Allah mewajibkan wanita menutup auratnya, artinya berjilbab bukan sekedar “gaya” tetapi salah satu bentuk ibadah dan aplikasi keimanan kepada Allah Swt. Tetapi Iblis dan turunannya sudah bersumpah akan menggoda anak cucu Adam untuk menemani mereka di neraka. Mau di alam nyata maupun dialam maya syetan dan iblis itu bertebaran, menggoda dengan sebuah maksud agar Anda jangan berjilbab, opini-opini dan wacana yang mengaburkan nilai-nilai spiritual seperti yang sering Anda lihat di Kompasiana salah satunya. Dan ternyata….Syetan sedikit berhasil…Wanita banyak mengatakan bahwa yang perlu dijilbab itu adalah hati, percuma saja jika kepala dan dada di jilbab tapi perliaku negative, begitulah kira-kira kampanye syetan dimuka bumi, padahal Allah sudah memerintahkan untuk menutup aurat dan yang boleh tampak hanyalah wajah dan telapak tangan, selebihnya harus ditutup kecuali kepada orang-orang yang dibolehkan.
Berikut ini ada ada beberapa keuntungan bagi para wanita yang berjilbab :
1. Jika Anda tergesa gesa harus keluar rumah dalam keperluan mendadak, darurat dan Anda tidak sempat sama sekali buat mendandani wajah maka menggunakan kerudung Instan terbuat dari kaos itu solusi terbaik, ini berlaku juga saat ada tamu dan kita perlu cepat-cepat untuk membukakan pintu.
2. Jika Anda ingin memberikan ASI pada bayi Anda ditempat umum (bagi yang menikah), Insya ALLAH dengan kerudung Anda dengan bebas bisa memberikannya ditempat umum karena aurat Anda tetap tertutup.
3. Jika Anda memiliki kelemahan dari rambut , Jilbab sebagai pentup aib tersebut, Anda tetap percaya diri dan beraktivitas penuh semangat.
4. Terhindar dari godaan untuk bersikap centil dan tidak sopan, biasanya jilbab bisa jadi alat control kepribadian wanita yang menggunakannya.
5. Sangat dihormati dan dihargai lawan jenis disekitar Anda, laki-laki merasa segan dan malu untuk mengganggu Anda.
 “ 101 Alasan Mengapa Pakai Jilbab ”
1. Menjalankan syi’ar Islam.
2. Berniat untuk ibadah.
3. Menutup aurat terhadap yang bukan muhrim.
4. Karena saya ingin ta’at kepada Allah yang telah menciptakan saya, menyempurnakan kejadian, memberi rizki, melindungi, dan menolong saya.
5. Karena saya ingin ta’at kepada Rasul-Nya, pembimbing ummat dengan risalah beliau.
6. Untuk memperoleh Ridho Allah (InsyaAllah).
7. Merupakan wujud tanda bersyukur atas nikmat-Nya yang tiada putus.
8. Seluruh ulama sepakat bahwa hukum mengenakan jilbab itu wajib.
9. Agar kaum wanita menutup auratnya.
10. Bukan karena gaya-gayaan.
11. Bukan karena mengikut trend.
12. Bukan karena berlagak sok suci.
13. Lebih baik sok suci dari pada sok zholim.
14. Tidak sekadar bermaksud agar berbeda dari yang lain.
15. Meninggikan derajat wanita dari belenggu kehinaan yang hanya menjadi objek nafsu semata.
16. Jilbab cocok untuk semua wanita yang mau menjaga dirinya dari objek nafsu semata.
17. Saya ingin menjadi wanita solihah.
18. Saya tengah berusaha mencapai derajat teqwa.
19. Jilbab adalah pakaian taqwa.
20. Jilbab adalah identitas wanita muslimah.
21. Diawali dengan mengenakan jilbab, saya ingin menapak jalan ke surga.
22. Menjauhkan diri dari azab panasnya api neraka di hari kemudian.
23. Istri-istri Rasulullah berbusana muslimah.
24. Para sahabiah (sahabat Rasulullah yang wanita) juga berbusana muslimah.
25. Mereka merupakan panutan seluruh muslimah, begitu juga saya.
26. Semoga Allah memberikan kepada kita balasan jannah yang sama seperti mereka.
27. Untuk meninggikan izzah Islam.
 28. Untuk meninggikan izzah (kemuliaan) diri sebagai wanita (muslimah).
29. Jilbab lebih melindungi diri.
30. Membuat saya lebih merasa aman.
31. Menjaga diri dari gangguan lelaki usil.
32. Menjaga diri dari obyek pandangan lelaki yang hanya ingin ‘cuci mata’.
33. Menjaga diri dari objek syahwat lelaki.
34. Menjaga diri dari mata lelaki yang jelalatan.
35. Menjaga diri dari tangan-tangan usil yang ingin menjamah.
36. Menghin dari zina mata dan zina hati.
37. Merupakan pencegahan dari perbuatan zina itu sendiri.
38. Jilbab dapat menghindari saya dari sikap-sikap yang negatif.
39. Jilbab dapat menghapus keinginan-keinginan yang menyimpang.
40. Membuat saya lebih bersahaja.
41. Membuat saya lebih khusyu’.
42. Mejauhkan saya dari perbuatan dosa (insyaAllah).
43. Membuat saya malu bila berbuat dosa.
44. Mendekatkan saya pada Allah.
45. Mendekatkan saya pada Rasulullah.
46. Mendekatkan saya pada nabi-nabi-Nya.
47. Mendekatkan saya pada sesama muslim.
48. Mendekatkan saya pada ajaran Islam.
49. Membuat saya tetap ingin belajar tentang Islam.
50. Membuat saya selalu merasa haus akan ajaran Islam.
51. Membuat saya tetap ingin menjalankan ajaran Islam.
52. Ajaran Islam berlaku sepanjang masa, tidak ada yang kuno.
53. Berjilbab bukan sesuatu yang kuno.
54. Mengatakan berjilbab itu kuno berarti telah menggugat otoritas Allah.
55. Allah Yang Maha Mengetahui lebih tahu apa yang terbaik bagi ummat-Nya.
56. Berjilbab, berarti menandakan kemajuan penerapan ajaran Islam di masa kini.
57. Merupakan satu barometer telah terbentuknya suatu lingkungan yang Islami.
58. Membedakan diri dari penganut agama lain.
59. Memudahkan dalam pengidentifikasian sesama saudari seiman.
60. Memperkuat tali silaturahmi dan ukuwah sesama muslimah.
61. Menghilangkan keraguan saya bila ingin menyapa saudari muslimah.
62. Memudahkan menanamkan rasa sayang-menyayangi sesama saudara/saudari seiman.
63. Membuat saya lebih terlihat anggun.
64. Membuat saya terlihat menyenangkan.
65. Membuat saya lebih terlihat wanita.
66. Tidak terlihat seperti laki-laki.
67. Membuat saya selalu berada dalam lingkungan yang Islami.
68. Jilbab menjaga saya dari pergaulan yang salah.
69. Memudahkan saya, dengan ijin Allah, mengenal lelaki yang salih.
70. Wanita yang baik (salihah) dengan lelaki yang baik (salih) pula.
71. Mudah-mudahan saya diberi jodoh lelaki yang salih
72. Jodoh merupakan urusan Allah.
73. Dengan keta’atan pada Allah, Allah akan memberikan kemudahan-Nya.
74. Memudahkan saya dalam beraktifitas..
75. Membuat lebih mudah bergerak.
76. Jilbab menjagaku sehingga tidak terlihat lekuk-lekuk tubuh
77. Sangat repot bila memakai pakaian wanita seperti trend saat ini (yang ketat).
78. Saya tidak suka memakai celana jeans.
79. Celana jeans yang ketat dapat menyebabkan kanker rahim karena suhu di sekitar rahim tidak beraturan. 80. Menghemat waktu dalam berpakaian.
81. Menghemat waktu dalam berhias.
82. Tidak perlu repot-repot selalu berusaha mengikuti trend mode yang berkembang.
83. Menghemat biaya untuk membeli pakaian yang sedang trend.
84. Menghemat biaya untuk membeli make up.
85. Melindungi kulit wajah dari make up yang dapat merusak kulit.
86. Melindungi kulit dari sengatan sinar matahari.
87. Meminimalkan penyakit kanker kulit.
88. Sengatan matahari dapat mengurangi kelembaban kulit sehingga kulit jadi kering.
89. Meminimalkan munculnya bintik-bintik hitam pada permukaan kulit akibat perubahan pigmen di usia tertentu.
90. Melindungi rambut dari debu-debu yang berterbangan.
91. Debu-debu itu dapat mengotori rambut dan menyebabkan rambut mudah rontok yang berakibat kebotakan.
92. Menuntun saya untuk hidup lebih sederhana.
93. Menghindari hidup yang konsumtif.
94. Membuat diri tidak silau dengan kemegahan dunia dan segala perhiasannya.
95. Membuat saya lebih memikirkan hal lain selain mode dan perhiasan.
96. Menempatkan wanita menjadi subjek dalam proses pembangunan ummat.
97. Lebih mudah dalam menabung.
98. Memiliki kesempatan untuk melakukan ibadah haji.
99. Memiliki kesempatan lebih banyak untuk berinfaq dan sedekah.
100.Itu berarti lebih banyak beramal untuk bekal di hari kemudian.
101.Membuat saya merasa menjadi wanita seutuhnya.
 Sumber : novitrivaizah.blogspot.com

Sabtu, 28 Januari 2012


 Jawaban Soal No.2

Listing Programnya


Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        kode.Items.Add("TS001")
        kode.Items.Add("TS002")
        kode.Items.Add("VG001")
        kode.Items.Add("VG002")
        buat_tabel()
    End Sub
    Sub cek()
        Dim x As String
        x = Microsoft.VisualBasic.Left(kode.Text, 2)
        If x = "TS" Then
            merk.Text = "Toshiba"
        ElseIf x = "VG" Then
            merk.Text = "V-Gen"
        End If
        x = Microsoft.VisualBasic.Mid(kode.Text, 3, 3)
        If x = "001" Then
            nama.Text = "Flasdisk 4GB"
        ElseIf x = "002" Then
            nama.Text = "Flasdisk 2GB"
        End If
        If kode.Text = "TS001" Then
            harga.Text = 105000
        ElseIf kode.Text = "TS002" Then
            harga.Text = 75000
        End If
        If kode.Text = "VG001" Then
            harga.Text = 90000
        ElseIf kode.Text = "VG002" Then
            harga.Text = 6000
        End If
    End Sub
    Sub buat_tabel()
        With LV
            .Columns.Add("No.pembelian", 85, HorizontalAlignment.Center)
            .Columns.Add("Kode Barang", 90, HorizontalAlignment.Center)
            .Columns.Add("Nama Barang", 80, HorizontalAlignment.Left)
            .Columns.Add("Merk", 70, HorizontalAlignment.Center)
            .Columns.Add("Harga", 75, HorizontalAlignment.Center)
            .Columns.Add("Jumlah Beli", 90, HorizontalAlignment.Center)
            .Columns.Add("Total Harga", 90, HorizontalAlignment.Center)
            .View = View.Details
            .GridLines = True
            .FullRowSelect = True
        End With
    End Sub
    Sub isi_tabel()
        Dim lst As New ListViewItem
        lst.Text = no.Text
        lst.SubItems.Add(kode.Text)
        lst.SubItems.Add(nama.Text)
        lst.SubItems.Add(merk.Text)
        lst.SubItems.Add(harga.Text)
        lst.SubItems.Add(jumlah.Text)
        lst.SubItems.Add(total.Text)
        LV.Items.Add(lst)
    End Sub
    Private Sub kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kode.SelectedIndexChanged
        Call cek()
    End Sub
    Private Sub jumlah_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles jumlah.KeyPress
        Dim tombol As Integer = Asc(e.KeyChar)
        If tombol = 13 Then
            cek()
            total.Text = Val(harga.Text) * Val(jumlah.Text)
        End If
    End Sub
    Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click
        isi_tabel()
    End Sub
    Private Sub btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbersih.Click
        no.Text = ""
        kode.Text = ""
        nama.Text = ""
        merk.Text = ""
        harga.Text = ""
        jumlah.Text = ""
        total.Text = ""
        no.Focus()
    End Sub
    Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click
        LV.Items.Clear()
    End Sub
    Private Sub btnpilih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpilih.Click
        LV.Items.Remove(LV.SelectedItems(0))
    End Sub
    Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
        End
    End Sub
End Class


Hasil Program


 Catatan :
Fungsi Tombol
* Simpan ke ListView : memasukkan data ke dalam tabel
* Bersih   : menghapus data
* Hapus Semua Data  : menghapus semua data yang ada di tabel
* Hapus Data yang di pilih   : menghapus salah satu data yang dipilih pada di tabel
* Keluar Program  : keluar dari program

Senin, 23 Januari 2012

STVIEW 

LISTING PROGRAM

Public Class Form1
    Sub BuatTabel()
        With LV
            .Columns.Add("NPM", 80, HorizontalAlignment.Center)
            .Columns.Add("Nama", 120, HorizontalAlignment.Left)
            .Columns.Add("Jenjang", 100, HorizontalAlignment.Left)
            .Columns.Add("Jurusan", 100, HorizontalAlignment.Left)
            .Columns.Add("Tahun Masuk", 100, HorizontalAlignment.Left)
            .Columns.Add("Nilai Angka", 80, HorizontalAlignment.Left)
            .Columns.Add("Nilai Huruf", 80, HorizontalAlignment.Left)
            .GridLines = True
            .FullRowSelect = True
            .View = View.Details
        End With
    End Sub
    Sub IsiTabel()
        Dim Lst As New ListViewItem
        With Lst
            .Text = npm.Text(0)
            .SubItems.Add(nama.Text)
            .SubItems.Add(jenjang.Text)
            .SubItems.Add(jurusan.Text)
            .SubItems.Add(tahunmasuk.Text)
            .SubItems.Add(angka.Text)
            .SubItems.Add(huruf.Text)
            lv.Items.Add(Lst)
        End With
    End Sub


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

    Private Sub npm_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles npm.TextChanged
        Dim X, Y As String
        X = Microsoft.VisualBasic.Mid(npm.Text, 3, 1)
        Y = Microsoft.VisualBasic.Mid(npm.Text, 4, 1)
        If X = "0" Then
            If Y = "2" Then
                jenjang.Text = "D3"
                jurusan.Text = "Manajemen Informatika"
            End If
        ElseIf X = "1" Then
            jenjang.Text = "S1"
            If Y = "1" Then
                jurusan.Text = "Tek.Informatika"
            ElseIf Y = "2" Then
                jurusan.Text = "Sis.Informasi"
            End If

        End If
    End Sub


    Private Sub angka_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles angka.KeyPress
        Dim tombol As Integer = Asc(e.KeyChar)
        If tombol = 13 Then
            CariNilai()
        End If

    End Sub

    Sub CariNilai()
        If ANGKA.Text >= 85 Then
            HURUF.Text = "A"
        ElseIf ANGKA.Text >= 75 Then
            HURUF.Text = "B"
        ElseIf ANGKA.Text >= 70 Then
            HURUF.Text = "C"
        ElseIf ANGKA.Text >= 60 Then
            HURUF.Text = "D"
        Else
            HURUF.Text = "E"
        End If

    End Sub


    Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click
        IsiTabel()
    End Sub

    Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click
        lv.Items.Clear()
    End Sub

    Private Sub btndata_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndata.Click
        lv.Items.Remove(lv.SelectedItems(0))
    End Sub

    Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
        End
    End Sub

    Private Sub btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbersih.Click
        npm.Text = ""
        nama.Text = ""
        jenjang.Text = ""
        jurusan.Text = ""
        tahunmasuk.Text = ""
        angka.Text = ""
        huruf.Text = ""

    End Sub
End Class


HASIL


Selasa, 17 Januari 2012

kemping yang menyenangkan dengan adik - adik didik

      disibolingit ada perkemahan persami se-Deli Serdang, sebagai kakak didik nya saya harus ikut mengikuti persami tersebut tetapi karena luang waktu saya tidak banyak maka saya tidak menghadirinya tidak seperti biasanya karena saya sudah berkuliah di STMIK BUDIDARMA MEDAN, tapi saya mempunyai teman - teman yang luar biasa mengerti
       dimulai dengan cerita tersebut akhirnya saya bisa hadir di hari minggunya, tidak menyia - nyiakan waktu saya bersiap untuk memberikan semangat kepada adik didik dan beserta ilmu yang saya punya, di bidang Pramuka saya ahli dalam "MORSE" yang diciptakan yang bernama Baden Powel, karena mulai berkembangnya waktu morse ini sudah banyak tidak digunakan karena sudah canggihnya fasilitas..
      tapi saya pikir bahwa ketika kita sudah masuk dalam suatu hutan dan terjadi sesuatu yang tidak diinginkan maka hal yang secanggih apapun kembali kepada hal yang manual, maka saya berikan arahan kepada adik didik saya bahwa kita harus mempunyai skill yang seimbang ketika kita sudah masuk dalam naungan "PRAMUKA" mengapa demikian karena yang namanya pramuka disimbolkan dengan "tunas kelapa"
      yang artinya berguna disetiap yang dia punya contoh nya ketika nanti sudah dewasa sang kelapa apa yang ia guna dipakai oleh masyarakat banyak, kelapa berguna untuk olahan masak, batangnya berguna untuk bangunan dan sebagainya..
     ketika saya sampaikan hal tersebut adik didik saya menjadi semangat untuk mengikuti perkemahan tersebut dan tidak banyak mengeluh dalam diri mereka,ketika itu saya sangat senang apa yang sebenarnya belum banyak saya perbuatan tapi sudah menjadi motivasi adik didik saya....









  
gambar kegiatan bersama kakak pramuka dan adik didik PRAMUKA









Senin, 16 Januari 2012

Mengenai saya
     "Assalamu'alaikum yang baca profil saya^_^" saya anak pertama dari tujuh bersaudara "gak boleh pake kaget bacanya ya" domisili tinggal di Lubuk PAkam City, untuk mengenai sifat saya, saya orangnya fleksibel artinya tidak memilih ataupun memilah sahabat saya karena semua adalah saudara,.loh kok gitu..!!?
      kalaw sahabat seagama namanya saudara seiman
      kalaw sahabat satu negera namanaya saudara seindonesia
      kalaw sahabat jauh namanya saudara satu nenek adam...
      hehehehehe "gak boleh pake komentar lagi"
kegiatan sehari - hari saya suka bercekeramah dengan namanya IT "Ilmu Teknologi" karena menarik buat saya, ada hal yang baru dan belum pernah di jaman sebelumnya...
      dan untuk lebih dekat dengan saya, saya kelas MI 1009 Malam,..
sering duduk dimushla ataupun berkumpul dikantin kampus bersama temen - temen kelas, mmm..........??!!, itu dulu deh mengenai saya kalau penasaran sapa az ya..^_^
biar lebih afdol ne gambar saya 
panggil az "Marsyah" ataupun "dian"
wassalam
nikmatnya refreshing ^_^
     hal yang menyenangkan dalam hidup ku adalah mencari hal yang baru dan belum pernah, untuk itu saya mencari tempat yang baru untuk mencari suasana yang segar karenya di waktu - waktu yang sibuk harus ada ruang atau waktu yang harus saya kosongkan,..
      jadi di awal bulan sembilan saya pergi bersama temen -temen ke danau dwi warna, disana tidak mudah menjalaninya "kata temen - temen"
wihhh,.. denger itu saya menjadi bersemangat untuk kesana karena itu yang saya cari dan itu nikmatnya berpergian ne cerita sedikit pengalaman saya dalam perjalanan karena saya asal pakam kami berpergian berkendara naik kereta ke tempat wisata yang kami tuju, belum kesana az perjalanan dah sangat "menyenangkan" bagi saya
     ap hal karena dalam perjalanan sibolangit (dwi warna) kami sudah di wejangkan perjalanan berliku - liku wih muantap deh pokoke, setibanya disana mulai lah tantangan itu ternyata oh ternyata tidak ada bisa masuk kendaraan disana, maka mulai lah kami berjalan kedalam banyak hal yang saya lihat dan utamanya dalam hati saya "nih la ciptaan Allah yang begitu luas nan indah" betapa terpesona saya dalam perjalanan dan untungnya tidak nyasar"hehe"...
untuk lebih muantap ne gambar Air terjun Dwi warna

     ayoooo cape yang berminat perjalanan ditempuh 2 jam untuk laki - laki semua,...
kalaw ada ayangnya ya kira 3 jam an geto..
KEGIATAN SAYA DI 2011
    dalam tahun 2011 awal yang sangat padat di kampus maupun di daerah saya, tiap bulan insya Allah disibukkan dengan kegiatan kampus dan juga kegiatan diluarnya, insya Allah di kegiatan kampus saya mengikuti kegiatan ke Rohanian LDK Al - Hayyan BudiDarma Medan, kegiatan nya sangat luar biasa padat Alhamdulillah saya di Bidang Dakwah dan sebagai ketua dakwahnya,...
    kegiatan ini  ataupun organisasi ini mempunyai banyak tantangan, sebab untuk melakukan sesautu saya harus menjadi tauladan dari teman2 lainnya baru saya harus sampaikan kepada teman2, bukan hanya tantangan tapi resiko yang tinggi karena sebagai manusia biasa ada hal banyak pandangan positip maupun negatif.
      tapi saya mempunyai keyakinan bahwa tuhan (Allah) tidak akan membiarkan ummat nya menyampaikan kebaikan dengan niat karenanya(Allah). tidak jauh beda dengan kegiatan saya diluar kampus, kegiatan yang tidak jauh dan lepas dari hal agama di bulan awal desember 2011 ada kegiatan yang namanya MOST CLUB yang bertujuan untuk mendidik anak sekolah berprestasi dari bidang ap az..
       dan lebih - lebih adalah bidang agama untuk mencapai hal itu ada tingkatan kerja sama antara orang tua guru maupun yang didik, ada sebuah kegiatan yang nama mentoring dimana sebuah forum untuk banyak hal dilakukan bebas berpendapat tidak ada yang ditutup - tutupi..
                                                 wallahu'alam

           

Hubungan Visual Basic .NET dengan Visual Basic 6.0 (VB)

Pada Visual Basic.NET sintaksis bahasanya tidak mengalami perubahan yang sangat drastis, dan hanya menambahkan beberapa dukungan fitur baru seperti penanganan eksepsi secara terstruktur dan ekspresi yang bisa di-short-circuit-kan. Dua perubahan tipe data pun terjadi saat berpindah ke Visual Basic .NET. Dibandingkan dengan Visual Basic 6.0, tipe data Integer yang dimiliki oleh Visual Basic .NET memiliki panjang dua kali lebih panjang, dari 16 bit menjadi 32 bit. Selain itu, tipe data Long juga sama-sama berubah menjadi dua kali lipat lebih panjang, dari 32 bit menjadi 64 bit. Bilangan bulat 16-bit dalam Visual Basic .NET dinamakan dengan Short. Lagi pula, desainer GUI Windows Forms yang terdapat di dalam Visual Studio .NET atau Visual Basic .NET memiliki gaya yang sangat mirip dengan editor form Visual Basic 6.0.

Jika sintaksis tidak banyak yang berubah, lain halnya dengan semantik, yang berubah secara signifikan. Visual Basic .NET merupakan sebuah bahasa pemrograman yang mendukung fitur "Bahasa Pemrograman Berorientasi Objek" secara penuh, karena memang didukung oleh arsitektur Microsoft .NET Framework, yang mengandung kombinasi dari Common Language Runtime dan Base Class Library. Visual Basic klasik, hanya merupakan sebuah bahasa pemrogaman berbasis objek, yang berjalan di atas arsitektur Component Object Model (COM).

Perubahan ini telah mengubah banyak asumsi tentang hal yang benar yang harus dilakukan dengan mempertimbangkan performa dan kemudahan untuk dipelihara. Beberapa fungsi dan pustaka perangkat lunak, yang ada di dalam Visual Basic klasik, kini tidak terdapat di dalam Visual Basic .NET; mungkin masih banyak yang masih terdapat di dalam Visual Basic .NET, tapi tidak seefisien apa yang ditawarkan oleh .NET Framework. Bahkan jika program Visual Basic 6.0 bisa dikompilasi dengan benar, sebagian besar program Visual Basic 6.0 harus melalui beberapa proses refactoring untuk mengadopsi fitur bahasa baru secara keseluruhan. Dokumentasi untuk ini pun tersedia di situs Microsoft.

Kelebihan dan Kekurangan Visual Basic 6.0 (VB)

Microsoft visual basic 6.0 mempunyai banyak kelebihan dibandingkan software atau bahasa pemograman lainnya, diantara kelebihan dari visual basic adalah, sebagai berikut :
  • Kurva pembelajaran dan pengembangan yang lebih singkat dibandingkan bahasa pemrograman yang lain seperti C/C++, Delphi atau bahkan PowerBuilder sekalipun.
  • Menghilangkan kompleksitas pemanggilan fungsi windows API, karena banyak fungsi – fungsi tersebut sudah di “embedded” kedalam syntax visual basic.
  • Cocok digunakan untuk mengembangkan aplikasi / program yang bersifat “Rapid Application Development).
  • Sangat cocok digunakan untuk membuat program atau aplikasi bisnis.
  • Digunakan oleh hampir microsoft office sebagai bahasa macro dan segera akan diikuti oleh yang lainnya.
  • Dapat membuat ActiveX Control
  • Dapat menggunakan OCX atau komponen yang disediakan oleh pihak ketiga (Third Party) sebagai tools pengembang.
  • Menyediakan wizard yang sangat berguna untuk mempersingkat atau mempermudah pengembangan aplikasi.
  • Mendekati Object Oriented Programming.
  • Dapat di-integrasikan dengan internet, baik itu pada sisi Client maupun pada sisi Server.
  • Dapat membuat ActiveX Automation Server.
  • integrasi dengan Microsoft Transaction Server.
  • Dapat menjalankan server tersebut dari mesin yang sama atau bahkan dari mesin atau komputer yang lain.

Meskipun visual basic memiliki banyak kelebihan tetapi tetap saja mempunyai kekurangan atau kelemahan. Kelemahan tersebut karena disebabkan oleh keterbatasan visual basic dalam mengambil fungsi – fungsi yang bersifat low-level yang berhubungan dengan hardware maupun operating system windows itu sendiri, kekurangan dalam visual basic antara lain, adalah :
  1. File Distribusi Runtime lebih besar dari C/C++.
  2. Tidak mempunyai fungsi – fungsi untuk mengambil fitur – fitur dari operating system sebanyak C/C++.

Pengertian Visual Basic 6.0 ( VB )

Microsoft Visual Basic adalah merupakan sebuah bahasa pemrograman komputer yang menjadi sarana ( Tools ) untuk menghasilkan program – program aplikasi yang berbasis windows.

  1. Sarana akses data yang lebih cepat dan handal untuk membuat aplikasi basis data yang berkemampuan tinggi.
  2. Tambahan contol – control baru lebih canggih serta peningkatan kaidah struktur bahasa visual basic.
  3. Visual Basic memiliki beberapa versi atau edisi yang disesuaikan dengan kebutuhan pemakainya.

Berikut ini perjalanan Visual Basic ( VB 1.0 sampai VB 6.0 ) yaitu :
  1.   Proyek “ Thunder” dirintis.
  2. Visual Basic 1.0 ( May 1991 ) di rilis untuk windows pada Comdex / Windows Wordltrade yang dipertunjukkan di Atlanta, Georgia.
  3. Visual Basic 1.0 untuk DOS di rilis pada bulan September 1992. Bahasa ini kompatibel dengan Visual Basic For Windows. VB 1.0 for DOS ini pada kenyataannya merupakan versi kelanjutan dari compiler BASIC, Quick Basic dan BASIC Professional Development System
  4. Visual Basic 2.0 di rilis pada November 1992, cakupan pemrogramannya cukup mudah untuk digunakan dan kecepatannya juga telah di nodifikasi. Khususnya pada Form yang menjadikan object dapat dibuat secara seketika, serta konsep dasar dari Class modul yang berikutnya di implementasikan pada VB 4.
  5. Visual Basic 3.0 di rilis pada musim panas 1993 dan dibagi menjadi versi standard an professional. VB 3 memasukan Versi 1.1 dari Microsoft Jet Data base Engine yang dapat membaca serta menulis database Jet ( atau Access ) 1.x
  6. Visual Basic 4.0 ( Agustus 1995 ) merupakan versi pertama yang dapat membuat windows program 32 bit sebaik versi 16 bit nya. VB 4 juga memperkenalkan kemampuan untuk menulis non-GUI class pada Visual Basic.
  7.   Visual Basic 5.0 ( Februari 1997 ), Microsoft merilis secara ekslusif Visual Basic untuk versi windows 32 bit. Programmer yang menulis programnya pada versi 16 bit dapat dengan mudah melakukan import programnya dari VB 4, VB 5 memperkenalkan kemampuan untuk membuat User Control.
  8. Visual Basic 6.0 ( pertengahan 1999), memperbaiki beberapa cakupan, termasuk kemampuannya untuk membuat Aplikasi Web-based. Visual Basic 6 di jadwalkan akan memasuki Microsoft “ fasa non Supported “ dimulai pada Maret 2008.

Versi Visual Basic .NET

Terdapat tiga buah versi Visual Basic yang dirilis hingga bulan Agustus 2007, yakni:
Visual Basic .NET 2002 (VB 7.0)

Versi pertama dari Visual Basic .NET adalah Visual Basic .NET 2002 yang dirilis pertama kali pada bulan Februari 2002. Visual Basic .NET 2002 merupakan sebuah bahasa visual yang berbasis bahasa BASIC (sama seperti halnya Visual Basic 6.0, tetapi lebih disempurnakan dan lebih berorientasi objek), dan didesain untuk berjalan di atas Microsoft .NET Framework versi 1.0.

Versi 7.0 ini dirilis bersamaan dengan Visual C# dan ASP.NET. Bahasa C#, yang dianggap sebagai jawaban terhadap Java, mendapatkan perhatian yang lebih banyak dibandingkan dengan VB.NET yang kurang begitu banyak diulas. Hasilnya, sedikit orang di luar komunitas Visual Basic yang memperhatikan VB.NET. Versi pertama ini kurang mendapat sambutan yang bagus dari para programmer, dan pada saat itu, program berbasis Visual Basic 6.0 sedang marak-maraknya dibuat. Para programmer yang mencoba Visual Basic .NET untuk pertama kali akan merasakan bahwa Visual Basic .NET sangatlah berbeda dibandingkan dengan Visual Basic sebelumnya. Contoh yang paling mudah adalah runtime engine yang lebih besar 10 kali lipat dibandingkan Visual Basic 6.0, dan juga meningkatkan beban di memori.

Visual Basic .NET 2003 (VB 7.1)
Selanjutnya, pada bulan Maret 2003, Microsoft pun merilis lagi versi yang lebih baru dari Visual Basic .NET, Visual Basic .NET 2003. Versi ini berisi beberapa perbaikan dibandingkan dengan versi sebelumnya, dan aplikasi yang dibuatnya dapat berjalan di atas .NET Framework versi 1.1. Fitur yang ditambahkan adalah dukungan terhadap .NET Compact Framework dan mesin wizard upgrade VB6 ke VB.NET yang telah ditingkatkan. Peningkatan yang lainnya adalah peningkatan pada performa dan keandalan dari Integrated Development Environment (IDE) Visual Basic itu sendiri, dan juga runtime engine.

Visual Basic .NET 2003 tersedia dalam beberapa jenis cita rasa: Professional, Enterprise Architect dan Academic Edition. Khusus untuk Visual Basic .NET 2003 Academic Edition, versi tersebut didistribusikan secara gratis untuk beberapa sekolah di dalam setiap negara; versi Professional dan Enterprise Architect merupakan produk komersial.

Visual Basic 2005 (VB 8.0)
Setelah itu, Microsoft pun berkonsentrasi dalam mengembangkan Microsoft .NET Framework 2.0, dan tentunya alat bantu untuk membangun program di atasnya. Hingga pada tahun 2005, mereka pun merilis versi terbaru dari Visual Basic .NET, yang kali ini disebut dengan Visual Basic 2005 (dengan membuang kata ".NET"), bersama-sama dengan beberapa aplikasi pengembangan lainnya.
Untuk rilis 2005 ini, Microsoft menambahkan beberapa fitur baru, di antaranya adalah:
• Edit and Continue
Fitur ini sebelumnya terdapat di dalam Visual Basic, akan tetapi dihapus di dalam Visual Basic .NET. Dengan keberadaan fitur ini, para programmer dapat memodifikasi kode pada saat program dieksekusi dan melanjutkan proses eksekusi dengan kode yang telah dimodifikasi tersebut.
• Evaluasi ekspresi pada saat waktu desain
• Munculnya Pseudo-Namespace "My", yang menyediakan:
o Akses yang mudah terhadap beberapa area tertentu dari dalam .NET Framework yang tanpanya membutuhkan kode yang sangat signifikan.
o Kelas-kelas yang dibuat secara dinamis (khususnya My.Forms).
• Peningkatan yang dilakukan terhadap konverter kode sumber dari Visual Basic ke Visual Basic .NET.
• Penggunaan kata kunci (keyword) Using, yang menyederhanakan penggunaan objek-objek yang membutuhkan pola Dispose untuk membebaskan sumber daya yang sudah tidak terpakai.
• Just My Code, yang menyembunyikan kode reusable yang ditulis oleh alat bantu Integrated Development Environment (IDE) Visual Studio .NET.
• Pengikatan sumber data (Data Source binding), yang mampu mempermudah pengembangan aplikasi basis data berbasis klien/server.
Fungsi-fungsi yang tersebut di atas (khususnya My) ditujukan untuk memfokuskan Visual Basic .NET sebagai sebuah platform pengembangan aplikasi secara cepat dan "menjauhkannya" dari bahasa C#.
Bahasa Visual Basic 2005 memperkenalkan fitur-fitur baru, yakni:
• Bawaan .NET Framework 2.0:
o Generics
o Partial class, sebuah metode yang dapat digunakan untuk mendefinisikan beberapa bagian dari sebuah kelas di dalam sebuah berkas, lalu menambahkan definisinya di lain waktu; sangat berguna khususnya ketika mengintegrasikan kode pengguna dengan kode yang dibuat secara otomatis.
o Nullable Type
• Komentar XML yang dapat diproses dengan menggunakan beberapa alat bantu seperti NDoc untuk membuat dokumentasi secara otomatis.
• Operator overloading
• Dukungan terhadap tipe data bilangan bulat tak bertanda (unsigned integer) yang umumnya digunakan di dalam bahasa lainnya.

Visual Basic 9.0 (Visual Basic 2008)
Versi ini merupakan versi terbaru yang dirilis oleh Microsoft pada tanggal 19 November 2007, bersamaan dengan dirilisnya Microsoft Visual C# 2008, Microsoft Visual C++ 2008, dan Microsoft .NET Framework 3.5.
Dalam versi ini, Microsoft menambahkan banyak fitur baru, termasuk di antaranya adalah:
  • Operator If sekarang merupakan operator ternary (membutuhkan tiga operand), dengan sintaksis If (boolean, nilai, nilai). Ini dimaksudkan untuk mengganti fungsi IIF.
  • Dukungan anonymous types
  • Dukungan terhadap Language Integrated Query (LINQ)
  • Dukungan terhadap ekspresi Lambda
  • Dukungan terhadap literal XML
  • Dukungan terhadap inferensi tipe data.
  • dukungan terhadap 'LINQ'
Pengertian Visual Basic .NET
Microsoft Visual Basic .NET adalah sebuah alat untuk mengembangkan dan membangun aplikasi yang bergerak di atas sistem .NET Framework, dengan menggunakan bahasa BASIC. Dengan menggunakan alat ini, para programmer dapat membangun aplikasi Windows Forms, Aplikasi web berbasis ASP.NET, dan juga aplikasi command-line. Alat ini dapat diperoleh secara terpisah dari beberapa produk lainnya (seperti Microsoft Visual C++, Visual C#, atau Visual J#), atau juga dapat diperoleh secara terpadu dalam Microsoft Visual Studio .NET. Bahasa Visual Basic .NET sendiri menganut paradigma bahasa pemrograman berorientasi objek yang dapat dilihat sebagai evolusi dari Microsoft Visual Basic versi sebelumnya yang diimplementasikan di atas .NET Framework. Peluncurannya mengundang kontroversi, mengingat banyak sekali perubahan yang dilakukan oleh Microsoft, dan versi baru ini tidak kompatibel dengan versi terdahulu.

Selasa, 04 Oktober 2011

Visual Basic 9.0 (Visual Basic 2008) Versi ini merupakan versi terbaru yang dirilis oleh Microsoft pada tanggal 19 November 2007, bersamaan dengan dirilisnya Microsoft Visual C# 2008, Microsoft Visual C++ 2008, dan Microsoft .NET Framework 3.5. Dalam versi ini, Microsoft menambahkan banyak fitur baru, termasuk di antaranya adalah: * Operator If sekarang merupakan operator ternary (membutuhkan tiga operand), dengan sintaksis If (boolean, nilai, nilai). Ini dimaksudkan untuk mengganti fungsi IIF. * Dukungan anonymous types * Dukungan terhadap Language Integrated Query (LINQ) * Dukungan terhadap ekspresi Lambda * Dukungan terhadap literal XML * Dukungan terhadap inferensi tipe data. * dukungan terhadap 'LINQ' Hubungan dengan Visual Basic klasik Apakah Visual Basic .NET dianggap sebagai sebuah versi Visual Basic atau benar-benar bahasa yang berbeda merupakan sebuah topik perdebatan yang hangat. Hal ini dikarenakan sintaksis bahasa Visual Basic .NET tidak mengalami perubahan yang sangat drastis, dan hanya menambahkan beberapa dukungan fitur baru seperti penanganan eksepsi secara terstruktur dan ekspresi yang bisa di-short-circuit-kan. Dua perubahan tipe data pun terjadi saat berpindah ke Visual Basic .NET. Dibandingkan dengan Visual Basic 6.0, tipe data Integer yang dimiliki oleh Visual Basic .NET memiliki panjang dua kali lebih panjang, dari 16 bit menjadi 32 bit. Selain itu, tipe data Long juga sama-sama berubah menjadi dua kali lipat lebih panjang, dari 32 bit menjadi 64 bit. Bilangan bulat 16-bit dalam Visual Basic .NET dinamakan dengan Short. Lagi pula, desainer GUI Windows Forms yang terdapat di dalam Visual Studio .NET atau Visual Basic .NET memiliki gaya yang sangat mirip dengan editor form Visual Basic klasik. Jika sintaksis tidak banyak yang berubah, lain halnya dengan semantik, yang berubah secara signifikan. Visual Basic .NET merupakan sebuah bahasa pemrograman yang mendukung fitur "Bahasa Pemrograman Berorientasi Objek" secara penuh, karena memang didukung oleh arsitektur Microsoft .NET Framework, yang mengandung kombinasi dari Common Language Runtime dan Base Class Library. Visual Basic klasik, hanya merupakan sebuah bahasa pemrogaman berbasis objek, yang berjalan di atas arsitektur Component Object Model (COM). Perubahan ini telah mengubah banyak asumsi tentang hal yang benar yang harus dilakukan dengan mempertimbangkan performa dan kemudahan untuk dipelihara. Beberapa fungsi dan pustaka perangkat lunak, yang ada di dalam Visual Basic klasik, kini tidak terdapat di dalam Visual Basic .NET; mungkin masih banyak yang masih terdapat di dalam Visual Basic .NET, tapi tidak seefisien apa yang ditawarkan oleh .NET Framework. Bahkan jika program Visual Basic klasik bisa dikompilasi dengan benar, sebagian besar program Visual Basic klasik harus melalui beberapa proses refactoring untuk mengadopsi fitur bahasa baru secara keseluruhan. Dokumentasi untuk ini pun tersedia di situs Microsoft[1]. [sunting] Contoh Pemrograman Contoh program sederhana dalam bahasa Visual Basic .NET yang dipakai untuk menghitung jumlah pembayaran dari m_item buah barang dengan harga m_price per item ditambah 5% pajak penjualan: [2]. Dim m_item, m_price, tax, total As double m_item = double.Parse(textBox1.Text) m_price = double.Parse(textBox2.Text) tax = 0.05 total = m_item * m_price * (1 + tax) label5.Text = total.ToString() MessageBox.Show("Well Done.") Berikut ini adalah contoh lain dari program Visual Basic yang menggunakan objek CheckBox dan ComboBox untuk menghitung jumlah kredit mata kuliah yang diambil oleh seorang mahasiswa (masing-masing mata kuliah = 3 kredit): Dim total As Integer total = 0 ' awal dari jumlah kredit total If (CheckBox1.Checked = True) Then 'boleh memilih semua checkbox total += 3 End If If (CheckBox2.Checked = True) Then total = total + 3 End If If (CheckBox3.Checked = True) Then total = total + 3 End If If (ComboBox1.SelectedIndex = 0) Then 'hanya bisa memilih satu total = total + 3 ElseIf (ComboBox1.SelectedIndex = 1) Then total = total + 3 ElseIf (ComboBox1.SelectedIndex = 2) Then total = total + 3 End If