Konstanta mengacu pada nilai tetap yang tidak dapat diubah oleh program selama eksekusinya. Nilai tetap ini juga disebut literal.
Konstanta dapat berupa salah satu dari tipe data dasar seperti konstanta integer, konstanta floating point, konstanta karakter, atau literal string. Juga terdapat konstanta enumerasi.
Konstanta diperlakukan seperti variabel biasa, kecuali bahwa nilainya tidak dapat diubah setelah didefinisikan.
Enumerasi adalah sekumpulan konstanta integer yang diberi nama.
Mendeklarasikan Konstanta
Dalam VB.Net, konstanta dideklarasikan menggunakan pernyataan Const
. Pernyataan ini digunakan di level modul, kelas, struktur, prosedur, atau blok sebagai pengganti nilai literal.
Sintaks pernyataan Const adalah:
[ < attributelist > ] [ accessmodifier ] [ Shadows ]
Const constantlist
Penjelasan:
-
attributelist
– daftar atribut yang diterapkan pada konstanta. Opsional. -
accessmodifier
– menentukan aksesibilitas konstanta. Bisa berupaPublic
,Protected
,Friend
,Protected Friend
, atauPrivate
. Opsional. -
Shadows
– menyembunyikan elemen pemrograman dengan nama yang sama di kelas induk. Opsional. -
constantlist
– daftar nama konstanta yang dideklarasikan. Wajib.
Setiap nama konstanta memiliki sintaks berikut:
constantname [ As datatype ] = initializer
Contoh:
'Pernyataan berikut mendeklarasikan konstanta.'
Const maxval As Long = 4999
Public Const message As String = "HELLO"
Private Const piValue As Double = 3.1415
Contoh Penggunaan Konstanta
Module constantsNenum
Sub Main()
Const PI = 3.14149
Dim radius, area As Single
radius = 7
area = PI * radius * radius
Console.WriteLine("Luas = " & Str(area))
Console.ReadKey()
End Sub
End Module
Output:
Luas = 153.933
Konstanta Cetak dan Tampilan dalam VB.Net
VB.Net menyediakan beberapa konstanta untuk cetak dan tampilan:
No | Konstanta | Deskripsi |
---|---|---|
1 | vbCrLf | Kombinasi karakter carriage return dan linefeed. |
2 | vbCr | Karakter carriage return. |
3 | vbLf | Karakter linefeed. |
4 | vbNewLine | Karakter baris baru. |
5 | vbNullChar | Karakter null. |
6 | vbNullString | Bukan string kosong ("" ), digunakan untuk prosedur eksternal. |
7 | vbObjectError | Nomor kesalahan pengguna. Digunakan seperti Err.Raise(Number) = vbObjectError + 1000 . |
8 | vbTab | Karakter tab. |
9 | vbBack | Karakter backspace. |
Mendeklarasikan Enumerasi
Tipe enumerasi dideklarasikan menggunakan pernyataan Enum
. Enum
mendefinisikan tipe enumerasi dan anggotanya.
Sintaks pernyataan Enum:
[ < attributelist > ] [ accessmodifier ] [ Shadows ]
Enum enumerationname [ As datatype ]
memberlist
End Enum
Penjelasan:
-
attributelist
– daftar atribut (opsional). -
accessmodifier
– aksesibilitas (opsional):Public
,Protected
,Friend
, atauPrivate
. -
Shadows
– menyembunyikan elemen dengan nama yang sama. -
enumerationname
– nama enumerasi (wajib). -
datatype
– tipe data dari anggota enumerasi (opsional). -
memberlist
– daftar konstanta anggota (wajib).
Setiap anggota memiliki sintaks:
[ < attribute list > ] membername [ = initializer ]
Contoh:
Enum Colors
red = 1
orange = 2
yellow = 3
green = 4
azure = 5
blue = 6
violet = 7
End Enum
Contoh Penggunaan Enum
Module constantsNenum
Enum Colors
red = 1
orange = 2
yellow = 3
green = 4
azure = 5
blue = 6
violet = 7
End Enum
Sub Main()
Console.WriteLine("Warna Merah adalah: " & Colors.red)
Console.WriteLine("Warna Kuning adalah: " & Colors.yellow)
Console.WriteLine("Warna Biru adalah: " & Colors.blue)
Console.WriteLine("Warna Hijau adalah: " & Colors.green)
Console.ReadKey()
End Sub
End Module
Output:
Warna Merah adalah: 1
Warna Kuning adalah: 3
Warna Biru adalah: 6
Warna Hijau adalah: 4
Nah sudah bisa menerapkan Konstanta dan Enum kan? Okay… lanjuuut!