从 System.Drawing.Brushes 获取名称和类型的配对列表

Question

我想创建一个 BrushInfo 列表，其中包含 System.Drawing.Brushes 中的画笔名称及其类型的属性。类似于：

Dim brushList = GetType(Drawing.Brushes) _
                   .GetProperties.Select(Function(p) New BrushInfo With 
                        {.BrushName = p.Name, .BrushValue = GetType(p)})

上面的代码将获取画笔的名称（p.Name），但不会获取画笔的类型（即System.Drawing.Brushes.AliceBlue）。如何获取画笔类型？

Answer 1

您想要获取属性的值，而不是属性的类型。代替：

.BrushValue = GetType(p)

使用：

.BrushValue = CType(p.GetValue(Nothing, Nothing), Brush)

Answer 2

Brush 类型为 Brush。 Brush 的名称只是因为它是 Brushes 中该名称的属性。除了 Brush 之外，Brush 本身没有其他类型或名称。