'Declaration
Public Function New( _
ByVal As Color, _
ByVal As Bevel, _
ByVal As Color, _
ByVal As BorderStyle, _
ByVal As Font, _
ByVal As TextEffect, _
ByVal As Color, _
ByVal As ContentAlignment _
)
'使用法
Dim backColor As Color
Dim bevel As Bevel
Dim borderColor As Color
Dim borderStyle As BorderStyle
Dim font As Font
Dim textEffect As TextEffect
Dim foreColor As Color
Dim contentAlignment As ContentAlignment
Dim instance As New Style(backColor, bevel, borderColor, borderStyle, font, textEffect, foreColor, contentAlignment)