填空题

窗体上有一个名称为CDl的通用对话框。通过菜单编辑器建立如图l所示的菜单。程序运行时，如果单击“打开”菜单项，则执行打开文件的操作，当选定了文件（例如：G:\VB\2010-9\in.txt）并打开后，该文件的文件名会被添加到菜单中，如图2所示。各菜单项的名称和标题等定义如下表。
 　　
以下是单击“打开”菜单项的事件过程，请填空。
Dim mnuCounter As Integer
Private Sub mnuOpen_Click()
CD1.ShowOpen
If CD1.FileName <> "" Then
Open  ______ For Input As #1
mnuCounter = mnuCounter + 1
Load fname(mnuCounter)
fname(mnuCounter).Caption = CD1.FileName
fname(mnuCounter).  ______  = True
Close #1
End If
End Sub