#Post Title #Post Title #Post Title
Kamis, 31 Mei 2012

TUTORIAL CARI



Imports MySql.Data.MySqlClient
Public Class FPenerbit
    Dim MyCon As New MySqlConnection("Server=localhost;User id=root;Password=3306;Database=Perpustakaan")

    Private Sub FMahasiswa_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit", MyCon)
        Dim MyDataTbl As New DataTable
        MyAdapter.Fill(MyDataTbl)
        DGV.DataSource = MyDataTbl
    End Sub

    Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
        If MsgBox("YAKIN ANDA MAU KELUAR?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Konfirmasi") = MsgBoxResult.Yes Then
            End
        End If
    End Sub

    Private Sub Txtcari_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Txtcari.KeyPress
        If e.KeyChar = vbCr Then
            If cmbcari.Text = "IdPenerbit" Then
                Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit Where NPM Like '%" & txtcari.Text & "%'", MyCon)
                Dim MyDataTbl As New DataTable
                MyAdapter.Fill(MyDataTbl)
                DGV.DataSource = MyDataTbl
            ElseIf cmbcari.Text = "Nama" Then
                Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit Where Nama Like '%" & txtcari.Text & "%'", MyCon)
                Dim MyDataTbl As New DataTable
                MyAdapter.Fill(MyDataTbl)
                DGV.DataSource = MyDataTbl
            ElseIf cmbcari.Text = "Alamat" Then
                Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit Where TGLLAHIR Like '%" & txtcari.Text & "%'", MyCon)
                Dim MyDataTbl As New DataTable
                MyAdapter.Fill(MyDataTbl)
                DGV.DataSource = MyDataTbl
            ElseIf cmbcari.Text = "Kota" Then
                Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit Where JKel Like '%" & txtcari.Text & "%'", MyCon)
                Dim MyDataTbl As New DataTable
                MyAdapter.Fill(MyDataTbl)
                DGV.DataSource = MyDataTbl
            ElseIf cmbcari.Text = "NoTelepon" Then
                Dim MyAdapter As New MySqlDataAdapter("Select IdPenerbit,Nama,Alamat,Kota,NoTelepon from Penerbit Where ALAMAT Like '%" & txtcari.Text & "%'", MyCon)
                Dim MyDataTbl As New DataTable
                MyAdapter.Fill(MyDataTbl)
                DGV.DataSource = MyDataTbl
            End If
        End If
    End Sub

    Private Sub Txtcari_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Txtcari.TextChanged

    End Sub

    Private Sub Btntambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntambah.Click
        Btntambah.Focus()
        FPenerbit_Tambah.ShowDialog()
        Me.Close()
    End Sub

    Private Sub txtcari_TextChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtcari.TextChanged

    End Sub
End Class


[ Read More ]

TUTORIAL MENAMBAHKAN RECORD DATA


Awalnya buat lah mysql seperti biasa :


Kemudian buat form dan koneksikan mysql ke vb seperti pada postingan sebelumnya,
kemudian buat form seperti pada gambar :

form1 (Fpenerbit)

Form2 (Ftambah)

Setelah membuat form pada tombol tambah (form1) di masukkan rumus untuk mengalihkan from ke From2

Private Sub Btntambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntambah.Click
        Btntambah.Focus()
        FPenerbit_Tambah.ShowDialog()
        Me.Close()
    End Sub



 Kemudian pada tombol simpan di Form2 dimasukkan rumus sbb :



Imports MySql.Data.MySqlClient
Public Class FPenerbit_Tambah
    Dim MyCon As New MySqlConnection("Server=localhost;User id=root;Password=3306;Database=perpustakaan")
    Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click
        MyCon.Open()
        Dim StrSQL As String = "Insert Into penerbit (idPenerbit,Nama,Alamat,Kota,NoTelepon) values ('" & txtid.Text & "','" & txtnama.Text & "','" & txtalamat.Text & "','" & txtkota.Text & "','" & txtno.Text & "')"
        Dim mycmd As New MySqlCommand(StrSQL, MyCon)
        Dim rdr As MySqlDataReader = mycmd.ExecuteReader
        Me.Close()
    End Sub

[ Read More ]

DOWNLOAD VISUAL BASIC



Peluncuran Visual Basic.NET atau Visual Studio oleh Microsoft membuat para programer VB (biasa di sebut) cukup senang adanya software visual basic 2010 express baru ini, pada kesempatan kali ini saya akan mengajarkan pembelajaran - pembelajaran dasar untuk anda yang baru ingin belajar visual basic 2008 atau 2010, visual basic 2008 dan 2010 tidaklah jauh berbeda, jadi jika anda sudah dapat menguasai salah satunya di jamin anda bisa mengusai keduanya.

tutorial-tutorial yang saya berikan akan bersambung dengan artikel selanjutnya, jadi anda hanya tinggal klik next dan next untuk pembelajar selanjutnya. sumber penulisan tutorial - tutorial belajar visual basic untuk pemula ini saya adaptasi dari blog luar negri yang berbahasa inggris dan saya artikan dengan bahasa indonesia dengan sedikit perubahan tentunya, agar dapat lebih di mengerti :D

untuk itu kunjungi terus www.zengbogel.blogspot.com .. ok ..hehehe

*Sedikit info untuk motivasi :
dengan visual basic anda dapat membuat software-software menarik seperti game, anti virus, dan software-software menarik lainnya .

Sebelum kita belajar lebih jauh pertama - pertama anda harus download software nya terlebih dahulu di Microsoft langsung, tidak perlu panik karena gratis, hanya tinggal registrasi dengan serial number valid agar software tersebut tidak trial, dan kebetulan saya ada serial number visual basic 2010 express yang akan saya bagikan untuk anda

Download visual basic 2010 express :
http://www.microsoft.com/visualstudio/en-us/products/2010-editions/express
*Scroll kebawah kemudian klik Visual Basic 2010 Express

Serial Number : 2KQT8-HV27P-GTTV9-2WBVV-M7Y96
Update
Kelihatannya serial number VB.NET ini Sudah di ubah untuk tahun 2012 ini, jadi jika serial number di atas tidak bisa di gunakan, mohon gunakan serial number di bawah ini :
2KQT8-HV27P-GTTV9-2WBVV-M7X96
Atau:
YCFHQ-9DWCY-DKV88-T2TMH-G7BHP
Catatan : Proses download dan install visual basic 2010 express ini memang memakan waktu cukup lama, tapi jika anda benar-benar serius untuk belajar visual basic anda patut mendownload dan menginstall nya.


Setelah anda download dan install software microsoft ini, sekarang saatnya untuk membuatnya tidak trial. dengan cara sbb :

Buka Visual basic 2010 express nya.
Pilih Help dan Pilih Register Product kemudian masukan kode lisensi (serial number)



Bila semua proses lancar silahkan lihat apakah sudah berhasil dengan cara pilih Help lalu pilih About Microsoft Visual Basic 2010 Express dan lihat di sudut kanan atas Licensed To




Sekarang anda sudah punya softwarenya, saatnya kita untuk mempelajarinya ....

[ Read More ]
Selasa, 29 Mei 2012

MENGENAL VISUAL BASIC (2008) & (2010)

Kita akan mengenal tampilan awal serta properties pada  vb 2008 dan 2010

 berikut tampilan awal visual basic 2010 express :



dan berikut tampilan awal di visual basic 2008 :


Sebagai pemula, Sebaiknya Anda memiliih dengan opsi : "Windows Forms Application", dalam folder "New project". Ini berarti bahwa Anda akan merancang sebuah program untuk dijalankan pada komputer yang menjalankan sistem operasi Microsoft Windows.

Jika Anda melihat di textbox di bagian kanan, Anda akan melihat "WindowsApplication1". Ini adalah nama default untuk proyek-proyek Anda.

  Itu bukan nama yang baik untuk project anda. untuk mengubahnya klik kanan di tulisan tersebut dan pilih rename kemudian ubah namanya dengan nama "My First Project".

Maka akan terlihat seperti berikut :

tampilan untuk visual basic 2008




tampilan untuk visual basic 2010



Anda mungkin telah melihat daerah di sebelah kanan bawah dari VB kan, daerah dengan semua text dan box dalam kotak, salah satunya memiliki nama seperti "Auto Size", "AccessibleName", "AccessibleRole". dan lain-lain, dan Itulah kotak Properties yang akan kita bahas kali ini.

Di sebelah kanan dari lingkungan desain visual basic, kotak properti akan seperti tampilannya :



Dalam Kotak property Apa yang Anda cari adalah suatu daftar dari sifat-sifat yang membentuk dan memiliki: Nama, BackColor, Font, Gambar, Teks, dll, sifat-sifat ini adalah nilai-nilai untuk mereka. Nilai-nilai ini adalah nilai-nilai default, dan dapat diubah.

Terlebih dahulu anda arahkan konsentrasi propertiesnya ke form1 dengan cara klik di manapun asalkan di dalam kotak form kita, hingga kotak property terkonsntrasi ke form kita.

Begitu pula untuk yang lain seperti Label, untuk mengubah propertynya kita cukup klik pada label yang ingin kita ubah propertynya dan pastikan kotak property berubah nama menjadi nama Label kita.


Pertama, Anda mungkin ingin untuk menampilkan daftar Properties dalam bentuk yang lebih mudah diakses. Anda dapat menampilkan properti dengan daftar abjad. Untuk melakukannya, klik ikon abjad di bagian atas kotak Properties, seperti pada gambar di bawah ini:





Sebelum kita lebih jauh tentang properties, mari kita pahami lebih detail apa itu properties pada visual basic.

Apa Itu Properties ?
properties adalah kontrol, kontrol yang anda dapat tambahkan ke bentuk (textbox,label dll), dan bentuk itu sendiri disebut objek kontrol. Anda dapat menganggap kontrol sebagai benda, sesuatu yang kuat dan Anda dapat mengontrol sifatnya .

Contoh mudahnya adalah televisi, dalam sebuah televisi terdapat remot untuk mengendalikannya, dimana anda dapat menyalahkan tv, mematikan tv, membuatnya dengan bunyi pelan, membuatnya dengan bunyi kuat dan lain-lain.

Dalam visual basic, Anda dapat mengubah properti dari kontrol Kotak Properties. (Anda juga dapat mengubah properti menggunakan kode-kode, yang akan Anda lakukan dengan cukup banyak, "akan saya jelaskan nanti") Jika kita kembali ke objek form kita, sifat-sifat dan nilai-nilai yang terdapat pada form kita dapat di lihat di kotak properties, kita juga dapat untuk mengubahnya dengan menggunakan Kotak Properties.


*Pada contoh berikut kita akan mengubah nilai text pada form1 kita :

lihat kotak properties form1



- perhatikan tulisan text sama dengan form1
- form1 adalah nama default dari form kita
- sekarang coba ubah nama properties form1 text dengan nama My First Form




Maka form yang kita buat di tutorial sebelumnya kan tampak seperti ini :



*perhatikan tulisan My first Form di atas

Sekarang anda sudah cukup mengenal apa itu properties pada visual basic .
[ Read More ]

VISUAL BASIC HISTORY

Bill Gates, pendiri Microsoft, memulai bisnis perangkat lunak dengan mengembangkan interpreter bahasa Basic untuk Altair 8800, untuk kemudian ia ubah agar dapat berjalan di atas IBM PC dengan sistem operasi DOS. Perkembangan berikutnya ialah diluncurkannya BASICA (basic-advanced) untuk DOS. Setelah BASICA, Microsoft meluncurkan Microsoft QuickBasic dan Microsoft Basic (dikenal juga sebagai Basic Compiler).

Visual Basic adalah pengembangan dari bahasa komputer BASIC (Beginner’s All-purpose Symbolic Instruction Code). Bahasa BASIC diciptakan oleh Professor John Kemeny dan Thomas Eugene Kurtz dari Perguruan Tinggi Dartmouth pada pertengahan tahun 1960-an. Bahasa program tersebut tersusun mirip dengan bahasa Inggris yang biasa digunakan oleh para programer untuk menulis program-program komputer sederhana yang berfungsi sebagai pembelajaran bagi konsep dasar pemrograman komputer.

Sejak saat itu, banyak versi BASIC yang dikembangkan untuk digunakan pada berbagai platform komputer,[2] seperti Microsoft QBASIC, QUICKBASIC, GWBASIC, IBM BASICA, Apple BASIC dan lain-lain.

Apple BASIC dikembangkan oleh Steve Wozniak, mantan karyawan Hewlett Packard dan teman dekat Steve Jobs (pendiri Apple Inc.). Steve Jobs pernah bekerja dengan Wozniak sebelumnya (mereka membuat game arcade “Breakout” untuk Atari). Mereka mengumpulkan uang dan bersama-sama merakit PC, dan pada tanggal 1 April 1976 mereka secara resmi mendirikan perusahaan komputer Apple. Popularitas dan pemakaian BASIC yang luas dengan berbagai jenis komputer turut berperan dalam mengembangkan dan memperbaiki bahasa itu sendiri, dan akhirnya berujung pada lahirnya Visual Basic yang berbasis GUI (Graphic User Interface) bersamaan dengan Microsoft Windows. Pemrograman Visual Basic begitu mudah bagi pemula dan programer musiman karena ia menghemat waktu pemrograman dengan tersedianya komponen-komponen siap pakai.

Hingga akhirnya Visual Basic juga telah berkembang menjadi beberapa versi, sampai yang terbaru, yaitu Visual Basic 2010. Bagaimanapun juga Visual Basic 6.0 tetap menjadi versi yang paling populer karena mudah dalam membuat programnya dan ia tidak menghabiskan banyak memori

Sejarah BASIC di tangan Microsoft sebagai bahasa yang diinterpretasi (BASICA) dan juga bahasa yang dikompilasi (BASCOM) membuat Visual Basic diimplementasikan sebagai gabungan keduanya. Programmer yang menggunakan Visual Basic bisa memilih kode bahasa pemrograman yang dikompilasi atau kode yang harus bahasa pemrograman yang diinterpretasikan sebagai hasil porting dari kode VB. Sayangnya, meskipun sudah terkompilasi jadi bahasa mesin, DLL bernama MSVBVMxx.DLL tetap dibutuhkan. Namun karakteristik bahasa terkompilasi tetap muncul (ia lebih cepat dari kalau kita pakai mode terinterpretasi).

Perkembangan Visual Basic


VB 1.0 dikenalkan pada tahun 1991, pendekatan yg dilakukan untuk menghubungkan bahasa pemrograman dengan GUI berasal dari prototype yg dikembang oleh “Alan Cooper” yg di sebut TRIPOD, Kemudian Microsoft mengontrak copper dan asosiasinya utk mengembangkan tripod agar dapat digunakan di windows 3.0 dibawah nama kode Ruby.[3] Berikut Perjalanan Visual Basic (VB 1.0 Sampai VB 10) :[1] Perjalanan dari Visual Basic (VB1 to VB 10):[4]

1. Proyek “Thunder” dirintis
2. Visual Basic 1.0 (May 1991) di rilis untuk windows pada COMDEX/Windows Wordltrade yg dipertunjukan di Atlanta , Georgia
3. Visual Basic 1.0 untuk DOS dirilis pada bulan September 1992. Bahasa ini tidak kompatibel dengan Visual Basic For Windows. VB 1.0 for DOS ini pada kenyataaanya merupakan versi kelanjutan dari compiler BASIC, QuickBasic dan BASIC Professional Development System.
4. Visual Basic 2.0 dirilis pada November 1992, Cakupan pemrogramannya cukup mudah untuk digunakan dan kecepatannya juga telah di modifikasi. Khususnya pada Form yg menjadikan object dapat dibuat secara seketika, serta konsep dasar dari Class modul yg berikutnya di implementasikan pada VB 4
5. Visual Basic 3.0 , dirilis pada musim panas 1993 dan dibagi menjadi versi standard dan professional. VB 3 memasukan Versi 1.1 dari Microsoft Jet Database Engine yg dapat membaca serta menulis database Jet (atau access) 1.x
6. Visual Basic 4.0 (Agustus 1995) merupakan versi pertama yg 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 (February 1997), Microsoft merilis secara eksklusif Visual basic untuk versi windows 32 bit . Programmer yg menulis programnya pada versi 16 bit dapat dengan mudah melakukan import porgramnya dari VB4 ke VB5. dan juga sebaliknya, program VB5 dapat diimport menjadi VB4. VB 5 memperkenalakan kemampuan untuk membuat User Control.
8. Visual Basic 6.0 (pertengahan 1998) memperbaiki beberapa cakupan, temasuk kemapuannya untuk membuat Aplikasi Web-based . Visual Basic 6 di jadwalkan akan memasuki Microsoft “fasa non Supported” dimulai pada maret 2008

1. Visual Basic .NET, dirilis pada tahun 2002, Beberapa yang mencoba pada versi pertama .NET ini mengemukakan bahwa bahasa ini sangat powerful tapi bahasa yg digunakan sangat berbeda dengan bahasa sebelumnya, dengan kekurangan diberbagai area, termasuk runtime-nya yang 10 kali lebih besar dari paket runtime VB6 serta peningkatan penggunan memory.
2. Visual Basic .NET 2003, dirilis dengan menggunakan NET framework versi 1.1.
3. Visual Basic 2005, merupakan itegrasi selanjutnya dari Visual Basic .NET. dan Microsoft memutuskan untuk menghilangkan kata kata .NET pada judulnya. Pada Rilis ini , Microsoft memasukan bebrapa fitur baru, diantaranya : Edit and Continue , mungkin inilah kekurangan fitur terbesar dari VB .NET. pada VB 2005 ini kita diperbolehkan melakukan perubahan kode pada saat program sedang dijalankan Perbaikan pada Konversi dari VB ke VB NET12 Visual Basic .NET 2003 (VB 7.1) , dirilis dengan menggunakan NET Kerangka kerja versi 1.1. IsNot Patent, merupakan salah satu fitur dari Visual Basic 2005 merupakan konversi If=Not X Is Y menjadi If X IsNot Y
4. Visual Basic 2005 Express , merupkan bagian dari Product Visual Studio. Microsoft membuat Microsoft Visual Studio 2005 Express edition untuk pemula dan yg gemar dengan VB, salah satu produknya adalah Visual Basic 2005 Express yg merupakan produk gratis dari Microsoft
5. Visual Basic “Orcas”, dijadwalkan akan dirilis pada tahun 2007 dan dibangung diatas .NET 3.5. Pada rilis ini , Microsoft menambahkan beberapa fitur , diantaranya : True Tenary operator , yaitu fungsi If(boolean,value, value) yg digunakan untuk menggantikan fungsi IIF, LINQ Support, Ekspresi Lambda, XML Literals, Nullable types, Type Inference
6. Visual Basic ‘VBx’, Visual Basic 10, yang juga dkenal dengan nama VBx, akan menawarkan dukungan untuk Dynamic Language Runtime. VB 10 direncanakan akan menjadi bagian da 15. an dari SilverLight 1.1

Pemrograman Berorientasi Objek (OOP)

Visual Basic merupakan bahasa yang mendukung Pemrograman berorientasi objek , namun tidak sepenuhnya, Beberapa karakteristik obyek tidak dapat dilakukan pada Visual Basic, seperti Inheritance tidak dapat dilakukan pada class module, Polymorphism secara terbatas bisa dilakukan dengan mendeklarasikan class module yang memiliki Interface tertentu. Visual Basic (VB) tidak bersifat case sensitif.

Desain Visual dan Komponen

Visual Basic menjadi populer karena kemudahan desain form secara visual dan adanya kemampuan untuk menggunakan komponen-komponen ActiveX yang dibuat oleh pihak lain.[4] Namun komponen ActiveX memiliki masalahnya tersendiri yang dikenal sebagai DLL hell,Pada Visual Basic .NET, Microsoft mencoba mengatasi masalah DLL hell dengan mengubah cara penggunaan komponen (menjadi independen terhadap registry). (sumber:wikipedia.id)
[ Read More ]
 
 

Labels