首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

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

2013-08-09 
求助!!关于PB数组用冒泡排序法!大神请进!题目单行编辑文本框 sle_1long ll_1[10]ll_1[10,15,8,23,6,4,58,

求助!!关于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

热点排行