【VC++开源代码栏目提醒】:网学会员为需要VC++开源代码的朋友们搜集整理了Browsertxt_VB 编写的简易网页浏览器_控件组件_新兴源码下载 - 婚姻家庭相关资料,希望对各位网友有所帮助!
用户登录 nbspnbsp 用户注册首 页 ┆ 源码下载 ┆ 网络学院 ┆ 最新源码 ┆ 源码排行 ┆ 屏蔽广告首 页ASP源码PHP源码Asp.Net源码JSP源码VB源码Delphi源码VC/CJava源码C源码Flash源码电子书籍nbsp源码搜索教程搜索热门标签VB805nbspnbspVC422nbspnbspVC158nbspnbspC126nbspnbspDelphi118nbspnbspAsp99当前位置新兴网络 源码下载 Asp.Net源码 控件组件 VB 编写的简易网页浏览器 Browser.txtloading...复制代码The following example creates a mini-browser: NOTE THIS IS NOT A COMPLETE BROWSER BUT GIVES A GOOD IDEA ON HOW TO USE WEBBROWSER CONTROL. Email comments to stevenspbright.net or visit my Web Site www.bright.net/stevensp Create a new Standard .exe project in Microsoft Visual Basic 5.0. Form1 is added automatically. On the Project menu click Components. Select the Microsoft Internet Controls component. Click OK. Add the following controls to Form1: Control Name -------------- --------- Text Box Text1 This will be THE URL Window Command Button Command1 Set its Visable Property to FALSE WebBrowser WebBrowser1This will be the area where the Site will appear so size it accordingly. In Form1s code window add the following code: Option Explicit Private Sub Command1_Click If Text1.Text ltgt Then WebBrowser1.Navigate Text1.Text If WebBrowser1.Visible False Then WebBrowser1.Visible True End If End If End Sub Private Sub Text1_KeyPressKeyAscii As Integer If KeyAscii 13 Then Command1_Click End If End Sub Private Sub Toolbar1_ButtonClickByVal Button As ComctlLib.Button Select Case Button.Key Case back WebBrowser1.GoBack Case forward WebBrowser1.GoForward Case home text1.text http://www.bright.net/stevensp command1_click Case refresh WebBrowser1.Refresh Case stop WebBrowser1.Stop End Select End Sub Private Sub WebBrowser1_DownloadBegin StatusBar1.Panels1.Text Getting Page... End Sub Private Sub WebBrowser1_DownloadComplete StatusBar1.Panels1.Text Got It End Sub On the File menu click Save Project1. On the Run menu click Start. When you hit enter the WebBrowser appears and automatically loads the URL displayed in the TextBox. NOTE: Distribution of a Microsoft Visual Basic 5.0 application that uses the WebBrowser control requires that Microsoft Internet Explorer 3.0 or later be installed on the target system prior to installation. 下载 VB 编写的简易网页浏览器关于本站 网站帮助 广告合作 下载声明 友情连接 网站地图 粤ICP备10045437号Copyright copy 2009-2010 NewXing.Com. All Rights Reserved .