PB按数量实现序列。该怎么解决

PB按数量实现序列。
在PB里有一个文本框里输入数量比如是10，在另外一个文本框里可以实现1、2、3、4、5、6、7、8、9、10
若输入的是5，则显示的是1、2、3、4、5，这种的怎么实现？
------解决方案--------------------
string ls_data
long ll_i, ll_num
ll_num = long(sle_1.text) //sle_1里录入数据的


for ll_i = 1 to ll_num
  if ll_i = ll_num
     ls_data += string(ll_i)
  else
     ls_data += string(ll_i) + "、"
  end if
next

sle_2.text = ls_data  //搞定