关于如何设置一个按钮让它链接到一个网站？？？？？？？？？？？？？？？？？？？？的问题
Private Sub Command1_Click()
Shell “explorer。exe “, vbNormalFocus
End Sub
shell 后面跟程序的路径，加一个空格是附加的信息。比如你调用的是浏览器，附加的信息是网址。
如果你调用帮助程序，后面就是帮助文件(chm)的路径
例如
shell “hh。exe c:\ m”
vbNormalFocus是打开窗口获得焦点的模式，没有这个的话打开的窗口只能显示在任务栏
附shell 的详细说明
一。 调用系统“创建快捷方式”向导
是否为VB不支持创建快捷方式而于着急呢？虽然 您可以调用vb5stkit．Dll中的fCreateShellLink函 数，但它是为安装程序设计的，快捷方式的默认路径 总是从当前用户的“＼Start Menu＼Programs”开始，也 就是说，如果您的Windows95装在C盘上，您无法通过 fCreateShellLink函数把快捷方式创建到D盘上去。
现在，给大家介绍一种极为方便、巧妙的方法： 用Shell语句调用系统“创建快捷方式”向导。
新建一个项目，在窗体上放一个按钮，双击此按 钮，加入以下代码：
Private Sub Command1_Click()
Open App。
Path ＆ “\temp。lnk” For Output As #1
Close #1 ‘以上两句在程序所在目录建立一 个临时文件
Shell “Rundll32。exe AppWiz。Cpl，NewLinkHere
“＆ App。
Path ＆ “\temp。lnk”
End Sub
（注意：Shell语句中NewLinkHere后面跟着一个 空格才是引号，否则将出错。）
运行程序，按一下命令按钮，怎么样？“创建快 捷方式”向导出现了，如果创建成功，快捷方式将取 代临时文件temp。
lnk的位置，如果选取消，temp。lnk 也会自动消失。当然，您可以在硬盘的任意位置建立 temp。lnk。好，现在又可以为您的程序增添一项新功 能了。Enjoy！
二。 Rundll32。exe的用途
我们知道，用Shell语句只能调用可执行文件，即 exe、com、bat和pif文件，有时我们想要调用其他一 些系统功能该怎么办呢？此时，Windows提供的 Rundll32。
exe可大显身手了。下面我们来认识一下这 些用法，也许会给您带来一点惊喜。
1．要打开设置系统时间的控制面板文件 （Timedate。cpl),只需运行如下代码：
Shell “Rundll32。exe
Shell32。dll,Control_RunDLL Timedate。
cpl”
至于打开其他控制面板文件，相信您一定能够举 一反三，尝试一下，换个文件名就成了。
2．要运行某一快捷方式（*。lnk）则可以用以下 代码：
She11 “Rundll32。exe url。dll, FileProtocolHandler X” (X代表要运行的文件，包括 路径，下同。
3。 也可以这样写来打开ActiveMovie控制：
Shell “RUNDLL32。EXE amovie。ocx，Rundll”,1
而用Shell “RUNDLL32。EXE amovie。ocx，Rundll /play X”,1 将直接播放媒体文件。
4。 Shell “rundll32。exe desk。cpl，InstallScreenSaver X”当然是安装屏幕保 护啦，如果你写了一个屏幕保护程序，那么可以在安 装程序中写上它，而不一定要装到system目录下。顺 便提一下，VB不是自捞一个“Application Setup Wizard”么？它的VB源代码都在安装目录下的 “\setupkit\setup1”中放着呢，好好把它研究一下。
你完全能做出富有个性的安装程序来。
5。按住shift键，右击某一文件，菜单中会出现 “打开方式”选项，这也许已不是什么秘密。但现在， 用shell “rundll32。exe shell32。dll OpenAs_RunDLL X” 便能直接调用“打开方式”框。
6。 甚至能用这样一句来打印文件（包括HTML所 支持的所有文本与图像格式):
Shell “rundll32。exe MSHTML。DLL，PrintHTML X”, 1
怎么样？是不是小有收获呢？这下，您一定会对 Rundll32。
exe这个平时不起眼的文件另眼相待了，它 可是系统运行必不可少的部件呢！其实 Shell＋Rundll32还能调用其他许多系统功能，比如关 于NetMeeting和Telnet方面的。如果您有兴趣，可以 到往册表的“我的电脑＼HKEY_CLASSES_ROOT＼”或“我 的电脑\HKEY_LOCAL_MACHINE\Software\CLASSES”下 去看看，本文的内容大都是从那里“抄”来的。
只要 有足够的决心、信心、耐心，您一定能发现更多有价 值的东西。Good luck!
。
