[填空題] 在窗體上利用菜單編輯器設(shè)計一個主菜單項“菜單控制”(Name屬性值為mnuMenu)，然后為其設(shè)計兩個子菜單項“增加菜單”(Name屬性值為mnuA
[填空題] 在窗體上利用菜單編輯器設(shè)計一個主菜單項“菜單控制”(Name屬性值為mnuMenu)，然后為其設(shè)計兩個子菜單項“增加菜單”(Name屬性值為mnuAdd) 和“減少菜單”(Name屬性值為mnuDel)，另外設(shè)置一個標(biāo)題為空的菜單項
Dim Inxld As Integer
Private Sub mnuAdd_Click()
Dim mnuc As String
mnuc=InputBox("input caption")
InxId；InxId+1
【6】 mnuDyn(InxId)
mnuDyn(Inxld) ，Calption=mnuc
mauDyn(InxId) .Visible=True
End Sub
Private SubmnuDel_Click()
Dim i As Integer
If 【7】 Then
MsgBox "菜單項已全部被刪除"
Else
Unload mnuDyn(InxId)
InxId=InxId-1
End If
End Sub
正確答案：[6]Load [7]InxId＜1
參考解析：本題考查動態(tài)菜單的應(yīng)用，InxId表示動態(tài)菜單項的索引，每增加一個菜單項，InxId加一，并用 Load方法將菜單顯示出來。而在刪除菜單項時，首先判斷是否有相應(yīng)的動態(tài)菜單項可以刪除，即當(dāng)InxId的值大于等于1時，才可以使用Unload方法刪除最后一個增加的菜單項。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。