以下是引用jinanshui在2013-7-12 13:48:59的发言:
大侠不要发脾气
观jinanshui是论坛游民等级了,也不低了。二楼的回答是一种温馨的提示,并不是发脾气。
【名称】
ADEL()函数
【类别】
函数
【描述】
从一个数组中删除一个、一行或一列元素。
【原形】
ADEL(ArrayName, nElementNumber [, 2])
【参数】
ArrayName
指定一个数组,ADEL( )函数删除这个数组的一个元素或一行一列。
nElementNumber
指定从数组中删除第几个元素,或者第几行或第几列。如果要从数组中删除一列,必须包含可选参数 2。
2
从数组中删除一列。
【返回值】
数值型
【示例】
CLOSE DATABASES
OPEN DATABASE mydata
USE book
SELECT bookname FROM book INTO ARRAY mybookname
CLEAR
gnPos = ASCAN(mybookname, "e 网打尽") && 查询书名
IF gnPos != 0
= ADEL(mybookname, gnPos) &&如果发现,从数组中删除
ENDIF
DISPLAY MEMORY LIKE mybookname