在聲明區中聲明如下(在.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的功能.->
