LibreOffice 7.3 Help
āĻāϰā§āĻā§āĻŽā§āύā§āĻā§āϰ āϤāĻžāϞāĻŋāĻāĻž āĻšāϤ⧠āύāĻŋāϰā§āĻŦāĻžāĻāĻŋāϤ āĻŽāĻžāύ āĻĒā§āϰāĻĻāĻžāύ āĻāϰā§āĨ¤
Choose (Index, Selection1[, Selection2, ... [,Selection_n]])
āĻāύāĻĄā§āĻā§āϏ: āĻāĻāĻāĻŋ āϏāĻāĻā§āϝāĻžāϏā§āĻāĻ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āϝāĻž āĻĒā§āϰāĻĻāĻžāύ āĻāϰāĻž āĻšāĻŦā§ āĻāĻŽāύ āĻāĻāĻāĻŋ āĻŽāĻžāύ āĻāϞā§āϞā§āĻ āĻāϰā§āĨ¤
āύāĻŋāϰā§āĻŦāĻžāĻāύ1: āϝā§āĻā§āύ⧠āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āϝāĻž āϏāĻŽā§āĻāĻžāĻŦā§āϝ āĻĒāĻāύā§āĻĻā§āϰ āĻāĻāĻāĻŋ āϧāĻžāϰāĻŖ āĻāϰā§āĨ¤
Choose āĻĢāĻžāĻāĻļāύāĻŋāĻ āĻāύāĻĄā§āĻā§āϏ āĻŽāĻžāύā§āϰ āĻāĻĒāϰ āĻāĻŋāϤā§āϤāĻŋ āĻāϰ⧠āĻāĻā§āϏāĻĒā§āϰā§āĻļāύā§āϰ āĻāĻāĻāĻŋ āϤāĻžāϞāĻŋāĻāĻž āĻĨā§āĻā§ āĻāĻāĻāĻŋ āĻŽāĻžāύ āĻĒā§āϰāĻĻāĻžāύ āĻāϰ⧠āĻĨāĻžāĻā§āĨ¤ āϝāĻĻāĻŋ āĻāύāĻĄā§āĻā§āϏ = 1 āĻšā§, āϤāĻžāĻšāϞ⧠āĻĢāĻžāĻāĻļāύāĻāĻŋ āϤāĻžāϞāĻŋāĻāĻžāϰ āĻĒā§āϰāĻĨāĻŽ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύāĻāĻŋ āĻĒā§āϰāĻĻāĻžāύ āĻāϰ⧠āĻĨāĻžāĻā§, āϝāĻĻāĻŋ āĻāύāĻĄā§āĻā§āϏ i = 2 āĻšā§, āϤāĻžāĻšāϞ⧠āĻĻā§āĻŦāĻŋāϤā§ā§ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύāĻāĻŋ āĻĒā§āϰāĻĻāĻžāύ āĻāϰ⧠āĻĨāĻžāĻā§, āĻāĻŦāĻ āĻ āύā§āϰā§āĻĒāĨ¤
āϝāĻĻāĻŋ āĻāύāĻĄā§āĻā§āϏā§āϰ āĻŽāĻžāύ ā§§ āĻāϰ āĻāĻžāĻāϤ⧠āĻā§āĻ āĻ āĻĨāĻŦāĻž āϤāĻžāϞāĻŋāĻāĻžāĻā§āĻā§āϤ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύā§āϰ āϏāĻāĻā§āϝāĻžāϰ āĻāĻžāĻāϤ⧠āĻŦā§ āĻšā§ āϤāĻžāĻšāϞ⧠āĻĢāĻžāĻāĻļāύāĻāĻŋ āĻāĻāĻāĻŋ āύāĻžāϞ āĻŽāĻžāύ āĻĒā§āϰāĻĻāĻžāύ āĻāϰ⧠āĻĨāĻžāĻā§āĨ¤
āĻŦāĻŋāĻāĻŋāύā§āύ āϏā§āĻā§āϰāĻŋāĻ āĻĨā§āĻā§ āĻāĻāĻāĻŋ āϏā§āĻā§āϰāĻŋāĻ āύāĻŋāϰā§āĻŦāĻžāĻāύ āĻāϰāĻžāϰ āĻāύā§āϝ āύāĻŋāĻā§āϰ āĻāĻĻāĻžāĻšāϰāĻŖāĻāĻŋ āύāĻŋāϰā§āĻŦāĻžāĻāύ āĻĢāĻžāĻāĻļāύāĻāĻŋ āĻŦā§āϝāĻŦāĻšāĻžāϰ āĻāϰ⧠āĻĨāĻžāĻā§ āϝāĻž āĻĻā§āĻŦāϰāĻž āĻāĻāĻāĻŋ āĻŽā§āύ⧠āĻāĻ āĻŋāϤ āĻšā§:
Sub ExampleChoose
Dim sReturn As String
sReturn = ChooseMenu(2)
Print sReturn
End Sub
Function ChooseMenu(Index As Integer)
ChooseMenu = Choose(Index, "Quick Format", "Save Format", "System Format")
End Function