2 Fragen zu Cint

Der Ausdruck ```vb Dim c As Color = Color.FromArgb(CInt(r.Text), CInt(g.Text), CInt(b.Text)) ``` funktioniert in **VB.NET 2003** nicht, weil die Überladung von `Color.FromArgb` mit **drei Integer-Parametern** (rot, grün, blau) erst ab **.NET Framework 2.0** (also ab Visual Studio 2005) verfügbar ist. In **.NET Framework 1.1** (das von VB.NET 2003 verwendet wird) gibt es nur folgende relevante Überladungen: - `Color.FromArgb(Integer)` (ARGB als ein Wert) - `Color.FromArgb(Integer, Color)` (Alpha und eine Color) - `Color.FromArgb(Integer, Integer, Integer, Integer)` (Alpha, Rot, Grün, Blau) **Lösung:** Du musst den Alpha-Wert explizit angeben, z.B. so: ```vb Dim c As Color = Color.FromArgb(255, CInt(r.Text), CInt(g.Text), CInt(b.Text)) ``` Hier steht `255` für volle Deckkraft (Alpha). **Zusammengefasst:** Die Überladung mit nur drei Parametern gibt es in deiner Version nicht. Gib den Alpha-Wert explizit mit an. Weitere Infos: - [Microsoft-Dokumentation zu Color.FromArgb (aktuell)](https://learn.microsoft.com/de-de/dotnet/api/system.drawing.color.fromargb) - [Color.FromArgb in .NET 1.1 (archiviert)](https://learn.microsoft.com/en-us/previous-versions/dotnet/netframework-1.1/aa346807(v=vs.71))

In VB.NET 2003 (also Visual Basic .NET 1.1) gilt Folgendes: - Der Ausdruck `CInt(True)` ergibt **-1**. - Der Ausdruck `CInt(False)` ergibt **0**. Das liegt daran, dass in VB.NET (wie auch in klassischem VB) der Wert von `True` intern als **-1** (alle Bits gesetzt) und `False` als **0** (alle Bits gelöscht) dargestellt wird. **Beispiel:** ```vb Dim a As Integer = CInt(True) ' a = -1 Dim b As Integer = CInt(False) ' b = 0 ``` **Vergleich:** - `CInt(True) = -1` ergibt `True` - `CInt(False) = 0` ergibt `True` **Fazit:** Ja, in VB.NET 2003 ist die Umwandlung `CInt(True) = -1` und `CInt(False) = 0` zulässig und entspricht dem Verhalten der Sprache.