最基础问题,请问一下。

lshdf 2002-10-31 09:25:30
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,总是提示说,该方法无法在该对象上使用
...全文
70 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
onlineboy 2002-10-31
  • 打赏
  • 举报
回复

只有Recordset.AddNew
却没有Recordset.Update

重复.AddNew
当然要报“该方法无法在该对象上使用”啦
zhenxizhou 2002-10-31
  • 打赏
  • 举报
回复
有可能,你的程序中没打开数据库
zither 2002-10-31
  • 打赏
  • 举报
回复
应该是你的Data1.Recordset.AddNew这句话错了
你的RECORDSET未指明对象
DIM db AS database
dim rs as recordset

set db=opendatabase("你的数据库名字")
set rs=db.openrecordset("你数据库中的表名")
wu_xiaoya 2002-10-31
  • 打赏
  • 举报
回复
哪句出错啊?
lshdf 2002-10-31
  • 打赏
  • 举报
回复
3Q各位了呀,两处改完之后就好用了:)

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧