翻新时间:2013-12-14
利用VB实现对IE的调用与控制
利用VB实现对IE的调用与控制 随着网络应用的不断扩展,采用HTML语言编写的文档越来越多,如何在VB程序中实现对HTML文档的浏览是一个需要解决的问题。本文以一个实例说明了在VB中调用和控制Internet Explorer的方法。
一、 编程准备
VB通过OLE自动化技术创建和控制Internet Explorer对象的实例,因此,在新建一个工程后需要加入Microsoft Internet 控制的参考,方法是打开Visual Basic 的Project下拉菜单中的Reference…选项,单击Browse…按钮,在Windows的system目录下找到SHDOCVW.DLL并选中它,它是Internet Explorer的类库。
二、 实现方法
在窗体form1中添加表1所示的控件。 控件类型 控件名称 控件内容
LabelLable1 地址:
TextText1 (空)
Command cmdView 浏览
CommandcmdForward 向前
Command cmdBackward 向后
Command cmdCloseView 关闭浏览窗口
Command cmdExit 退出
对上述窗体添加如下代码即可实现对Internet Explorer的调用与控制,
Dim WithEvents ieView As InternetExplorer
'在通用模块中定义Internet Explorer对象
Private Sub Form_Load()
cmdForward.Visible = False
cmdBackward.Visible = False
cmdCloseView.Visible = False
'窗体调入时隐藏Internet Explorer控制按钮
End Sub
Private Sub cmdView_Click()
Dim txtAddress As String
On Error Resume Next '设置错误陷阱
Set ieView = GetObject("", "InternetExplorer.Application")
ieView.Visible = True
'创建Internet Explorer对象的一个实例,并设为可见
txtAddress = Trim(Text1.Text)
ieView.Navigate txtAddress, navNoReadFromCache
'按text1控件的内容进行浏览
cmdView.Enabled = False
cmdExit.Enabled = False
cmdForward.Visible = True
cmdBackward.Visible = True
cmdCloseView.Visible = True
'使浏览、退出命令钮无效,使IE控制命令钮可见
下一页
下载文档
网友最新关注
- 三岔口
- 一次对学生随笔的浏览
- 给“面包”的世界加点芬芳
- 新“少年中国说”
- 冰糖葫芦
- 黄山松,我读懂了你!
- 肩膀
- “三顾茅庐”的求贤之道
- 两棵花
- 写给儿子
- 白色翅膀
- 学会放手
- 找到自己的位置
- 机遇与创造交响曲
- 肩膀
- 局机关工会探视慰问管理办法
- 2011年三会一课工作制度
- 乡镇确保创先争优活动开展制度
- 项目监理人员月度绩效考核分配制度
- 工程部精细化管理考核办法
- 2011乡信息公开责任检查制度
- 2011年公司行政后勤管理制度
- 都市轨道交通治理方针
- 增值税发票管理制度
- 乡主动公开政府信息移送管理规定
- 党支部“三会一课”制度
- 商品房屋租赁管理办法
- 乡政府廉政规章制度
- 城市无障碍设施建设与治理方针
- 标准化供电营业所建设材料
- 复合土工膜在渠道防渗工程中的应用
- 坝基开挖及边坡支护技术交底
- 渠道防渗工程施工方法
- 城市暴雨强度公式研究
- 熵权决策法在区域水资源开发最优排序中的应用
- 东周欲为稻,西周不放水
- 适合发展中国家小农户的低成本滴灌系统
- 樟塘闸交通桥计算书
- 城市水利可持续发展对策及思考
- 成立咸阳市水文勘测队的设想
- 关于如何提高雨量站管理水平的感想
- 关于关心西部偏远地区水文测站职工队伍建设的几点建议
- 两种新的非充分灌溉模式
- 廖坊水利枢纽工程大坝监测观测资料初步分析
- 成本法在水电站设备资产评估中的应用
- 《柳树醒了》教学设计之六
- 《柳树醒了》教学设计之七
- 《柳树醒了》
- 《邓小平爷爷植树》教学设计之二
- 《乌鸦喝水》教学设计之八
- 《柳树醒了》教学设计之四
- 《柳树醒了》教学设计之二
- 《春雨的色彩》教学设计之三
- 《春雨的色彩》
- 《柳树醒了》教学设计之三
- 《古诗两首》第一课时
- 《看电视》
- 《柳树醒了》教学设计之五
- 《乌鸦喝水》教学设计之九
- 《邓小平爷爷植树》