[填空題] 窗體上有一個名稱為CD1的通用對話框。通過菜單編輯器建立如圖1所示的菜單。程序運(yùn)行時，如果單擊“打開”菜單項(xiàng)，則執(zhí)行打開文件的操作，當(dāng)選定了文件(例如：G:VB2010-9in.txt)并打開后，該文件的文件名會被添加到菜單中，如圖2所示。各菜單項(xiàng)的名稱和標(biāo)題等定義如下表。 標(biāo)題 名稱 內(nèi)縮 索引 可見 文件 File

無

以下是單擊“打開”菜單項(xiàng)的事件過程，請?zhí)羁铡?/p>

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空處應(yīng)該填寫文件路徑(即CD1.FileName)。 一般可通過菜單設(shè)計(jì)器對已有的菜單進(jìn)行增減；也可通過菜單控件數(shù)組來實(shí)現(xiàn)菜單項(xiàng)的增減。菜單控件數(shù)組可以在設(shè)計(jì)階段建立，也可以在運(yùn)行時建立。利用這一特點(diǎn)，可在設(shè)計(jì)叫建立菜單控件數(shù)組的第一個元素，該元素的下標(biāo)為0、Visible屬性為False。在程序運(yùn)行時，通過Load語句來建立該菜單控件數(shù)組的新元素，并將其Visible屬性置為True，從而實(shí)現(xiàn)增加菜單項(xiàng)的功能，因此第2空處應(yīng)填Visible。