其实编号问题不满解决的，新增行的时候，从1开始遍历，如果现有行没有1的编号，则采用1作为编号，没有2，则采用2作为编号...
代码大概就是：
dim i as integer = 1
do loop
if 编号为i的行存在 then
i = i+1
else
编号 = i
exit do
end if
loop
加好友 
发短信
Post By：2011/8/15 7:50:00 [只看该作者]
