说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB利用API在VB5.0中实现清除文档名

HTML文档下载 WORD文档下载 PDF文档下载
VB利用API在VB5.0中实现清除文档名
在Win95或Win98中,右击“任务栏",选择“属性",出现“任务栏"对话框,单击“开始菜单程序",单击“清除",就能清除“文档"菜单的内容(即最近打开的所有文档),利用Windows API在VB中是很容易实现的。该API函数为:

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

  其中uFlags如为1,pv则为一路径字符串的地址;如为2,则为项标示列表的地址。

  范例

  在通常声明中添加下面一行声明(要写成一行):

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

  在窗体添加一命令按纽,按缺省方式添加,往Command1_Click事件中添加:

  Private Sub Command1—Click()

  Call SHAddToRecentDocs(2, vbNullString)

  End Sub

  按F5运行,你会发现“文档"菜单的内容全部清除。当然,如果程序设计需要往“文档"菜单中添加文件,只需把vbNullString改为文件的路径,如“c:\windows\a.txt"
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘