Perbedaan VB 6 dan VB.net

Saya akan sedikit 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.

Kode program

    'VARIABLE'
    'Deklarasi Variable Dapat Langsung Diberi Nilai Default (di vb6 tidak bisa)
    'Contoh Variable Standard
    Dim nilai1 As Integer = 0
    Friend nilai2 As String = "Kosong"

    'Contoh Variable Array
    Public nilai_array1() As Integer = {10, 20, 30, 40, 50}
    Dim nilai_array2 As String() = {"a", "b", "c"}

    'Contoh Variable Array Object (di vb6 tidak bisa membuat object langsung)
    Private mytext As New TextBox With {.Name = "txt_name", .Text = "123"} 'dll
    Dim mycombo_array(0 To 10) As ComboBox

    'Contoh Variable Array List (di vb6  = Collection)
    Public nilai_list As New List(Of String)
    Dim mylistview_list As New List(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)
    For myindex As Integer = 0 To 100
     '.... sintak anda
    Next
    For Each myitem As ListViewItem 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
     For nilai As Double = 0 To 1000
         If nilai = 666 Then Continue For
     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
     If nilai1 = 666 Then Continue Do
        ListView1.Items.Add(nilai1)
        '.... sintak anda
      Loop

     'Sintak diatas merupakan cara singkat dari sintak berikut ini :
     For nilai As Double = 0 To 1000
     If nilai = 666 Then GoTo SkipFor
     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
     Dim item_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:
      With ComboBox1
         For nilai As Integer = 1 To 5
              .Items.Add(nilai)
          Next
      End With

      'OPERATOR LOGIKA'
      '**Fitur baru "AndAlso" (di vb6 tidak bisa)
      If nilai1 AndAlso nilai2 = 100 Then
          '....sintak anda
      End If

        'Contoh diatas sama dengan anda menulis :
        If nilai1 = 100 And nilai2 = 100 Then
            '....sintak anda
        End If

        '**Fitur baru "Equals" (di vb6 tidak bisa)
        If nilai1.Equals(100) = True Then
            '....sintak anda
        End If

        'Contoh diatas sama dengan anda menulis :
        If nilai1 = 100 Then
            '....sintak anda
        End If

        '**Fitur baru "Is" dan "IsNot" ("IsNot" di vb6 tidak bisa)
        If mytext.Text Is Nothing Then
            '....sintak anda
        ElseIf mytext.Text IsNot Nothing Then
            '....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
            If nilai2 = "1" Then
                '...sintak anda
            End If
        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. 

Itulah mengenai sedikit referensi perbedaan Vb 6 dan Vb.net, semoga menambah wawasan dalam Belajar Vb 6

Perbedaan VB 6 dan VB.net 2013-04-04T00:57:00+07:00 Rating: 4.5 Diposkan Oleh: Unknown