主题：[求助]急~~~领导审批功能的实现中有些问题不明白

弱弱的问下

有的时候，可能希望能记录审批人和审批时间，你可以将“审批”列改为字符型，用于记录审批人，另外增加一个日期时间列，名为“审批日期”，用于记录审批日期。
然后在窗口或菜单中加一个审批按钮，将按钮的代码设置为：

If User.Group = "经理" Then
    Tables("表A").Current("审批") = UserName
    Tables("表A").Current("审批日期") = Date.Today()
Else
    MessageBox.show("你无审批权限!")
End If

当然还得来个取消审批的按钮，代码为：

If User.Group = "经理" Then
    Tables("表A").Current("审批") = Nothing
    Tables("表A").Current("审批日期") = Nothing
Else
    MessageBox.show("你无取消审批权限!")
End If

最后将表事件PrepareEdit的代码设置为：

If e.Row.IsNull("审批") = False Then '如果审批列不为空
    e.Cancel = True '则禁止编辑
End If

这样经过审批的行，将不能编辑。

里面提到 在窗口或菜单中加一个审批按钮 我想问下我如何设置 按钮 呢？？？怎么才能弄出按钮来呢？？？