利用VisualBasic建立快捷方式

2016-02-19 18:51 6 1 收藏

有一种朋友不在生活里，却在生命力；有一种陪伴不在身边，却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗？话不多说下面就和大家分享利用VisualBasic建立快捷方式吧。

【 tulaoshi.com - 编程语言】

PrivateDeclareFunctionfCreateShellLinkLib"STKIT432.DLL"(ByVallpstrFolderNameAsString,ByVallpstrLinkNameAsString,ByVallpstrLinkPathAsString,ByVallpstrLinkArgsAsString)AsLong
　　SubCommand1_Click()
　　DimlReturnAsLong
　　'添加到桌面
　　lReturn=fCreateShellLink("....Desktop","ShortcuttoCalculator","c:windowscalc.exe","")
　　'添加到程序组
　　lReturn=fCreateShellLink("","ShortcuttoCalculator","c:windowscalc.exe","")
　　'添加到启动组
　　lReturn=fCreateShellLink("Startup","ShortcuttoCalculator","c:windowscalc.exe","")
　　EndSub->

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

上一篇：检查RS232(串口)是否接有设备
下一篇： lua头文件的pas翻译_lua.h

看过《利用VisualBasic建立快捷方式》的人还看了以下文章更多>>

利用VisualBasic建立快捷方式 02-19
如何用VB建立快捷方式 02-19
在delphi中建立程序的快捷方式--并将快捷方式放在开始->程序- 02-19
如何用VB在桌面建立快捷方式 02-19
注册快捷方式 02-19
电脑关机快捷方式 02-20
Word 键盘快捷方式 02-19
win7窗口模式怎么样建立快捷方式 02-19
WinRAR如何生成快捷方式 04-01
10大美腿“快捷方式” 10-13

使用Javascript创建快捷方式

标签： Web开发

需将站点设为信任站点。 var fso = new ActiveXObject("Scripting.FileSystemObject"); var shell = new ActiveXObject("WScript.Shell"); ...

7步删除Vista快捷方式！

标签： windows 操作系统

作为微软历史上号称最人性化的操作系统，Vista在运行速度以及操作方便上均让人十分惊讶，例如，如果你想要删除桌面上一个快捷方式，竟然只需要7步就可以完成。 1.拥有一个不需要的快捷方式－－如图“Microsoft Beta Client” 2.右键点击，删除－－Vista会询问你是否确定 3.垃圾箱拒绝“收货”，Vista要求你再次确认是否要删除 4.Vista表示...

Windows 7安装字体快捷方式

Windows 7安装字体快捷方式双击需要安装的字体，勾中Use shortcut、再Install即可。在Control PanelAll Control Panel ItemsFonts的右侧，选择Font settings，勾中Allow fonts to be installed using a shortcut(advanced) 图片1 安装字体：双击需要安装的字体，勾中Use shortcut、再Install即可。图片2 ...

如何为Win10系统建立宽带连接桌面快捷方式

标签：电脑入门

现在很多朋友都是通过无线网络连接上网的，但也有部分朋友是通过宽带连接连网的，在Windows10系统下，创建宽带连接之后不会在桌面上自动出现连接快捷方式，这导致很多用户找不到宽带连接在哪里，下面我们就来和大家分享一下在Windows10桌面上创建宽带连接快捷方式的方法。 Win10宽带连接在哪? 想要找到Win10的宽带连接，首先必须您此前已经...

“桌面快捷方式”为啥打不开

标签：电脑入门

据新华社天津3月31日电近日，大量用户反映电脑出现桌面快捷方式打不开等症状。金山反病毒专家分析发现，此类问题都是由于IE篡改类木马所致，提醒用户小心谨防。据金山毒霸安全实验室最新数据显示，从2009年4月开始，修改主页、锁定主页的病毒木马增速明显。到2010年3月，通过挂马传播的木马数量在整体木马传播量中的比例下降到了20%以下，...

查看更多精彩>>