Bagikan melalui


Penetapan Variabel Objek (Visual Basic)

Anda menggunakan pernyataan penetapan normal untuk menetapkan objek ke variabel objek. Anda dapat menetapkan ekspresi objek atau kata kunci Tidak ada , seperti yang diilustrasikan contoh berikut.

Dim thisObject As Object
' The following statement assigns an object reference.
thisObject = Form1
' The following statement discontinues association with any object.
thisObject = Nothing

Nothing berarti tidak ada objek yang saat ini ditetapkan ke variabel.

Inisialisasi

Saat kode Anda mulai berjalan, variabel objek Anda diinisialisasi ke Nothing. Mereka yang deklarasinya menyertakan inisialisasi akan diinisialisasi ulang ke nilai yang Anda tentukan ketika pernyataan deklarasi dieksekusi.

Anda dapat menyertakan inisialisasi dalam deklarasi Anda dengan menggunakan kata kunci Baru . Pernyataan deklarasi berikut mendeklarasikan variabel testUri objek dan ver dan menetapkan objek tertentu untuk variabel tersebut. Masing-masing menggunakan salah satu konstruktor yang kelebihan beban dari kelas yang sesuai untuk menginisialisasi objek.

Dim testUri As New System.Uri("https://www.microsoft.com")
Dim ver As New System.Version(6, 1, 0)

Disasosiasi

Mengatur variabel objek untuk Nothing menghentikan asosiasi variabel dengan objek tertentu. Ini mencegah Anda mengubah objek secara tidak sengaja dengan mengubah variabel. Ini juga memungkinkan Anda untuk menguji apakah variabel objek menunjuk ke objek yang valid, seperti yang ditunjukkan contoh berikut.

If otherObject IsNot Nothing Then
    ' otherObject refers to a valid object, so your code can use it.
End If

Jika objek yang dirujuk variabel Anda ada di aplikasi lain, pengujian ini tidak dapat menentukan apakah aplikasi tersebut telah dihentikan atau hanya membatalkan objek.

Variabel objek dengan nilai Nothing juga disebut referensi null.

Instans Saat Ini

Instans objek saat ini adalah instans yang saat ini dijalankan kode. Karena semua kode dijalankan di dalam prosedur, instans saat ini adalah salah satu di mana prosedur dipanggil.

Kata Me kunci bertindak sebagai variabel objek yang mengacu pada instans saat ini. Jika prosedur tidak Shared, dapat menggunakan Me keyword untuk mendapatkan pointer ke instance saat ini. Prosedur bersama tidak dapat dikaitkan dengan instans kelas tertentu.

Penggunaan Me sangat berguna untuk meneruskan instans saat ini ke prosedur di modul lain. Misalnya, Anda memiliki sejumlah dokumen XML dan ingin menambahkan beberapa teks standar ke semuanya. Contoh berikut mendefinisikan prosedur untuk melakukan ini.

Sub addStandardText(XmlDoc As System.Xml.XmlDocument)
    XmlDoc.CreateTextNode("This text goes into every XML document.")
End Sub

Setiap objek dokumen XML kemudian dapat memanggil prosedur dan meneruskan instans saat ini sebagai argumen. Contoh berikut menunjukkan hal berikut.

addStandardText(Me)

Lihat juga