常量

constants指的是程序在执行期间不会改变的固定值。 这些固定值也称为文字。

常量可以是任何基本数据类型，如整数常量，浮点常量，字符常量或字符串文字。 还有枚举常量。

常量被视为常规变量，除了它们的值在定义后无法修改。

enumeration是一组命名的整数常量。

声明常量

在VB.Net中，使用Const语句声明Const 。 Const语句用于模块，类，结构，过程或块级别，以代替文字值。

Const语句的语法是 -

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

Where,

• attributelist - 指定应用于常量的属性列表; 您可以提供以逗号分隔的多个属性。 可选的。

• accessmodifier - 指定哪些代码可以访问这些常量。 可选的。 值可以是:Public，Protected，Friend，Protected Friend或Private。

• Shadows - 这使常量隐藏基类中具有相同名称的编程元素。 可选的。

• Constantlist - 给出声明的常量名称列表。 需要。

其中，每个常量名称具有以下语法和部分 -

constantname [ As datatype ] = initializer

• constantname - 指定constantname的名称

• datatype - 指定常量的数据类型

• initializer - 指定分配给常量的值

例如，

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

例子 (Example)

以下示例演示了常量值的声明和使用 -

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提供以下打印和显示常量 -

声明枚举

使用Enum语句声明枚举类型。 Enum语句声明枚举并定义其成员的值。 Enum语句可用于模块，类，结构，过程或块级别。

Enum语句的语法如下 -

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

Where,

• attributelist - 指应用于变量的属性列表。 可选的。

• asscessmodifier - 指定哪些代码可以访问这些枚举。 可选的。 值可以是:Public，Protected，Friend或Private。

• Shadows - 这使得枚举隐藏了基类中具有相同名称的编程元素。 可选的。

• enumerationname - enumerationname名称。 需要

• datatype - 指定枚举及其所有成员的数据类型。

• memberlist - 指定在此语句中声明的成员常量列表。 需要。

成员列表中的每个成员都具有以下语法和部分:

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

Where,

• name - 指定成员的名称。 需要。

• initializer - 分配给枚举成员的值。 可选的。

例如，

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

例子 (Example)

以下示例演示了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