Keunggulan+Perbedaan VB.NET Dengan VB.6 (Tutorial Part I)

Saya akan coba jabarkan beberapa keunggulan sekaligus perbedaan antara VB.NET dan VB.6 yang mungkin akan membuat anda tertarik untuk mempelajari .NET programming atau dan akan membantu mempermudah anda dalam mempelajarinya. Dibawah ini adalah beberapa hal dasar namun penting untuk diketahui dalam belajar pemrogramman VB.NET. Semua sintak yang saya tulis dibawah ini adalah sintak VBNET dan tidak tersedia di VB.6.

    'VARIABLE'

    'Deklarasi Variable Dapat Langsung Diberi Nilai Default (di vb6 tidak bisa)

    'Contoh Variable Standard

    Dim nilai1 As Integer = 0

    Friendnilai2 As String= "Kosong"

    'Contoh Variable Array

    Publicnilai_array1() As Integer= {10, 20, 30, 40, 50}

    Dimnilai_array2 As String() = {"a", "b", "c"}

    'Contoh Variable Array Object (di vb6 tidak bisa membuat object langsung)

    Privatemytext As NewTextBox With {.Name = "txt_name", .Text = "123"} 'dll

    Dimmycombo_array(0 To 10) AsComboBox

    'Contoh Variable Array List (di vb6  = Collection)

    Publicnilai_list As NewList(Of String)

    Dimmylistview_list As NewList(Of ListView)

    'Type data variant di vb6 tidak tersedia di vbnet, diganti dengan object

    Dim obj As New Object

        'PERULANGAN'

        '**Fitur baru bisa langsung deklarasi variable (di vb6 tidak bisa)

        Formyindex As Integer= 0 To 100

            '.... sintak anda

        Next

        For Each myitem AsListViewItem In ListView1.Items

            '.... sintak anda

        Next

        '**Fitur baru "Continue For" untuk skip/loncat (di vb6 tidak bisa)

        'Contoh jika nilai 666 jangan di-add ke listview

        Fornilai As Double= 0 To 1000

            Ifnilai = 666 Then ContinueFor

            ListView1.Items.Add(nilai)

            '.... sintak anda

        Next

        '**Fitur baru "Continue Do" untuk skip/loncat (di vb6 tidak bisa)

        'Contoh jika nilai 666 jangan di-add ke listview

        Do While nilai1 <= 1000

            Ifnilai1 = 666 Then ContinueDo

            ListView1.Items.Add(nilai1)

            '.... sintak anda

        Loop

        'Sintak diatas merupakan cara singkat dari sintak berikut ini :

        Fornilai As Double= 0 To 1000

            Ifnilai = 666 Then GoToSkipFor

            ListView1.Items.Add(nilai)

            '.... sintak anda

SkipFor:

        Next

        '**Fitur Baru "AddRange" pada object tertentu (di vb6 tidak bisa)

        'Contoh add item sekaligus dari array ke combobox

        Dimitem_array() As String= {"1", "2", "3", "4", "5"}

        ComboBox1.Items.AddRange(item_array)

        'Atau dengan cara membuat item array langsung

        ComboBox1.Items.AddRange(New String() {"a", "b", "c", "d", "e"})

        ComboBox1.Items.AddRange(New Object() {1, 2, 3, 4, 5})

        'Sintak diatas merupakan cara singkat dari sintak berikut ini:

        With ComboBox1

            .Items.Add("a")

            .Items.Add("b")

            .Items.Add("c")

            .Items.Add("d")

            .Items.Add("e")

        End With

        'Atau sintak seperti ini:

        WithComboBox1

            Fornilai As Integer= 1 To 5

                .Items.Add(nilai)

            Next

        End With

        'OPERATOR LOGIKA'

        '**Fitur baru "AndAlso" (di vb6 tidak bisa)

        Ifnilai1 AndAlso nilai2 = 100 Then

            '....sintak anda

        End If

        'Contoh diatas sama dengan anda menulis :

        Ifnilai1 = 100 And nilai2 = 100 Then

            '....sintak anda

        End If

        '**Fitur baru "Equals" (di vb6 tidak bisa)

        Ifnilai1.Equals(100) = True Then

            '....sintak anda

        End If

        'Contoh diatas sama dengan anda menulis :

        Ifnilai1 = 100 Then

            '....sintak anda

        End If

        '**Fitur baru "Is" dan "IsNot" ("IsNot" di vb6 tidak bisa)

        Ifmytext.Text Is NothingThen

            '....sintak anda

        ElseIfmytext.Text IsNot NothingThen

            '....sintak anda

        End If

        '**Fitur baru "TypeOf" (di vb6 bisa tapi harus di ketik manual)

        'Contoh untuk mendeteksi type sebuah object

        If TypeOf obj Is TextBox Or TypeOf obj Is ComboBox Then

            '....sintak anda

        End If 

Bagaimana? sejauh ini cukup menarik bukan? selain itu formating sintak (menjorok) sudah dilakukan secara otomatis oleh IDE VB.NET, jadi kita tidak perlu lagi melakukan secara manual dengan menekan spasi atau tab, Contoh :

        If nilai1 = 1 Then

            '...sintak anda

            Ifnilai2 = "1" Then

                '...sintak anda

            EndIf

        End If

Selain itu juga setiap mengetik perintah seperti IF, SELECT CASE, FOR, DO WHILE, FUNCTION, SUB dan lain lain, kemudian tekan enter maka akan dibuatkan akhirannya secara otomatis yaitu END IF, END SELECT, NEXT, LOOP, END FUNCTION, END SUB dan lain lain, jadi anda tidak perlu repot (banyak mengetik sintak) dan dapat menghemat waktu anda. Untuk penjelasan selanjutnya (Part II) saya akan postingkan di lain waktu, tetap berkunjung ke blog saya ya, semoga bermanfaat !

Tags:
perbedaan vb6 vbnet, contoh dasar vbnet, belajar vbnet dari vb6, tutorial vbnet awam, tutorial vbnet untuk newbie, contoh perulangan di vbnet, apa saja fitur baru vbnet, contoh if then else di vbnet, contoh for next do while d until di vbnet, sontoh deklarasi variable di vbnet, contoh program/aplikasi vbnet, dasar dasar belajar vbnet