如何用VB建立捷径(ShortCut)

2016-02-19 16:52 22 1 收藏

生活已是百般艰难,为何不努力一点。下面图老师就给大家分享如何用VB建立捷径(ShortCut),希望可以让热爱学习的朋友们体会到设计的小小的乐趣。

【 tulaoshi.com - 编程语言 】

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

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)
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:toolsspe3pe2.exe", "")'放在开始功能表ret = fCreateShellLink("..", "MyName", "c:toolsspe3pe2.exe", "")'放在程式集功能表ret = fCreateShellLink(".", "MyName", "c:toolsspe3pe2.exe", "")

来源:http://www.tulaoshi.com/n/20160219/1613415.html

延伸阅读
DiskGenius如何建立分区 创建分区之前首先要确定准备创建的分区类型。有三种分区类型,它们是主分区、扩展分区和逻辑分区。主分区是指直接建立在硬盘上、一般用于安装及启动操作系统的分区。由于分区表的限制,一个硬盘上最多只能建立四个主分区,或三个主分区和一个扩展分区;扩展分区是指专门用于包含逻辑分区的一种特殊主分区。可以在扩...
主要是要通过两个方面: (一)对鼠标的停留位置做出判断,也就是得到鼠标在屏幕上停留的位置。 (二)将鼠标的移动到所确定的位置上。 而实现这个功能则要使用到SetCursorPos这个函数,此函数的功能是设定鼠标位置。 这个函数的声明如下: Public Declare Function SetCursorPos Lib "user32" (ByVal x As ...
标签: ASP
  假设在我们前面所说的例子中,我们想在应用程序中显示区域的左半边显示客户的姓名列表,再在每个客户姓名后面加上两个链接:Purchase History和Recent Purchase。当用户点击其中的一个链接,客户程序就会运行一个存储过程并在右边区域显示出结果。 为了显示这个想法的灵活性,我想让用于返回数据的三个操作单元执行不同的工作过程,它们...
标签: ASP
  在个人电脑上使用单机版应用软件的时代很快就要过去了,现在大部分的应用程序都开发出网络版或大都需要共享网络上丰富的数据资源。我们虽然写了很长时间基于客户端/服务器的应用程序,但是这些程序大部分只是运行在小型的局域网内部。然而,有很多客观的原因要求我们要修改这些程序以使它们能够运行在一个企业的内部网甚至是国际互联网...
标签: ASP
  让我们先分析一下客户端/服务器应用程序。在一个标准的客户端/服务器应用程序中,在应用程序开始时,你能够初始化数据库连接字符串,这就意味着,客户有使用数据库连接字符串的权利,这包括用户名和口令。但是客观情况如果不允许你在网络上发送这些信息的话,你就必需在不联接数据库的情况下直接从客户端取得数据发送给客户。那么解决方...

经验教程

129

收藏

62
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部