Felet med anropet till suben är tredje parametern (SystemColors). Jag vill här kunna skicka med den färg jag vill använda (använder mig av SystemColors.Control) men hur ska jag skriva så att suben kan ta emot färgen?

<code>
installningar(False, True, SystemColors, BorderStyle.None)

Private Sub installningar(ByVal f As Boolean, ByVal t As Boolean, ByVal color As SystemColors, ByVal border As BorderStyle)
txtForetagsnamn.ReadOnly = f
txtForetagsnamn.TabStop = t
txtForetagsnamn.BackColor = color
txtForetagsnamn.BorderStyle = border
End Sub
</code>

<code>
installningar(False, True, SystemColors.Control, BorderStyle.None)

Private Sub installningar(ByVal f As Boolean, ByVal t As Boolean, ByVal color As Color, ByVal border As BorderStyle)
txtForetagsnamn.ReadOnly = f
txtForetagsnamn.TabStop = t
txtForetagsnamn.BackColor = color
txtForetagsnamn.BorderStyle = border
End Sub
</code>

/Fredrik Normén NSQUARED2

Vad är din txt.... för typ? Antar att den bara tar en Color? och inte SystemColor.
Vad är det du vill göra eftersom du använder SystemColor och inte Color klassen?

EDIT: Hurra, nu han min bror före :-)


mvh johan

Funkar, tack för hjälpen