main
define a string
define b varchar(20)
let a="1234567890"
display a
let b=ccl_trim(a)
display b
let b=' 09876543 '
let a=ccl_trim(b)
display a
let a=" abcde"
display ccl_trim(a)
end main
function ccl_trim(p_str)
define p_str string
define l_str base.StringBuffer
let l_str=base.StringBuffer.create()
call l_str.append(p_str)
call l_str.trim()
return l_str.tostring()
end function
这个例子里有,不必专门写出来的
回覆刪除