Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, _
                ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, _
                                                  ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
ShellExecute 0&, vbNullString, "http://www.163.com", vbNullString, vbNullString, vbNormalFocus!!!!!!