【【【【新手问题】】】】PARAMETERS的参数是怎么传递的?
*-----------
* program : h2.prg
* function introduce : do case ... endcase 's use
*-----------
CLEAR
v_Multiplier = 22695477 && the maximal number
v_Increment = 1 && the minimal number
v_Seed = second () && the original seed
? nRand()
? RandMax(100) && output the number less than 100
FUNCTION nRand
v_Seed = MOD (v_Multiplier * v_Seed + v_Increment ,(2 ** 32 ))
RETURN BITAND(v_Seed/(2 ** 16),32767)
ENDFUNC
FUNCTION RandMax
PARAMETERS p_MaxVal
RETURN MOD(nRand(), p_MaxVal) + 1
&&请问上面的p_MaxVal的值是哪里传来的,没有地方给值啊?
ENDFUNC