解释VB代码,谢谢

[复制链接]
查看11 | 回复1 | 2009-8-24 20:09:51 | 显示全部楼层 |阅读模式
redim preserve a(n+1) '重新定义a的长度,并保留原始数据p=0'让p等于0do while x>a(p) and pa(p)且p<=n的时候p=p+1'让p递增loop'循环for i =n to p step-1'让i从n递减到p循环a(i+1)=a(i)'让a(i+1)等于a(i)next i'循环a(p)=x'让a(p)等于x这很可能是一个插入排序的过程...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行