select '1' 工号,'销售' 职位,'张三' 姓名 from dual union all
select '2' 工号,'仓管' 职位,'李四' 姓名 from dual union all
select '3' 工号,'人事' 职位,'王五' 姓名 from dual union all
select '4' 工号,'人事' 职位,'赵六' 姓名 from dual union all
select '5' 工号,'销售' 职位,'马奇' 姓名 from dual
)
select * from t order by decode(职位,'销售',1,'人事',2,3),工号;
如上答案纯手工码字没有参与审核测试!@
.版本 2.程序集 窗口程序集1
.子程序 整数排列
.参数 大小排列, 逻辑型
.局部变量 计次, 整数型
清除数组 (分割的数字) ' 先把数组归零以清除上次的数据
.计次循环首 (取文本长度 (编辑框1.内容), 计次)
加入成员 (分割的数字, 到数值 (取文本中间 (编辑框1.内容, 计次, 1))) ' 把文本数字分割并存入数组
.计次循环尾 ()
编辑框1.内容 = “”
.判断开始 (大小排列 = 真)
数组排序 (分割的数字, 假) ' 排序
.默认
数组排序 (分割的数字, )
.判断结束
.计次循环首 (取数组成员数 (分割的数字), 计次)
编辑框1.内容 = 编辑框1.内容 + 到文本 (分割的数字 [计次]) ' 显示
.计次循环尾 ()
.子程序 _从大到小_被单击
整数排列 (真)
.子程序 _从小到大_被单击
整数排列 (假)
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)