Office中国论坛/Access中国论坛

标题: 这个怎么实现? [打印本页]

作者: petrelai 时间: 2003-12-2 01:02
标题: 这个怎么实现?
大家好!我想实现这样的一个按钮命令,请大家帮助我!
首先这个按钮的标签是"保存",当我按第一次按它的时候,它就就保存记录,然后它的标签变成了"继续",当我再按它的时候,它就会添加新记录,怎么实现呀?

作者: LYP6160 时间: 2003-12-2 01:28
' 以下代码未经测试，
Private Sub 命令1_Click()
On Error GoTo Err_命令1_Click

IF Me.命令1.caption = "确定"  Then
      Me.命令1.caption = "继续"
      ' 保存记录代码
Else
      DoCmd.GoToRecord , , acNewRec
End If
Exit_命令1_Click:
Exit Sub

Err_命令1_Click:
MsgBox Err.Description
Resume Exit_命令1_Click

End Sub

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)