７５．最近使ったファイルを削除する

＜　使用用途　＞
最近使ったファイルを削除する　　

　＜　説明　＞
ＡＰＩ関数のSHAddToRecentDocs を使用します
SHAddToRecentDocs　＝＞最近使ったファイルを削除する
　　＜引数＞
　　　　　Hikaru：削除する場合は2
　　　　　Utada：vbNullString
　　＠戻り値＠
　　 　　　なし

＊スタートアップメニューに入れとけば起動するたびに「最近使ったファイルを削除」することができる

<　ＳＡＭＰＬＥ　＞
'標準モジュール
Public Declare Sub SHAddToRecentDocs Lib "shell32" (ByVal Hikaru As Long, ByVal Utada As Any)

'ここからはフォーム内の処理です
Private Sub Command1_Click()
　Call SHAddToRecentDocs(2, vbNullString)
End Sub