From ed5640d8b587fbcfed7dd7967f3de04b37a76f26 Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sun, 7 Apr 2024 11:06:44 +0200 Subject: Adding upstream version 4:7.4.7. Signed-off-by: Daniel Baumann --- .../source/text/sbasic/shared/03010301.xhp | 69 ++++++++++++++++++++++ 1 file changed, 69 insertions(+) create mode 100644 helpcontent2/source/text/sbasic/shared/03010301.xhp (limited to 'helpcontent2/source/text/sbasic/shared/03010301.xhp') diff --git a/helpcontent2/source/text/sbasic/shared/03010301.xhp b/helpcontent2/source/text/sbasic/shared/03010301.xhp new file mode 100644 index 000000000..c7a824885 --- /dev/null +++ b/helpcontent2/source/text/sbasic/shared/03010301.xhp @@ -0,0 +1,69 @@ + + + + + + + Blue Function + /text/sbasic/shared/03010301.xhp + + + + + +
+ + Blue function + + +

Blue Function

+Returns the blue component of the specified composite color code. +
+ + + +Blue (Color As Long) + + + +Integer + + + Color value: Long integer expression that specifies any composite color code for which to return the blue component. +Under VBA compatibility mode (Option VBASupport 1), the function Blue() is incompatible with VBA colors, when color from previous call to function RGB [VBA] is passed. + + + + + + + + +Sub ExampleColor +Dim lVar As Long + lVar = rgb(128,0,200) + MsgBox "The color " & lVar & " consists of:" & Chr(13) &_ + "red= " & Red(lVar) & Chr(13)&_ + "green= " & Green(lVar) & Chr(13)&_ + "blue= " & Blue(lVar) & Chr(13) , 64,"colors" +End Sub + + + +
-- cgit v1.2.3