前面的五篇博文中,我一一的给大家讲解了webbrowser控件的一些属性、方法。本篇博文我将讲解webbrowser控件的另一个属性locationname,该属性主要用来返回当前所浏览网页的标题。语法格式为:
object.locationname
其中,参数object 表示网络浏览器控件名。
实现代码:
Private Sub Command1_Click()
WebBrowser1.Navigate (Text1.Text)
End Sub
Private Sub Command2_Click()
Label2.Caption = "当前网页的标题是:" & WebBrowser1.LocationName
End Sub
我们看一下执行的效果图:
源程序解读:
1,单击command1按键触发了click事件,调用navigate方法,访问到新浪官方网站;
2,单击command2按键触发了command2的click事件,为label2的caption属性赋值,调用webbrowser控件的locationname方法,获取当前网页的标题。
至此前六篇博文,一个VB开发编写的简单web浏览器就差不多写好了,当然,如果需要更强大的功能,还需要更深入的学习与了解VB,以及API,因为目前这个简单浏览器从真正意义上来说,并不是我们开发的。我们使用了webbrowser控件。