VB.Net常量和枚舉

常量指的是程序在執行過程中可能不會改變的固定值。這些固定值也被稱爲文字。

常量可以是任何基本數據類型，如整數常量，浮點常量，字符常量或字符串文字。也有枚舉常量。

常量的處理方式與常規變量一樣，只是它們的值在定義之後無法修改。

枚舉是一組命名的整數常量。

聲明常量

在VB.Net中，使用Const語句聲明常量。 Const語句用於模塊，類，結構，過程或塊級別，以代替文字值。

Const語句的語法是：

[ < attributelist> ] [ accessmodifier ] [ Shadows ] 
Const constantlist

其中，

attributelist：指定應用於常量的屬性列表; 可以提供以逗號分隔的多個屬性。這是可選項。
accessmodifier：指定哪些代碼可以訪問這些常量，這是可選項。值可以是：Public, Protected, Friend, Protected Friend 或 Private。
Shadows：這使得常量隱藏了一個基類中相同名稱的編程元素。這是一個可選項。
Constantlist：給出了所聲明常量的名字列表，這是必須的。

其中，每個常量名稱具有以下語法和部分：

constantname [ As datatype ] = initializer

constantname：指定常量的名稱
datatype：指定常量的數據類型
initializer：指定分配給常量的值

示例

'The following statements declare constants.'
Const maxval As Long = 8999
Public Const message As String = "HELLO" 
Private Const piValue As Double = 3.1415

實例

以下示例演示聲明和使用常量值：

Module constantsNenum
   Sub Main()
      Const PI = 3.14149
      Dim radius, area As Single
      radius = 7
      area = PI * radius * radius
      Console.WriteLine("Area = " & Str(area))
      Console.ReadKey()
   End Sub
End Module

當上面的代碼被編譯並執行時，會產生以下結果：

Area = 153.933

VB.Net打印和顯示常量

VB.Net提供了以下的打印和顯示常量：

常量

描述說明

vbCrLf

回車/換行字符組合。

vbCr

回車符。

vbLf

換行字符。

vbNewLine

換行字符。

vbNullChar

空(Null)字符。

vbNullString

不是一個零長度的字符串(""); 用於調用外部程序。

vbObjectError

錯誤編號。用戶定義的錯誤號應該大於這個值。例如：

聲明枚舉

枚舉類型是使用Enum語句聲明的。Enum語句聲明一個枚舉並定義其成員的值。 Enum語句可以在模塊，類，結構，過程或塊級別使用。

Enum語句的語法如下所示：

[ < attributelist > ] [ accessmodifier ]  [ Shadows ] 
Enum enumerationname [ As datatype ] 
   memberlist
End Enum

其中，

attributelist：引用應用於變量的屬性列表。這是一個可選項。
accessmodifier：指定哪些代碼可以訪問這些常量，這是可選項。值可以是：Public, Protected, Friend, Protected Friend 或 Private。
enumerationname：枚舉的名稱，必須。
Shadows：這使得常量隱藏了一個基類中相同名稱的編程元素。這是一個可選項。
memberlist：指定在此語句中聲明的成員常量的列表。這是必須的。

成員列表中的每個成員都有以下語法和部分：

[< attribute list>] member name [ = initializer ]

其中，

name: 指定成員的名字，這是必需項。
initializer: 分配給枚舉成員的值，這是一個可選項。

示例

Enum Colors
   red = 1
   orange = 2
   yellow = 3
   green = 4
   azure = 5
   blue = 6
   violet = 7
End Enum

實例

以下示例演示Enum變量Colors的聲明和用法，參考以下示例代碼 -

Module constantsNenum
   Enum Colors
      red = 1
      orange = 2
      yellow = 3
      green = 4
      azure = 5
      blue = 6
      violet = 7
   End Enum
   Sub Main()
      Console.WriteLine("The Color Red is : " & Colors.red)
      Console.WriteLine("The Color Yellow is : " & Colors.yellow)
      Console.WriteLine("The Color Blue is : " & Colors.blue)
      Console.WriteLine("The Color Green is : " & Colors.green)
      Console.ReadKey()
   End Sub
End Module

當上面的代碼被編譯並執行時，會產生以下結果：

The Color Red is: 1
The Color Yellow is: 3
The Color Blue is: 6
The Color Green is: 4

VB.Net教程

高級部分

聲明常量

實例

VB.Net打印和顯示常量

聲明枚舉

實例