在VB 5.0中使用超文件链接有两种常用方法。一种是使用VB 5.0自身的WebBrowser控件,具体的作法是在控件列表中选择Microsoft Internet Controls。加入控件后,使用WebBrowser1.Navigate "http://askpro.yeah.net/"语句,你就可以访问我们站点的主页了。这个控件实际是调用Internet Explorer,所以它支持IE的所有特性,但前提是你的机器必须装有IE 3.0或更高版本。另一种办法是采用Windows API中的ShellExecute语句。首先加入如下声明:
Private 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 hwnd, "Open", "http://www.china-askpro.com/", 0, 0, 0
这个语句调用默认的浏览器(可以是Netscape Navigator,或其它的浏览器)打开该超链接。具体采用哪种方法要看你的需要。
至于如何让鼠标变成"手"形光标就简单多了,首先修改控件的MousePointer改为99,然后在MouseIcon属性中加入"手"形光标文件(*.ico或*.cur格式)。
也可以在http://www.agendumsoftware.com/下载免费控件:AgHyperText,这个控件方便地显示各种链接,包括HTTP、FTP和邮件等。
|