关于颜色

普通用户可以忽略本节内容。

颜色的类型是Color，定义一个颜色变量的语法为：

Dim 变量名 As Color

Color本身是一个枚举，包括很多预先定义好的颜色，例如Color.Red表示红色，color.Pink表示粉红色。
要查询更多定义好的颜色，请参考附录中英文颜色对照表。

例如下面的代码定义了一个颜色变量，并将其设为红色：

Dim clr As Color = Color.Red

下面的代码，将当前表的字体颜色设为粉红色：

CurrentTable.ForeColor = Color.Pink

颜色由四个分量组成，分别是alpha、红、绿、蓝，所以颜色有四个属性，用于返回这个分量的值：

A：返回颜色的alpha分量
B: 返回颜色的蓝色分量
G: 返回颜色的绿色分量
R：返回颜色的红色分量

每个分量的范围都是0到255之间。

例如下面的代码，列出了粉红色的各组成分量值：

Dim clr As Color = Color.Pink
Output.Show("A:" & clr.A)
Output.Show("B:" & clr.B)
Output.Show("G:" & clr.G)
Output.Show("R:" & clr.R)

通过共享方法FromARGB，可以根据指定的分量，合成一个颜色，语法为：

FromARGB(A,R,G,B)

A：alpha分量
R：红色分量
G: 绿色分量
B: 蓝色分量

例如：

Dim clr As Color = Color.FromARGB(255,255,192,203)

FromARGB还可以根据一个整数来生成颜色：

Dim clr As Color = Color.FromARGB(-16181)

通过共享方法ToARGB，可以将颜色转换为一个整数，例如：

Dim Val AS Integer = Color.Pink.ToARGB
Output.Show(Val)