VisualBasic实现在程序中开启网页

在声明区中声明如下(在.bas档中用Public,在Form中用Private)

PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhWndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong

在程序中

Intranet
ShellExecuteMe.hWnd,"open","http://Intranet主机/目录","","",5
Internet
ShellExecuteMe.hWnd,"open","http://www.ruentex.com.tw","","",5

很简单吧!!!就算您的机器不能连上Internet,您也可以马上感受一下Intranet的功能.->