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/03090102.xhp | 85 ++++++++++++++++++++++ 1 file changed, 85 insertions(+) create mode 100644 helpcontent2/source/text/sbasic/shared/03090102.xhp (limited to 'helpcontent2/source/text/sbasic/shared/03090102.xhp') diff --git a/helpcontent2/source/text/sbasic/shared/03090102.xhp b/helpcontent2/source/text/sbasic/shared/03090102.xhp new file mode 100644 index 000000000..571abc33d --- /dev/null +++ b/helpcontent2/source/text/sbasic/shared/03090102.xhp @@ -0,0 +1,85 @@ + + + + + + + Select...Case Statement + /text/sbasic/shared/03090102.xhp + + + + + + +

+ + Select Case statement + Case keyword; in Select Case statement + + + +

Select...Case Statement

+Defines one or more statement blocks depending on the value of an expression. +

+ +

Select Case syntax + + Select Case expression + Case values + Statement Block + [ Case values2 + Statement Block] + [ Case Else + Statement Block] + End Select + + +

+ expression: Any expression that controls if the statement block that follows the respective Case clause is executed. + values: Any value list that is compatible with the expression. The statement block that follows the Case clause is executed if expression matches values. + +

+ +Sub ExampleRandomSelect +Dim iVar As Integer + iVar = Int((15 * Rnd) -2) + Select Case iVar + Case 1 To 5 + Print "Number from 1 to 5" + Case 6, 7, 8 + Print "Number from 6 to 8" + Case 8 To 10 + Print "Greater than 8" + Case Else + Print "Out of range 1 to 10" + End Select +End Sub + + +

+ If statement + Iif or Switch functions +

+ + + \ No newline at end of file -- cgit v1.2.3