Shell("explorer 网址")就可以了
解决方案 »
- winsock.connect 方法为什么有时不运行winsock_connect()事件?
- vb6必须打开所有form才能编译?
- 求最佳算法!!
- 在datagrid控件中实现两列之积等于另一列的时候,遇到数据库为空的情况,执行错误,帮我看一下代码哪里错了?
- 请问如何通过编程打开“ICMP”(2K或者XP)
- winsock如何传输其他类型的数据
- 天下英雄请入,有个问题请教
- 有什么函数可以判断某个文件夹是否共享?
- 数据分析——逐个比较单元格数据大小
- 用户控件如何捕捉 mouse-enter 和 mouse-leave 事件?
- VB中有没有一个函数,只知道秒数,可以转换成几天几小时几分几秒?
- 用ADSI无法改NT密码?
在CLICK事件中加入以下代码,
Dim HYPERJUMP
HYPERJUMP = ShellExecute(0&, vbNullString, "MAILTO:[email protected]", vbNullString, vbNullString, vbNormalFocus)
就可以发电邮。
超级链接同理
ShellExecute 0&, vbNullString, "Http:\\www.shawls.coc.cc", vbNullString, vbNullString, vbNormalFocus
ShellExecute hwnd, "open", "mailto:[email protected]", vbNullString, vbNullString, 0
浏览IE:
ShellExecute 0, "open", "http://wulai.yeah.net", vbNullString, vbNullString, 3