海底小纵队蜘蛛蟹:请教一个一个vb问题,急!

来源:百度文库 编辑:高校问答 时间:2024/05/12 08:01:12
编译错误:
未找到方法或数据成员!!!
Private Sub initialcmd()
If Data1.Recordset.RecordCount = 0 Then
cmd_find.Enabled = False
cmd_add.Enabled = True
cmd_delete.Enabled = False
cmd_update.Enabled = False
cmd_cancel.Enabled = False
cmd_save.Enabled = False
cmd_exit.Enabled = True
Else
cmd_find.Enabled = True
cmd_add.Enabled = True
cmd_delete.Enabled = True
cmd_update.Enabled = True
cmd_cancel.Enabled = False
cmd_save.Enabled = False
cmd_exit.Enabled = True
End Sub

Data1.Recordset.RecordCount = 0
是不是
Data1.Recordset.RecordCount == 0

VB中写成Data1.Recordset.RecordCount = 0 是对的

赋值和比较都是 使用“=”

可能是没有存在相应的 控件 吧 !

如果上面这段代码放在了Form_Load中,肯定不行。

建议放在Form_Activate中。

我也觉得是

楼上说的是

应该是= 后面的是属性吧