[填空题] 窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时，如果单击“打开”菜单项，则执行打开文件的操作，当选定了文件(例如：G:VB2010-9in.txt)并

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

无


以下是单击“打开”菜单项的事件过程，请填空。
Dim mnuCounter As Integer
Private Sub mnuOpen_Click()
CD1.ShowOpen
IfCD1.FileName＜＞""Then
Open______For Input As #1
mnuCounter=mnuCount

参考答案：

CD1.FileName；Visible

问题解析:

通用对话框的FileName属性返回的是对话框中选中的文件路径，由于本题中需要打开在对话框中选中的文件，因此在打开文件的语句第1空处应该填写文件路径(即CD1.FileName)。 一般可通过菜单设计器对已有的菜单进行增减；也可通过菜单控件数组来实现菜单项的增减。菜单控件数组可以在设计阶段建立，也可以在运行时建立。利用这一特点，可在设计叫建立菜单控件数组的第一个元素，该元素的下标为0、Visible属性为False。在程序运行时，通过Load语句来建立该菜单控件数组的新元素，并将其Visible属性置为True，从而实现增加菜单项的功能，因此第2空处应填Visible。