用VB編寫簡單的程序來清空文檔菜單

文檔菜單內存放的是我們最近使用的文件的快捷方式，它所對應的目錄在WINDOWS 95（或WINDOWS 98）安裝目錄下的Recent目錄。當我們不在需要這些快捷方式時，我們可以清空文檔菜單。
清空文檔菜單的方法有兩種。方法一：選擇“開始菜單→設置→任務欄和開始菜單”（或右擊任務欄選擇“屬性” ），彈出“任務欄 屬性” ，再選擇“開始菜單程序→清除” 。方法二：在資源管理器里選定C:\PWIN95\RECENT目錄（假設你的WINDOWS 95安裝在C:\PWIN95目錄下），然后把Recent目錄里的文件全部選擇并刪除它們。
遺憾的是這兩種方法都比較麻煩，能不能有一種簡便的方法，只點一下鼠標就完成清空文檔菜單的辦法呢？按照一下的步驟試試：
1. 在Visual Basic 5.0中新建一個工程。
2. 在代碼窗口中鍵入以下代碼：
Private Sub Form_Load()
'如果文檔菜單非空
    If Dir("c:\pwin95\recent\*.*") <> "" Then
        Kill ("c:\pwin95\recent\*.*")
        MsgBox "文檔菜單已清空！", vbOKOnly, "清空"
        Unload Form1
    Else
        MsgBox "文檔菜單本來為空！", vbOKOnly, "清空"
        Unload Form1
    End If
End Sub
注意：請將上面程序中的c:\pwin95換成你的Windows 95（或Windows 98）所在的目錄。
3. 保存工程為“清空文檔.vbp”并選擇“文件→生成清空文檔.exe”
4. 把生成的清空文檔.exe放到桌面上或開始菜單里。
這樣你就可以用簡單的方法完成清空文檔菜單的任務了。
如果你用的是Windows98，還可以把清空文檔.exe放到計劃任務中，以便實現自動清空文檔菜單的功能。

原文轉自：http://www.anti-gravitydesign.com