[VB6 ] 請教一個資料庫的問題

[steven76 (steven)]

各位好
小弟在寫一個資料庫的程式，
這一個命令紐是要將ACCESS裡面的資料，
還有VB表單的Text輸入的資料，全部刪除
可是執行後卻出現424錯誤的訊息
程式碼如下，希望知道的大大告知一下
謝謝
While Adodc1.Recordset.EOF = False
      DataGrid.Row = 1
      Adodc1.Recordset.Delete
      Adodc1.Recordset.MoveNext
Wend
If Adodc1.Recordset.EOF = True Then
   Adodc1.Recordset.MoveLast
End If
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 59.117.115.4
推 fumizuki:你都 Eof 了為何還 MoveLast @@
推 jackdawliu:If Adodc1.Record  這一段似乎不用