我用下面的代码可以成功打开网页，但速度较慢，并且是在浏览器中打开的。代码如下：
DECLARE INTEGER ShellExecute ;
IN SHELL32.DLL ;
INTEGER nWinHandle,;
STRING cOperation,;
STRING cFileName,;
STRING cParameters,;
STRING cDirectory,;
INTEGER nShowWindow
t=ALLTRIM(thisform.text19.value)
=ShellExecute(0,"open","http://,"","",1)

打开效果如下：


但参考别人的软件打开效果如下图，并且速度很快。想请教一下，人家是怎么做到的？

你是用系统默认浏览器打开网页，人家可能是在VFP表单使用浏览器控件打开网页。
VFP可用WebBrowser控件，如：
of = CREATEOBJECT("form1")
of.show(1)

DEFINE CLASS form1 As Form
    Width = 800
    Height = 600
    ADD OBJECT URL as TextBox WITH Top=10,Left=10,Width=680,Height=22,Anchor=11,;
        Value = "http://www.baidu.com"
    ADD OBJECT CMD1 as CommandButton WITH Top=10,Left=700,Width=40,Height=22,Anchor=9,Caption = ">>>"
    Add Object WB As Olecontrol WITH OleClass="Shell.Explorer.2",Top=40,Left=0,Width=800,Height=460,Anchor=15,Visible=.T.
        
    PROCEDURE Init
        this.WB.Silent = .T.
    ENDPROC

    PROCEDURE CMD1.Click
        thisform.WB.navigate(ALLTRIM(thisform.URL.Value), 0, NuLL, NULL, NULL)
        thisform.WB.SetFocus
    ENDPROC
ENDDEFINE

感谢吹水佬
另一个问题请教
在文本框单击事件中写什么样的代码，实现将当前中文输入法切换成英文输入法？因为该文本框只需要输入英文字母.

value="http://www.
时测试，下载不了。

在GotFocus事件切换到英文输入，在LostFocus事件恢复原输入法。
切换到英文输入，参考帖：
https://bbs.bccn.net/viewthread.php?tid=485814&extra=page%3D1%26amp%3Bfilter%3D0%26amp%3Borderby%3Dlastpost%26amp%3Bascdesc%3DDESC

禁了这句 *this.WB.Silent = .T. 提示网页脚本代码有错。
也有可能是WebBrowser控件不兼容。

这个网站好象要登录，重新登录试试。