当前位置: 代码迷 >> PB >> !关于PB数组用冒泡排序法!大神请进
  详细解决方案

!关于PB数组用冒泡排序法!大神请进

热度:84   发布时间:2016-04-29 06:41:47.0
求助!!关于PB数组用冒泡排序法!大神请进!
题目
单行编辑文本框 sle_1
long ll_1[10]
ll_1=[10,15,8,23,6,4,58,96,89,65]

以上是无序排列数组。请大家帮帮忙用冒泡排序怎么写法?最后还要把结果返回到编辑文本框上面显示。
冒泡排序 数组

------解决方案--------------------
long ll_i, ll_k, ll_data[], ll_temp, ll_cnt
ll_data={10,15,8,23,6,4,58,96,89,65}

//冒泡排序
ll_cnt = upperbound(ll_data)
for ll_i = 1 to ll_cnt - 1
ll_temp = ll_data[ll_i]
for ll_k = ll_i + 1 to ll_cnt
if ll_temp > ll_data[ll_k] then
ll_data[ll_i] = ll_data[ll_k]
ll_data[ll_k] = ll_temp
ll_temp = ll_data[ll_i]
end if
next
next

string ls_data
for ll_i = 1 to ll_cnt
ls_data += string(ll_data[ll_i]) + ','
next
ls_data = left(ls_data, len(ls_data) - 1)
messagebox('', ls_data)

sle_1.text = ls_data
  相关解决方案