VB制作浏览器
我看过了黑客风云里的制作个性IE浏览器,他制作的只是一个简单的,没有后退按钮前进按钮及关闭按钮,我想制作一个有关闭后退前进的按钮的浏览器,就像VB中新建窗体选择WEB浏览...
我看过了黑客风云里的制作个性IE浏览器,他制作的只是一个简单的,没有后退按钮前进按钮及关闭按钮,我想制作一个有关闭后退前进的按钮的浏览器,就像VB中新建窗体选择WEB浏览器中(VB自带的浏览器)一样,代码我已经知道了,不知道的是,它上面有关闭后退前进的按钮是利用了什么控件,我可以从其他的号上给你们30分!
展开
5个回答
展开全部
不用控件,用代码
看以下的吧
后退 WebBrowser1.GoBack
前进 WebBrowser1.GoForward
主页 WebBrowser1.Navigate ("主页地址")
刷新 WebBrowser1.Refresh
搜索 WebBrowser1.GoSearch
停止 WebBrowser1.Stop
查找 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_FIND, OLECMDEXECOPT_DODEFAULT
复制 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT
粘贴 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PASTE, OLECMDEXECOPT_DODEFAULT
选择全部 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT
页面设置 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT
打印预览 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DODEFAULT
打印 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT
属性 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT
保存 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SAVE, OLECMDEXECOPT_DODEFAULT
另存为 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT
源文件 WebBrowser1.Navigate "View-Source:" & WebBrowser1.LocationURL
看以下的吧
后退 WebBrowser1.GoBack
前进 WebBrowser1.GoForward
主页 WebBrowser1.Navigate ("主页地址")
刷新 WebBrowser1.Refresh
搜索 WebBrowser1.GoSearch
停止 WebBrowser1.Stop
查找 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_FIND, OLECMDEXECOPT_DODEFAULT
复制 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT
粘贴 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PASTE, OLECMDEXECOPT_DODEFAULT
选择全部 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT
页面设置 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT
打印预览 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DODEFAULT
打印 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT
属性 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT
保存 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SAVE, OLECMDEXECOPT_DODEFAULT
另存为 WebBrowser1.SetFocus:WebBrowser1.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT
源文件 WebBrowser1.Navigate "View-Source:" & WebBrowser1.LocationURL
AiPPT
2024-09-19 广告
2024-09-19 广告
作为北京饼干科技有限公司的工作人员,关于AIPPT免费生成PPT的功能,我可以简要介绍如下:AIPPT是一款基于人工智能技术的PPT制作工具,它为用户提供了免费生成PPT的便捷服务。用户只需简单输入PPT的主题或内容大纲,AIPPT便能智能...
点击进入详情页
本回答由AiPPT提供
展开全部
利用了windows microsoft common controls 6.0(sp6)
中的Toolbar和ImageList。
ImageList的name=imlIcons
Toolbar的name=tbToolBar
右击ImageList,选中“属性”,即可插入图标。
代码如下:
Private Sub tbToolBar_ButtonClick(ByVal Button As Button)
On Error Resume Next
Select Case Button.Key
Case "Back" ’“后退”图标
WebBrowser1.GoBack
Case "Forward" ’“前进”图标
WebBrowser1.GoForward
Case "Refresh" ’“刷新”图标
WebBrowser1.Refresh
Case "Home" ’“主页”图标
WebBrowser1.GoHome
Case "Search" ’“搜索”图标
WebBrowser1.GoSearch
Case "Stop" ’“停止”图标
WebBrowser1.Stop
End Select
End Sub
WebBrowser是浏览器控件,用到了microsoft Internet controls。
中的Toolbar和ImageList。
ImageList的name=imlIcons
Toolbar的name=tbToolBar
右击ImageList,选中“属性”,即可插入图标。
代码如下:
Private Sub tbToolBar_ButtonClick(ByVal Button As Button)
On Error Resume Next
Select Case Button.Key
Case "Back" ’“后退”图标
WebBrowser1.GoBack
Case "Forward" ’“前进”图标
WebBrowser1.GoForward
Case "Refresh" ’“刷新”图标
WebBrowser1.Refresh
Case "Home" ’“主页”图标
WebBrowser1.GoHome
Case "Search" ’“搜索”图标
WebBrowser1.GoSearch
Case "Stop" ’“停止”图标
WebBrowser1.Stop
End Select
End Sub
WebBrowser是浏览器控件,用到了microsoft Internet controls。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
VB自带的那个装有前进后退的是ToolBar控件,其中的6个图标也是这个空控件自带的.这个在部件里引用common control 6.0后就有了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用WebBrowser控件,这个就是传说中的IE内核了,从控件工具箱里面找到它,它带有gohome,refresh等等的方法,你可以试着做一下,很简单的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
command控件
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |