Pemakaian Variabel Global dan Private Pada Program VB Net

Operator Dalam Bahasa Pemrograman

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.