窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时，如果单击“打开”菜单项，则执行打开文件的操作，当选定了文件（例如： G:\VB\2010-9\in.txt）并打开后，该文件的文件名会被添加到菜单中，如图2所示。各菜单项的名称和标题等定义如下表。

以一下是单击“打开”菜单项的事件过程，请填空。　　Dim mnuCounter As Integer　　Private Sub tnnuOpen_ Click（）　　CDI．Show0pen　　If CD I ．FileName＜＞""Then　　Open_【14】_For Input As＃1　　mnuCounter=mnuCounter+1　　Load FName（mnuCounter）　　FName（mnuCounter）.Caption=CD I.FileName　　FName（mnuCounter）._【15】_=True　　Close＃1　　End If　　End Sub

威海石岛港是我国北方最大的渔港。