rst.delete

Question

Function CreatSelectionHeading(RstFiledsName As Variant) As ADODB.Recordset 
  Dim rst As ADODB.Recordset 
  Set rst = New ADODB.Recordset 
    With rst 
      .Fields.Append RstFiledsName(0), adDouble ', 20, adFldIsNullable 
      .Fields.Append RstFiledsName(1), adDouble ', , adFldMayBeNull 
      .Fields.Append RstFiledsName(2), adBSTR, , adFldMayBeNull 
    End With 
  Set CreatSelectionHeading = rst 
End Function 下面的程序,是仿SQL的select * from 表 order by 字段名方法.
  nn = Array("x", "y", "tempText") 
  Set rst = CreatSelectionHeading(nn) 
  With rst 
    .Open 
    For jj = 0 To UBound(mArray) 
      .AddNew 
      .Fields(0) = mArray(jj)(0) 
      .Fields(1) = mArray(jj)(1) 
      .Fields(2) = mArray(jj)(2) 
    Next jj 
    '排序
    .Sort = ("x Asc ,y Asc") 
在仿select * from 表 order by 字段名 操作时.存在问题是
select * from 表 order by 字段名 每次操作,rst都是全新记录.
上面的程序操作是追加记录．请问各们大侠的问题是，在上面使用中你更喜欢用rst.delete还是set rst =nothing  

Answer 1

应为你在函数里
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset 
所以每次执行下面的
Set rst = CreatSelectionHeading(nn)
时，rst都是个新对象。你用delete还是set =nothing应该都没有影响。
但是考虑到垃圾内存管理，set =nothing是首选。