Hi Forum,
ich bin gerade dabei den Quellcode meines Projekts ein wenig aufzuräumen und bin da über etwas gestolpert, was sich scheinbar nicht so einfach lösen lässt.
Dazu wollte ich u.a. auch die "isNothing"-Funktion durch "Var Is Nothing" ersetzen, was in den meisten Fällen auch ging. Bei der Color-Struktur allerdings gibt es ein Problem.
Gibt es eine Möglichkeit einem optionalen Parameter vom Typ (Structure) "System.Drawing.Color" einen Konstanten Wert zu geben?
ich bin gerade dabei den Quellcode meines Projekts ein wenig aufzuräumen und bin da über etwas gestolpert, was sich scheinbar nicht so einfach lösen lässt.
Dazu wollte ich u.a. auch die "isNothing"-Funktion durch "Var Is Nothing" ersetzen, was in den meisten Fällen auch ging. Bei der Color-Struktur allerdings gibt es ein Problem.
Gibt es eine Möglichkeit einem optionalen Parameter vom Typ (Structure) "System.Drawing.Color" einen Konstanten Wert zu geben?
VB.NET-Quellcode
- Private Sub SetLabelColors(ByVal Label As Label, Optional ByVal ForeColor As Color = Nothing, Optional ByVal BackColor As Color = Nothing)
- If IsNothing(ForeColor) Then
- ForeColor = Color.Black
- End If
- 'If ForeColor Is Nothing Then 'Der Is-Operator akzeptiert keine Operanden vom Typ "Color". Die Operanden müssen Referenztypen sein oder Typen, die NULL-Werte zulassen.
- ' ForeColor = Color.Black
- 'End If
- If IsNothing(BackColor) Then
- BackColor = Color.Black
- End If
- Label.ForeColor = ForeColor
- Label.BackColor = BackColor
- End Sub
