Dav*_*ell 42
我相信你想要的是一个旗帜类型枚举.
您需要将Flags属性添加到枚举的顶部,然后您可以将枚举与"Or"关键字组合.
像这样:
<Flags()> _
Enum CombinationEnums As Integer
HasButton = 1
TitleBar = 2
ReadOnly = 4
ETC = 8
End Enum
Run Code Online (Sandbox Code Playgroud)
注意:右边的数字总是两倍大(2的幂) - 这需要能够分离已经设置的各个标志.
使用Or关键字组合所需的标志:
Dim settings As CombinationEnums
settings = CombinationEnums.TitleBar Or CombinationEnums.Readonly
Run Code Online (Sandbox Code Playgroud)
这将TitleBar和Readonly设置为枚举
要检查已设置的内容:
If (settings And CombinationEnums.TitleBar) = CombinationEnums.TitleBar Then
Window.TitleBar = True
End If
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
19079 次 |
| 最近记录: |