最基础问题，请问一下。

[lshdf]

Private Sub Command1_Click()
Data1.Recordset.FindFirst "kai=27"
End Sub

Private Sub Command2_Click()

Open "f:stock\s600000.txt" For Input As #1
Do While Not EOF(1)
Input #1, k1, k2, k3, k4, k5, k6, k7
Data1.Recordset.AddNew
Text1.Text = k2
Loop
Close #1
End Sub

Private Sub Data1_Validate(Action As Integer, Save As Integer)
Action = 8

End Sub

Private Sub Form_Initialize()
Data1.Recordset.AddNew
End Sub
为什么，command1,总是提示说，该方法无法在该对象上使用

[lshdf]

3Q各位了呀，两处改完之后就好用了：）

[wu_xiaoya]

哪句出错啊？

[zither]

应该是你的Data1.Recordset.AddNew这句话错了
你的RECORDSET未指明对象
DIM db AS database
dim rs as recordset

set db=opendatabase("你的数据库名字")
set rs=db.openrecordset("你数据库中的表名")

[zhenxizhou]

有可能，你的程序中没打开数据库

[onlineboy]

晕
只有Recordset.AddNew
却没有Recordset.Update

重复.AddNew
当然要报“该方法无法在该对象上使用”啦