大家好，我用下列script在 SPSS11中想删除一列，结果运行错误，请问这段代码错在哪里呢？谢谢。

Sub Main
 Dim objDataCells As ISpssDataCells
 Dim rownum As Long '行号
 For rownum=0 To objDataCells.NumRows-1 '运行到这里SPSS报错
 objDataCells.ValueAt(rownum,0)="" '删除第1列所有内容
 Next rownum
End Sub