首頁(yè) > 學(xué)院 > 網(wǎng)絡(luò )技術(shù) > 正文

用VB編寫(xiě)簡(jiǎn)單的程序來(lái)清空文檔菜單

2018-10-16 21:39:30
字體:
來(lái)源:轉載
供稿:網(wǎng)友
文檔菜單內存放的是我們最近使用的文件的快捷方式,它所對應的目錄在WINDOWS 95(或WINDOWS 98)安裝目錄下的Recent目錄。當我們不在需要這些快捷方式時(shí),我們可以清空文檔菜單。

清空文檔菜單的方法有兩種。方法一:選擇“開(kāi)始菜單→設置→任務(wù)欄和開(kāi)始菜單”(或右擊任務(wù)欄選擇“屬性” ),彈出“任務(wù)欄 屬性” ,再選擇“開(kāi)始菜單程序→清除” 。方法二:在資源管理器里選定C:/PWIN95/RECENT目錄(假設你的WINDOWS 95安裝在C:/PWIN95目錄下),然后把Recent目錄里的文件全部選擇并刪除它們。

遺憾的是這兩種方法都比較麻煩,能不能有一種簡(jiǎn)便的方法,只點(diǎn)一下鼠標就完成清空文檔菜單的辦法呢?按照一下的步驟試試:

1. 在Visual Basic 5.0中新建一個(gè)工程。
2. 在代碼窗口中鍵入以下代碼:
Private Sub Form_Load()
'如果文檔菜單非空
    If Dir("c:/pwin95/recent/*.*") <> "" Then 
        Kill ("c:/pwin95/recent/*.*")
        MsgBox "文檔菜單已清空!", vbOKOnly, "清空"
        Unload Form1
    Else
        MsgBox "文檔菜單本來(lái)為空!", vbOKOnly, "清空"
        Unload Form1
    End If
End Sub
注意:請將上面程序中的c:/pwin95換成你的Windows 95(或Windows 98)所在的目錄。
3. 保存工程為“清空文檔.vbp”并選擇“文件→生成清空文檔.exe”
4. 把生成的清空文檔.exe放到桌面上或開(kāi)始菜單里。
這樣你就可以用簡(jiǎn)單的方法完成清空文檔菜單的任務(wù)了。

如果你用的是Windows98,還可以把清空文檔.exe放到計劃任務(wù)中,以便實(shí)現自動(dòng)清空文檔菜單的功能。
發(fā)表評論 共有條評論
用戶(hù)名: 密碼:
驗證碼: 匿名發(fā)表