Question

pb中怎样将文本框中的数字排序

Answer 1

//自己写个函数调用一下就好了。
//假设函数的输入参数是文本框内容string as_string
long ll_length
ll_length = len(as_string)
integer li_bit,i
string ls_bit, ls_rslt
string ls_add
ls_add = 'N'
for li_bit = 1 to ll_length
ls_bit = mid(as_string, li_bit, 1) //逐个截取
if not isnumber(ls_bit) then continue //不是数字，继续下一个
//是数字，重新拼接组合并返回ls_rslt
if isnull(ls_rslt) or len(ls_rslt) = 0 then
ls_rslt = ls_bit
else
for i = 1 to len(ls_rslt)
if mid(ls_rslt,i,1) > ls_bit then
ls_rslt = left(ls_rslt,i - 1) + ls_bit + right(ls_rslt,len(ls_rslt) - i + 1)
ls_add = 'Y' //标注有过修改，便于后边判断此for循环是否执行
exit
end if
next
if ls_add <> 'Y' then ls_rslt += ls_bit //for循环没执行，直接拼接在最后
ls_add = 'N'
end if
next
return ls_rslt
//最后返回的字符串ls_rslt，就是按照数字从小到大排列的输出

Answer 2

自己写个函数调用一下就好了。