在VB6.0中Web浏览器控件是WebBrowser,他的作用是让我们只要加入少量的代码,就能做出和IE功能一样强大的浏览器。
将WebBrowser添加到工具箱方法是:添加"部件"中选择Microsoft Internet Controls(SHDOCVW.dll),后点确定,WebBrowser在工具箱的图标为:![]()
WebBrowser的功能强大是由众多方法、属性和行为组成的,下面说下它的主要属性、方法和行为。
WebBrowser的主要属性:
属性名 |
说明 |
|
LocationURL
| 返回当WebBrower中网页的URL |
|
LocationName
| 返回当WebBrower中网页的标题,即HTML中的Title标记 |
WebBrowser的主要方法:
方法名 |
作用 |
|
Navigate
| 浏览网页。如:WebBrower.Navigate "http://junqing124.update.vip2.com" |
|
GoBack
| 后退 |
|
GoForward
| 前进 |
|
GoHome
| 浏览主页 |
|
GoSearch
| 打开搜索页面 |
|
*******
| 刷新 |
|
Stop
| 停止 |
WebBrowser的主要事件:
事件名 |
说明 |
|
DownloadBegin
| 页面开始下载 |
|
DownloadComplete
| 页面下载完毕 |
|
TitleChange
| 浏览器的Title改变,即浏览新的页面 |
这里简单说了下WebBrower控件的部份属性、方法和行为。
下面是一个示例:
|
|
上面的四个按钮的名字分别为Command1、Command2、Command3、Command4,下面的文本框为Text1,最下面的是一个WebBrowser,名字为WebBrowser1
在Command1的Click事件加入:WebBrowser1.GoBack
在Command2的Click事件加入:WebBrowser1.GoForward
在Command3的Click事件加入:WebBrowser1.*******
在Command4的Click事件加入:If WebBrowser1.Busy = True Then WebBrowser1.Stop
在Text1的KeyPress事件加入:If KeyAscii = 13 Then WebBrowser1.Navigate Text1.Text
按F5运行,在文本输入网址后回车看看效果吧!
1463

被折叠的 条评论
为什么被折叠?



