首页 相关文章 如何用VB建立捷径(ShortCut)

如何用VB建立捷径(ShortCut)

  原本这应是用OLE的方式来做,但可用以下的方式来做,前题是有vb所提供的vb5stkit.dll所以令人不太愉快

Private Declare Function fCreateShellLink Lib "vb5stkit.dll" _  (ByVal Forder As String, ByVal ShortCutName As String, _  ByVal ExePath As String, ByVal Params As String) As LongDim ret As Long'放在DeskTopret = fCreateShellLink("..\..\Desktop", "MyName", "c:\tools\spe3\pe2.exe", "")'放在开始功能表ret = fCreateShellLink("..", "MyName", "c:\tools\spe3\pe2.exe", "")'放在程式集功能表ret = fCreateShellLink(".", "MyName", "c:\tools\spe3\pe2.exe", "")
...[ 查看全文 ]

2016-02-19 标签:

如何用VB建立捷径(ShortCut)的相关文章

手机页面
收藏网站 回到头部