Crystal自定义函数(转换为大写,返回数组,求和)

SumTwoNumbers 函数

对两个数字求和 - Crystal 语法

Function (NumberVar Num1, Numbervar Num2)
Num1 + Num2

SumTwoNumbers 函数的返回值

SumTwoNumbers(7,10) 返回 17

SumTwoNumbers(0,55) 返回 55

Capitalize 函数

将字符串转换为大写 - Crystal 语法

Function (StringVar str, Optional BooleanVar firstLettersOnly:=False)
if firstLettersOnly then ProperCase(str)
else UpperCase(str)

Capitalize 函数的返回值

Capitalize("crystal reports") 将返回字符串“CRYSTAL REPORTS”

Capitalize("crystal reports", True) 将返回字符串“Crystal Reports”

Capitalize("crystal reports", False) 将返回字符串“CRYSTAL REPORTS”

MakeNumberArray 函数

返回包含 10 个数字的数组 - Crystal 语法

Function ()
NumberVar array x [10];
NumberVar i := 1;
For i := 1 to 10 do
x[i]:=i;
x

MakeNumberArray 函数的返回值

MakeNumberArray () 返回的数组中包含以下数字：1、2、3、4、5、6、7、8、9、10

FunnySum 函数

可选参数示例 - Crystal 语法

Function (Optional NumberVar Num1:= 0,
Optional NumberVar Num2 := 0)
Num1 + Num2

使用不同参数组调用 FunnySum 时的返回值

FunnySum(3, 2) 返回 5

FunnySum(3) 返回 23

FunnySum () 返回 30