VB-Tec.de Visual Basic - Technik, FAQ, Tricks, Beispiele

Mit folgender Funktion kann aus einem VB-Farbcode der entsprechende HTML-Wert bestimmt werden:

Function RGB2HTML(RGB)
  'Long in Hex umwandeln:
  RGB2HTML = Right("00000" & Hex(RGB), 6)

  'RGB-Werte richtig sortieren:
  RGB2HTML = "'#" & _
      Mid(RGB2HTML, 5, 2) & _
      Mid(RGB2HTML, 3, 2) & _
      Mid(RGB2HTML, 1, 2) & "'"
End Function

Beispiel (HTML-Wert für VB-Rot=255): RGB2HTML(255) ergibt '#FF0000'.