For $i = 1 To UBound($aRecords) If $aRecords[$i] = "" Then _ArrayDelete ($aRecords,$i) _ArraySort ($aRecords,0,0,0,0) EndIf
举报
#include <Array.au3> Dim $aRecords[10] = ['', 52, '', '', '', 656, 14, 1, '', 11] _ArrayDisplay($aRecords) $j = 0 For $i = 0 To UBound($aRecords)-1 If $aRecords[$j] = "" Then _ArrayDelete($aRecords, $j) $j -= 1 EndIf $j += 1 Next _ArrayDisplay($aRecords)
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-11-7 01:54 , Processed in 0.091195 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.