计算机应用 | 古代文学 | 市场营销 | 生命科学 | 交通物流 | 财务管理 | 历史学 | 毕业 | 哲学 | 政治 | 财税 | 经济 | 金融 | 审计 | 法学 | 护理学 | 国际经济与贸易
计算机软件 | 新闻传播 | 电子商务 | 土木工程 | 临床医学 | 旅游管理 | 建筑学 | 文学 | 化学 | 数学 | 物理 | 地理 | 理工 | 生命 | 文化 | 企业管理 | 电子信息工程
计算机网络 | 语言文学 | 信息安全 | 工程力学 | 工商管理 | 经济管理 | 计算机 | 机电 | 材料 | 医学 | 药学 | 会计 | 硕士 | 法律 | MBA
现当代文学 | 英美文学 | 通讯工程 | 网络工程 | 行政管理 | 公共管理 | 自动化 | 艺术 | 音乐 | 舞蹈 | 美术 | 本科 | 教育 | 英语 |

通信网络设计课程设计简单浏览器的设计(一)-通(2)

2013-06-22 01:01
导读:激发。该事件采用VARIENT_BOOL的一个输 入参数来指示IE是全屏显示方式(VARIENT_TRUE)还是普通显示方式(VARIENT_FALSE) OnMenuBar 改变MenuBar的属性时激发,标示参数是
激发。该事件采用VARIENT_BOOL的一个输 入参数来指示IE是全屏显示方式(VARIENT_TRUE)还是普通显示方式(VARIENT_FALSE)  
OnMenuBar  改变MenuBar的属性时激发,标示参数是VARIENT_BOOL类型的。 VARIANT_TRUE是可见,VARIANT_ FALSE是隐藏  
OnQuit  无论是用户关闭浏览器还是开发者调用Quit方法,当IE退出时就会激发  
OnStatusBar  与OnMenuBar调用方法相同,标示状态栏是否可见。  
OnToolBar  调用方法同上,标示工具栏是否可见。 
OnVisible  控制窗口的可见或隐藏,也使用一个VARIENT_BOOL类型的参数  
StatusTextChange  如果要改变状态栏中的文字,这个事件就会被激发,但它并不理会程序是否有状态栏 
TitleChange  Title有效或改变时激发 

3程序原代码详解
3.1程序模块介绍
本文中的网页浏览器系统包括以下十个主要的模块文件:
1  网页浏览器.frm  浏览器的主窗体,用于显示网页内容以及菜单和工具栏。
2  Module1.bas,用于声明各种常用的文件处理函数。

3.2.1整体介绍
 包括本文中的程序在内的任何浏览器的开发中,其核心技术都利用了微软公司提供的一个浏览器控件—WebBrowser。在Visual Basic 6.0中该控件不是默认就在工具箱里,需要用户自己将它调出了,先选择Visual Basic 6.0菜单中的“工程”—>“部件”,在弹出的对话框中选择“Microsoft Internet Controls”,然后点击“运用”后“确定”(如下图3—2)。该控件就会以一个小地球的图标出现在工具栏里。这样就可以接着完成后面的编程工作。

 主窗体围绕着WebBrowser控件共有70多个属性,而其中的事件更是达上百个,也是可见它在整个程序中的重要性。
3.2.2 PageSetup事件 (科教作文网 zw.nseac.com整理)
   “PageSetup”菜单单击事件的功能是如下图3—4所示的页面设计。
Private Sub mnu_PageSetup_Click ()
    brwWebBrowser (TabStrip1.Tabs (CurTab_Index).Tag).ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT
End Sub


3.2.3 “Find On this Page”事件
“Find On this Page”菜单单击事件,弹出当前所浏览网页内部查找对话框。
Private Sub mnu_EditFind_Click ()
On Error GoTo mnu_EditFind_Click_Error:
    SetFocusOnly = True
    TabStrip1.SetFocus
    brwWebBrowser (TabStrip1.Tabs(CurTab_Index).Tag).SetFocus
    SendKeys "^f"
    Exit Sub
mnu_EditFind_Click_Error:
    ShowErrorMessageBox ("mnu_EditFind_Click")
End Sub


3.2.4 AddToFavorites函数
AddToFavorites函数,将当前浏览的网页添加到收藏夹。
Private Sub mnu_AddToFavorites_Click ()
On Error GoTo mnu_AddToFavorites_Click_Error:
    Call AddToFavorites
    Exit Sub
mnu_AddToFavorites_Click_Error:
    ShowErrorMessageBox ("mnu_AddToFavorites_Click") 
End Sub
3.2.5“Internet Options”事件
 “Internet Options”菜单单击事件代码,用于设置IE的属性。
Private Sub mnu_InterNetOptions_Click ()
    Dim RetVal
    RetVal = Shell ("rundll32.exe shell32.dll, Control_RunDLL Inetcpl.cpl", vbNormalFocus)
End Sub

 


3.4浏览器多页面显示和捕捉弹出窗口在浏览器内构想
 支持多页面显示和捕捉弹出窗口在浏览器内。这两个功能是IE浏览器所不具备的,而实现这两个功能的关键是brwWebBrowser_NewWindow2事件和NewTab、SetTabCaption两个函数。在brwWebBrowser_NewWindow2事件中“Call NewTab (Me, URL, -99)”调用了NewTab函数,目的就是首先建立一个TAB。 (科教范文网 lw.AsEac.com编辑整理)
 可以通过SSTAB这个控件来完成显示多网页的功能的,因此当有一个新的网页需要显示的时候,就需要新建一个TAB,而不是另外弹出一个窗口。而SetTabCaption函数的作用就是来设置TAB标题。
 
 
4.各种浏览器比较
 在浏览器市场中,由于各方面的原因IE一直都占据着龙头老大的地位,所以在比较中就以IE作为蓝本。Opera浏览器可以缩放网页的大小比例、调整网页中的图像、全屏浏览等等。傲游Maxthon游览器中可以链接打开一些系统工具。腾讯TT也可以缩放网页的大小比例。这些都是我值得学习的地方,有点遗憾的是,本人的浏览器中不能查看网页源码,这是今后需要改进的。对于浏览网页安全的设置方面,Opera、傲游和腾讯TT比IE更直观,更便于用户根据自己的实际情况来调整。另外,它们三者都可以更换软件皮肤,使浏览器更加靓丽,而由于设计时间有限,在作品中来不及实现这个功能。
 它们三者都嵌入了相应的搜索链接,例如,傲游里嵌入了百度搜索。这个功能对于在当今这个内容纷杂繁多的网络世界里快速高效的寻找到用户自己想要的资源是非常重要的,是很人性化的设计。这也是值得我学习的。另外,腾讯TT可以根据用户的IP地址判断用户所在的地区,再把该地区两天的天气发送到用户端来,在浏览器底部显示。而且腾讯TT中还添加有多线程的飓风下载器,可以加快用户下载资源的速度。
&n

上一篇:职称评定,和谐城市住区需要新型防盗窗(一)-通 下一篇:没有了