专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
  下面代码向你演示在VB中如何创建个快捷方式   Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long   Sub Command1_Click   Dim lReturn As Long   添 [阅读全文] [PDF]
vate Declare Function fCreateShellLink Lib \"STKIT432.DLL\"(ByVal lpstrFolderName As String ,ByVal lpstrLinkName As String ,ByVal lpstrLinkPath As String,ByVal lpstrLinkArgs As String) as Long sub Command1Click Dim lReturn As Long [阅读全文] [PDF]
Private Declare Function fCreateShellLink Lib \"STKIT432.DLL\" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long Sub Command1_Click()Dim lReturn As Long\'添加到桌面lReturn = fCreateShellLink(\"..\\..\\ [阅读全文] [PDF]
1 共3条 分1页