VB.Net - 常数和枚举
constants
常数指的是程序在执行过程中可能不会改变的固定值。 这些固定值也称为文字。
常量可以是任何基本数据类型,如整数常量,浮点常量,字符常量或字符串常量。 还有枚举常量。
常量被视为常规变量,除了它们的值不能在它们的定义之后被修改。
enumeration
枚举是一组命名的整数常量。
声明常量
在VB.Net中,常量是使用Const
语句声明的。 Const
语句用于模块,类,结构,过程或块级别,以用于替换文字值。
Const语句的语法是:
[ < attributelist> ] [ accessmodifier ] [ Shadows ]
Const constantlist
1、attributelist:
指定应用于常量的属性列表; 您可以提供多个属性,以逗号分隔。 可选的。
2、accessmodifier:
指定哪些代码可以访问这些常量。 可选的。 值可以是:Public, Protected, Friend, Protected Friend, or Private.
3、Shadows:
这使常量隐藏基类中相同名称的编程元素。 可选的。
4、Constantlist:
给出声明的常量的名称列表。 必填。
其中,每个常量名都有以下语法和部分:
constantname [ As datatype ] = initializer
1、constantname 常量名:
指定常量的名称
2、data type 数据类型:
指定常量的数据类型
3、initializer 初始值设定:
指定分配给常量的值
例如,
'The following statements declare constants.'
Const maxval As Long = 4999
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提供以下打印和显示常量:
Constant | 描述 |
---|---|
vbCrLf | 回车/换行字符组合。 |
vbCr | 回车字符。 |
vbLf | 换行字符。 |
vbNewLine | 换行字符。 |
vbNullChar | 空字符。 |
vbNullString | 不等于零长度字符串(“”); 用于调用外部过程。 |
vbObjectError | 错误号。用户定义的错误号应大于此值。例如: Err.Raise(数字)= vbObjectError + 1000 |
vbTab | 标签字符。 |
vbBack | 退格字符。 |
声明枚举
使用Enum语句声明枚举类型。 Enum语句声明一个枚举并定义其成员的值。 Enum语句可以在模块,类,结构,过程或块级别使用。
Enum语句的语法如下:
[ < attributelist > ] [ accessmodifier ] [ Shadows ]
Enum enumerationname [ As datatype ]
memberlist
End Enum
1、attributelist:
指应用于变量的属性列表。 可选的。
2、asscessmodifier:
指定哪些代码可以访问这些枚举。 可选的。 值可以是:公共,受保护,朋友或私人。
3、Shadows:
这使枚举隐藏基类中相同名称的编程元素。 可选的。
4、enumerationname:
枚举的名称。 必填
5、datatype:
指定枚举的数据类型及其所有成员。
6、memberlist:
指定在此语句中声明的成员常数的列表。 必填。
成员列表中的每个成员具有以下语法和部分:
[< attribute list>] member name [ = initializer ]
name 名称
:指定成员的名称。必填。
例如,
Enum Colors
red = 1
orange = 2
yellow = 3
green = 4
azure = 5
blue = 6
violet = 7
End Enum
示例
以下示例演示了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("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