说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

使用VB获得一页的HTML代码

HTML文档下载 WORD文档下载 PDF文档下载
使用VB获得一页的HTML代码



  加入WebBrowser、Timer、CommandButton控件各一个,然后使用以下代码:

Private Sub Command1_Click()
WebBrowser1.Navigate "http://www.programlife.com/"
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Dim doc, objhtml As Object
Dim i As Integer
Dim strhtml As String

If Not WebBrowser1.Busy Then
Set doc = WebBrowser1.Document
i = 0
Set objhtml = doc.body.createtextrange()
If Not IsNull(objhtml) Then
Text1.Text = objhtml.htmltext
End If
Timer1.Enabled = False
End If
End Sub
Google Drive新增“保存到Drive”按钮功能 可自行添加 腾讯CDC创始人唐沐加盟小米 总经理陈妍接任 老板我想辞职:因为小米100万元征集一张壁纸 移动周报:GitHub上最火的Android开源项目 免费才是王道:盘点开发者须知的25个免费数据可视化工具 Pivotal获通用电气1.05亿美元支持 或将改变大数据和物联网的游戏规则 大掌门与阿里云和解:云生态系统呼之欲出 刘有涛:恩信科技云计算大潮中扬帆起航 Cloudera释放Impala 1.0:与Hadoop完全整合,各方面完爆Hive 云通讯平台:让你的应用会说话 触宝用户过亿,CEO王佳梁常说的词是“创新” 全国电脑健康日启动 360搭建电脑维修开放平台 C语言实现归并排序 360石晓虹:针对移动Apps的DDoS攻击将成重大威胁 更社交化:谷歌将推出Google Play平台服务 C语言对磁盘文件进行快速排序 传Google已关闭短信搜索服务 PayPal首席安全官:靠密码验证身份即将寿终正寝 DRM你又赢了:其API纳入HTML5标准 豌豆荚王俊煜:洗白白其实是一个计划外的产物 抢Google等巨头生意,纽约大学小伙挖掘并出售自己数据 noBackend:前端优先的开发模式 C、CPP const 详解 三星5G技术获得突破性进展 未来传输速度可达10Gbps 5月14日:1984年美国社交网站Facebook创办人Mark Zuckerberg出生 Chartkick:一行代码即可绘制出漂亮的图表 用友UAP将打造开放平台 建应用商店销售企业级应用 共享软件营销:如何将你的产品推向海外 谷歌使用Debian Linux作为GCE的默认操作系统 大数据?别唬人了!我们真的需要盲目烧钱追求大数据吗? 日本社交手游公司GREE巨星陨落 中国区全员被裁 求助高手指点:用vb实现把结果输出到已定制的word表格中 用200百分问个很菜的问题 关于超星的问题 探讨:如何把软件开发工作为我们一生的事业 ocx问题?参数传递 用200百分问个很菜的问题 请问谁能告诉我一个制作从模糊到清晰运动的源代码或地址? 改变对话框中菜单区的背景色,急 弱智问题:我修改一个打印报表的数据窗口格式,修改后的新问题是它每次打印时接着纸的最上面, IE不能打开新窗口。是什么道理? java下如何得到当前程序(application)的路径?很急!! 组件调用问题? 初学者问题, 简单!! 为什么struts的中文资料如此之少??哪位知道有哪些中文书籍?电子书最好!! 我想做一个报表之类的东西,能在网页上显示,大家给点提示,有现成的例子最好,先谢了 请教各位大大 一个关于消息映射的郁闷 如何在Remote Data Module中使用ADOCommand? 真失败...关于优化pl/sql的问题 为什么名字空间下没有ADO 如何获得一个文件的完整URL地址? 谁能详细的讲讲我不明白的例子。我开ID送1000分。我把ID给费了。一定要搞懂 Applet从html中读取参数信息????? 在win98里可上网,但为什么不能查看网络邻居的属性?(在线等!!!) 关于超星的问题 有谁知道win2003+sql2000的问题? 怎么删除表中列的DEFAULT啊??? 高手请进,将程序加为服务 关于邮件服务器 组件编写中的问题--如何显示图标 记得以前学计算机的热情很大,并且非常希望有一台计算机,可是现在机器有了,却没有了以前的热情,经典书买了一堆却都没有看,我在想到底要不 关于超星的问题 大家装了windows server 2003么?怎么样啊?讨论一下好么!! 救救我吖!!怎样在oracle8.0.5中直接添加数据!!高分!急!! 大问题!!!装2003后网卡驱程不行,声卡装了听不到声音??? java能不能实现多文档(象VC++中)? 哪位E文好的同志能把这段话翻译出来,是RFC1928中的一段。 一个比较低级的问题-vb里面的回车换行孵的ASCII码是多少?? 奇怪!!!奇怪!!!奇怪!!!奇怪!!!快来看看! 谁知道windows的按文件名排序是怎么回事阿? ie问题 如何从一个框架调用另一个框架的方法?有办法吗?(在线) 突然觉得计算机语言有个误区 请问我用depends打开了dll文件,看到了里面的函数,但是参数表和返回值类型没有啊 水晶报表急问,大家帮帮忙看看! 请教文件查找的问题。 谁知道windows的按文件名排序是怎么回事阿? oracle难学吗 <jsp:getProperty name="userInfor" property="*"/> 出错!!(在线等待) 如何在vb中设置Combo的默认值?立刻给分 点击按纽,打开应用程序文件,并获得应用程序的窗口标题,怎么实现??? 2-sinx/2-cosx的取值范围 什么叫农业产业化 你见过最美的事物是什么? 树欲进而风不止,子欲养儿亲不待的意思 如何写农业产业化经营文字材料 明朝的意思 怎样求复合函数的单调区间 请教用LED做类似警灯的电路电源为12V直流.希望的效果有两种:1.LED为两组,每边有2颗3.2V的LED,一边快闪4下后另外一边再快闪4下如此交替,如警灯一样.2.LED也为两组,其中一组快闪一下,另一组也 请问什么样的女人,才是最美的而且是最完美的 用一两壁相距2m的看哪个指向放在车上,使车以10米每秒的速度运动,实验室,子弹先后射穿两壁,实验测得,两壁上的弹孔沿车的运动方向偏差4cm,计算子弹在100m附近的平均速度 一般将来时的用法?要注意哪些? 最美的女人是谁? 复合函数单调区间咋求 农业产业化经营是什么意思?请说的简单点,书面上的涵义看不懂 我用数字万用表测了一个元件的两个脚的电阻,一次是1M,一次是无穷,这是个什么东西? (1)已知子弹的初加速度为零,末速度v=800m/s,位移s=0.8m,待求量是加速度.(2)求解运动时间t有多个公式可以选择,可选择含有时间t的公式. 如鸟曾散是什么意思啊 直线x-y+1=0在x轴,y轴上的截距分别为? 当黄赤交角变小时,会怎样?说明原因! 我国现行的是省制还是行省制?名称是什么 求直线2x-y-6=0在x轴,y轴上的截距如题 子弹飞行时做抛物线运动为什么还那么准 祖国童谣有那些? 直线x=0在y轴上有截距吗y=0有在两坐标轴上截距吗 漫天遨游是什么意思? 请问明朝的国号为什么叫“明”? 拿破仑为什么是名字而不是姓?其它几乎所有外国人都用姓来称呼,像罗伯斯庇尔、马拉、希特勒等等人都是姓,为什么只有拿破仑是名字,而不用姓来称呼他呢? 1.函数f(x)=log3底(mx2+8x+n)/(X2+1)的定义域为R,值域为【0,2】,则m=____,n=____.2.若不等式x+根号下2xy≤a(x+y)对于一切正数x,y恒成立,则正数a的最小值为________ 明英宗和明代宗是怎么回事?明英宗朱祁镇1436年登基,年号为正统,14年后代宗朱祁钰即位,改年号为景泰,8年后又还位给明英宗朱祁镇,这是怎么回事? 新版隋唐英雄观后感 1000字以上 ①满、遍 ②水过满、漾出来 ③没有限制、没有约束选①②③哪一个啊? 明朝怎么还分南明北明怎么回事 拿破仑写的回忆录叫什么名字 水平射击时子弹运行的轨迹是抛物线 对吗 请说理由 明朝全能大儒,叫〜〜明? 百家讲坛隋唐英雄志观后感500字 满天遨游的“漫”的意思 明朝吧和明国吧到底是什么关系血色红五月是什么.明国吧都是被明朝吧拉黑的人吗 为什么要拉黑啊 哲学家与科学家有什么不同,哲学家会思考诸如“我们是谁?”“我们从哪里来”“我们为何存在?”等这样的问题,但是物理学家也会思考,但他们思考和研究有什么不同?哪种更真实? 濒危野生动物保护的等级划分的主要依据是什么 农业产业化的发展过程? 220-年龄是什么意思 若a是介于√3和√5之间的整数,b是√2的小数部分,求ab-√2的值. 以观沧海的以是什么意思 打电话去墨西哥要加什么数字 一般的枪可以在水中开吗?有没有枪可以再水中开?从水中射出的子弹的速度是否很慢 谁知道City Credit Capital (UK) Ltd这个公司?这个公司是做什么业务的?是否可信?东金联合和这个公司是什么关系? 出墨西哥定居需要带什么 漫天遨游的漫是什么意思 有了解City Credit Capital(CCC)外汇交易平台的么?我想问一下这个平台和知名的MT4平台在行情K线的起始节点统计方式上有何不同?为什么同一货币对、同一时间标度上的行情显示会迥然不同呢? 本人刚刚听说 笛卡尔 想深入了解其理论 希望达人给些指点小弟刚来,分不多只有45,只能用30分的奖励,希望各位达人不要嫌弃. 子弹打出去后弹头的飞行轨迹是抛物线吗 “了望”的意思是? 乌有是什么意思 有什么办法可以让更多人来保护濒危野生动物 了望的意思眺望和了望都是登高跳远的意思,但有时了望还有另一种意思, 古虚乌有啥意思? 为什么世界上会人类这种高级动物呢 我们为什么要干预进化,来保护濒危野生动物? 了望是什么意思 最高层着手“顶层设计” 中国周边外交遭官员强奸女童家长:负担过重不得不民“国考”报名结束152万人过审 最热嫦娥三号任务运载火箭启程 预计11月解放军用实战对抗提升战力 预想剧本出经济观察:中国化解产能过剩并非简单“打造两岸经贸合作升级版 ECFA后续美媒:失业者重找工作需要做的五件事外媒曝查尔斯不想当国王 王位或将越代美媒:中国能成为生物技术领域领导者吗美霸主地位逐渐丧失 “去美国化”引争港媒:华人强烈抗议“杀光中国人”言论俄外长与联合国叙问题特使讨论筹备叙问联合国-阿盟叙特使称伊朗应参加叙问题法国正式要求美国停止监听行为 希望低中国养老困局难解 老人:不知十几万够求同存异破壁垒 两岸携手打造中华文化日本欲解禁武器出口 妄图“一箭三雕”美媒:中美日竞争转向拼经济 争亚洲“日媒:美国家安全局曾请求日本协助监听美国海军基地发生枪击案 两人受伤凶手水退到哪里环境清理就进行到哪里一审获刑6年半76个受灾村子还在等水盼电看车少年长沙全市游泳池“体检”两年了还没改抢修水管集体亮相大学校园涉事官员被停职苏东坡居儋论茶消毒防疫省妇联第五批物资运往文昌灾区艺术策展人亟待形象定位飞机害怕冲突地带“下弹”海口6举措保障农业生产希望,在废墟上发芽网络文学“来电”严肃文学“失宠”9个孤寡老人盼蜡烛桂林洋主城区和工业区灾后两天内通水通琼山应急民兵奋战5天不下火线观想花博会
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘