IBM Lotus Symphony


QBColor-funktio [käytönaikainen]

Palauttaa MS-DOS-käyttöjärjestelmään perustuvan ohjelmointijärjestelmän kautta väriarvona välitetyn värin RGB-värikoodin.

Syntaksi:

QBColor (ColorNumber As Integer)

Palautusarvo:

Suurkokonaisluku

Parametri:

ColorNumber: Mikä tahansa kokonaislukulauseke, joka määrittää MS-DOS-käyttöjärjestelmään perustuvan ohjelmointijärjestelmän kautta välitetyn värin väriarvon.

ColorNumber-arvo voi saada seuraavat arvot:

0 : Musta

1 : Sininen

2 : Vihreä

3 : Syaani

4 : Punainen

5 : Purppura

6 : Keltainen

7 : Valkoinen

8 : Harmaa

9 : Kirkas sininen

10 : Kirkas vihreä

11 : Kirkas syaani

12 : Kirkas punainen

13 : Kirkas purppura

14 : Kirkas keltainen

15 : Kirkas valkoinen

Tätä funktiota käytetään vain muuntamaan vanhoja MS-DOS-käyttöjärjestelmään perustuvia BASIC-sovelluksia, jotka käyttävät edellä mainittuja värikoodeja. Funktio palauttaa suurkokonaislukuarvon, joka ilmaisee, mitä väriä Lotus Symphony -ohjelman IDE-ympäristössä on käytettävä.

Virhekoodit

5 Virheellinen toimintokutsu

Esimerkki:

Sub ExampleQBColor

Dim iColor As Integer

Dim sText As String

iColor = 7

sText = "RGB= " & Red(QBColor( iColor) ) & ":" & Blue(QBColor( iColor) ) & ":" & Green(QBColor( iColor) )

MsgBox stext,0,"Color " & iColor

End Sub


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit