From 940b4d1848e8c70ab7642901a68594e8016caffc Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sat, 27 Apr 2024 18:51:28 +0200 Subject: Adding upstream version 1:7.0.4. Signed-off-by: Daniel Baumann --- .../source/text/sbasic/shared/03090102.xhp | 71 ++++++++++++++++++++++ 1 file changed, 71 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..7d9eb53cc --- /dev/null +++ b/helpcontent2/source/text/sbasic/shared/03090102.xhp @@ -0,0 +1,71 @@ + + + + + + + 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 condition Case expression Statement Block [Case expression2 Statement Block][Case Else] Statement Block End Select + + + + condition: Any expression that controls if the statement block that follows the respective Case clause is executed. + expression: Any expression that is compatible with the condition type expression. The statement block that follows the Case clause is executed if condition matches expression. + + + +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 + + + + \ No newline at end of file -- cgit v1.2.3