给按钮加上代码
选择要设置代码的按钮，然后选择"事件"页，单击"Click"项目右边的按钮，为Click事件设置代码：
三个按钮的Click事件分别设为：
| 名称 | 标题 | Click事件代码 |
| Add | 增加行 | CurrentTable.AddNew() |
| Delete | 删除行 | If
CurrentTable.Current IsNot
Nothing Then CurrentTable.Current.Delete End If |
| Clone | 克隆行 | If
CurrentTable.Current IsNot
Nothing Then CurrentTable.Current.Clone End If |
最后逐次单击“确定”按钮退出菜单设计，可以看到我们设计的菜单将替换掉原来的系统菜单。