菜單項(xiàng)的動(dòng)態(tài)裝入是指菜單項(xiàng)的個(gè)數(shù)不固定. 例子就是文件菜單中最近打開的文件的列表。在第一次打開文件之前,該列表是空的,并且不在文件菜單中出現(xiàn);打開一個(gè)文件后,該列表不再是空的,并且文件菜單中出現(xiàn)代表被打開文件的菜單項(xiàng)。
具體的實(shí)現(xiàn)過程如下:
在文件菜單里增加一個(gè)菜單項(xiàng),標(biāo)題任意,并假設(shè)菜單項(xiàng)的Name屬性是
opened_files_ list;
更改菜單項(xiàng)opened_files_list的可見屬性,使 opened_files_list.Visible=False
更改菜單項(xiàng)opened_files_list的下標(biāo)屬性,使 opened_files_list.Index=0
在程序中控制菜單項(xiàng)opened_files_list的動(dòng)態(tài)裝入。假設(shè)要顯示打開過的第二個(gè)文件的文件名,并且該文件名存放在一個(gè)文件名數(shù)組opened _file_name里。以下的代碼就實(shí)現(xiàn)了這一功能:
　
Load opened_files_list(1)
opened_files_list(1).Caption="&2"+opened_file_name(1)
opened_files_list(1).Visible=True
　
需要注意的是,對于下標(biāo)為0的菜單項(xiàng),不能用Load方法。因?yàn)樵诔绦驁?zhí)行時(shí),該菜單項(xiàng)就 已經(jīng)被裝入到內(nèi)存里了;另外,在菜單項(xiàng)的標(biāo)題屬性字符里的"&"字符具有特殊的含義,它的作 用是在顯示該屬性字符串的同時(shí),并不顯示"&"本身,而緊跟"&"的字符在顯示時(shí)具有下劃線, 并且該字符成為熱鍵。如果下標(biāo)不為0的菜單項(xiàng)不再需要,為了減少對內(nèi)存資源的占用,可以用Unload方法把它 從內(nèi)存卸出;同樣地,不能用Unload卸出下標(biāo)為0的菜單項(xiàng)。