详细内容
vb字体超链接 |
|
2008-10-30 20:39:01 提供者:超链接字体 浏览次数 |
|
双击它,加入代码: Shell"Explorer.exe""http://www.baidu.com""" 但这样将使用IE打开而不是使用默认的浏览器,如果想使用默认的浏览器,那么在所有代码的顶端加入: PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong PrivateConstSW_SHOWNORMAL=1 然后把Label1的Click事件代码改成: ShellExecute0,"Open","Http://www.baidu.com","","",SW_SHOWNORMAL |
