填空题：如下程序的功能是：用户执行不同的菜单命令，可以实现增加和减少菜单的操作。新增的第n个菜单项的标题为“新增菜单项n”，单击

如下程序的功能是：用户执行不同的菜单命令，可以实现增加和减少菜单的操作。新增的第n个菜单项的标题为“新增菜单项n”，单击新增的第i个菜单项，弹出一个对话框，显示的消息是“你按下了第i个新增菜单项”。
其中，i=1…n。已经建立的菜单项及属性如下表所示。请在空白处填人适当的内容，将程序补充完整。

Dim counter As Integer
Private Sub Add_Menu_Click()
counter=counter+1
Load New_Menu(counter)
New_Menu(counter)．Caption=“新增菜单项”&Str(counter)
【l】
End Sub
Private Sub Del_Menu_Click()
Unload New_Menu(counter)
counter=counter_1
End Sub
Private Sub New_Menu_Click(Index As Integer)
【2】
End Sub