Define and use Const : Const « Language Basics « VB.Net

1. VB.Net
2. Language Basics
3. Const

Define and use Const

Imports System
Imports System.Diagnostics

Public Class MainClass
    Public Enum AccessLevel
        Clerk
        Supervisor
        Administrator
        User = Clerk
        Manager = Supervisor
        SysAdmin = Administrator
        Superuser = Administrator
    End Enum

    Private Const MAX_VALUES As Integer = CInt(123.45)
    Private Const MASK_READ As Long = &H1000&
    Private Const MASK_WRITE As Long = &H2000&
    Private Const MASK_READ_WRITE As Long = MASK_READ Or MASK_WRITE
    Private Const MAX_ACCESS_LEVEL As AccessLevel = AccessLevel.SuperUser

    Shared Sub Main()
        
        Console.WriteLine("MAX_VALUES:" & MAX_VALUES)
        Console.WriteLine("MASK_READ"   & MASK_READ)
        Console.WriteLine("MASK_WRITE " & MASK_WRITE)
        Console.WriteLine("MASK_READ_WRITE " & MASK_READ_WRITE)
        Console.WriteLine("MAX_ACCESS_LEVEL " & MAX_ACCESS_LEVEL)
    End Sub
End Class

           
       

Related examples in the same category

1.	Const Variable for Constant
2.	Const Variable in a Function
3.	String Const Demo
4.	Define and use Const value