卷帘式菜单的简单使用

.判断开始 (组合框_项目索引.现行选中项 ＝ -1 且 组合框_菜单索引.现行选中项 ≠ -1)
卷帘式菜单_测试.删除项目 (-1, 到整数 (组合框_菜单索引.取项目文本 (组合框_菜单索引.现行选中项)))
.默认
卷帘式菜单_测试.删除项目 (到整数 (组合框_项目索引.取项目文本 (组合框_项目索引.现行选中项)), 到整数 (组合框_菜单索引.取项目文本 (组合框_菜单索引.现行选中项)))
组合框_项目索引.清空 ()
.计次循环首 (卷帘式菜单_测试.取项目数 (到整数 (组合框_菜单索引.取项目文本 (组合框_菜单索引.现行选中项))), i)
组合框_项目索引.加入项目 (到文本 (i － 1), )
.计次循环尾 ()