Pemakaian Variabel Global dan Private Pada Program VB Net

Pada suatu program sering kita menggunakan suatu variabel. Pendefinisian variabel biasa di ikuti dengan kata Dim, seperti contoh :

Public Class Form1
   Public Harga As Double
  
   ...
   ...
End Class


atau

Public Class Form1
   Private Sub BtnProses_Click(...)...
       Dim Harga As Double
       ...
       ...
   End Sub
End Class

Nah dari kedua pendefinisian diatas terdapat perbedaan yang sangat signifikan. Cobalah anda buat dahulu suatu program sederhana, 3 textbox dengan 2 buah Button.

Berikut listing pemakaian variabel global dan private pada program VB Net.


Public Class Form1
    Public x As Byte
    Public y As Byte

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = x
        y = 4
    End Sub

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

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim x As Byte = 10
        TextBox2.Text = x + y
    End Sub
End Class


Penjelasan :
Saat program dijalankan kemudian di klik button2 maka nilai textbox1 masih kosong sedangkan textbox2 10.

Kemudian di klik button1, sehingga textbox1 bernilai 3 dan textbox2 bernilai tetap 10

Kemudian di klik sekali lagi button2, akan terlihat textbox2 berubah menjadi bernilai 14.

Nah dari hasil nampak sekali perubahan bukan?

Variabel x didefinisikan pada 2 tempat yang berbeda, pada pendefinisian Public maka nilai x bisa digunakan disemua SUB di bawahnya begitu juga variabel y. Sedangkan untuk pendefinisian di dalam SUB seperti Dim x, maka x tersebut hanya dikenali di SUB itu sendiri, sehingga saat terjadi perubahan di tempat lain untuk nilai y, maka akan mengakibatkan nilai y juga berubah sehingga pada textbox2 juga akan nampak perubahan tersebut.

Sumber : Mesran.net