实用小程序（51）

IT商界

马坤 · 2003年12月29日

　　用秘密API实现清空文档菜单

　　开始菜单的文档菜单中记录了访问过的各种文档。我们可以用一小段代码就能实现清除这些快捷方式的功能。

　　这里向大家介绍一个不是很常用的API函数：SHAddToRecentDocs。

　　1.在VB中新建一工程，在其中声明API函数：(写在一行上)

　　Private Declare Sub SHAddToRecentDocs Lib "shell32.dll" (ByVal uFlags As Long, ByVal PV As String)

　　2.再在窗体上画一个Button，双击写下以下代码：

　　SHAddToRecentDocs 2, vbNullString

　　其中，第一个参数表示删除。第二个参数表示无效值为空。