vb ??ҳ?Զ????? Դ??

       '你把下面的代码保存为Form1.frm，然后双击打开该文件，自动自动运行后按提示即可看到结果。输入输入

       '呵呵，源码源码够详细了，网页网页再不会我也没办法了。自动自动mavros 源码

       '====文件Form1.frm====

       VERSION 5.

       Begin VB.Form Form1

        Caption = "Form1"

        ClientHeight =

        ClientLeft =

        ClientTop =

        ClientWidth =

        LinkTopic = "Form1"

        ScaleHeight =

        ScaleWidth =

        StartUpPosition = 3 '窗口缺省

        Begin VB.TextBox Text2

        Height =

        Left =

        MultiLine = -1 'True

        ScrollBars = 2 'Vertical

        TabIndex = 2

        Top =

        Width =

        End

        Begin VB.TextBox Text1

        Height =

        Left =

        TabIndex = 1

        Text = "我的输入输入家"

        Top =

        Width =

        End

        Begin VB.CommandButton Command1

        Caption = "获取HTML源码"

        Height =

        Left =

        TabIndex = 0

        Top =

        Width =

        End

        Begin VB.Label Label2

        Caption = "注意：获取源码之前必须先用IE打开网址，然后输入窗口标题关键字。源码源码如www..com的网页网页标题关键字是：我的家"

        Height =

        Left =

        TabIndex = 4

        Top =

        Width =

        End

        Begin VB.Label Label1

        Caption = "请输入IE窗口标题："

        Height =

        Left =

        TabIndex = 3

        Top =

        Width =

        End

       End

       Attribute VB_Name = "Form1"

       Attribute VB_GlobalNameSpace = False

       Attribute VB_Creatable = False

       Attribute VB_PredeclaredId = True

       Attribute VB_Exposed = False

       Option Explicit

       Function GetIeHtml(IeTitle As String) As String

       Dim oShellApp: Set oShellApp = CreateObject("Shell.Application")

       Dim oShellAppWindows: Set oShellAppWindows = oShellApp.Windows

       Dim owin

       '获取弹出的IE窗口

       For Each owin In oShellAppWindows '获取弹出的IE窗口

       If LCase(TypeName(owin.Document)) = "htmldocument" And _

       InStr(1, owin.LocationName, IeTitle, vbTextCompare) > 0 Then '如果找到符合条件的IE窗口

       GetIeHtml = owin.Document.activeElement.Document.documentElement.innerHTML '此句可获得完整html代码

       GoTo Mend '退出

       End If

       Next

       Mend:

       Set oShellAppWindows = Nothing

       Set oShellApp = Nothing

       Set owin = Nothing

       End Function

       Private Sub Command1_Click()

       Dim S As String

       S = GetIeHtml(Text1.Text) '表示获得标题含有"我的家"的html代码

       Text2.Text = S

       End Sub

       Private Sub Form_Load()

       'Shell "explorer.exe ""/""", vbNormalNoFocus

       End Sub

检查网页源码快捷键(网页看源码快捷键)

       1. 网页看源码快捷键

       方法很多：快捷键ALT+F工具——宏——VB编辑器鼠标右键点sheet名——查看代码代码一般写在模块里，有时候也会写在表里可以复制

       2. 打开网页源码的自动自动快捷键

       工具/材料：电脑、浏览器。输入输入

       第一步，源码源码打开电脑打开，网页网页浏览器进入。自动自动

       第二步，输入输入进入后找到右上角单击进入。

       第三步，神功预警指标源码找到更多工具-开发人员工具点击进入。

       第四步，进入后即可查看源代码即可。

       第五步，或者使用快捷键Ctrl+u即可 快速进入 。

       3. 网页查看源代码快捷键

       打开你要获取的源代码，右击鼠标会出现查看网页源代码（快捷键ctrl+u）,全选复制（全选快捷键ctrl+a复制快捷键ctrl+c），在本地电脑上粘贴到(ctrl+v)新建一个文档以.html结尾，高级股票公式源码保存，点击查看即可。

       4. 网页看源码快捷键设置

       查看错误代码快捷键就是f调试键。

       5. 怎么看网页的源代码快捷键

       打开浏览器按键盘上的F.就可以查看了

       6. 浏览器看源代码的快捷键

       在浏览器里，有几个办法可以查看HTML网页源代码：

       1、右键点击浏览器的空白处，选择查看源代码；

       2、查看网页HTML源代码的擒牛捉妖源码快捷键为：Ctrl键+U键；

       3、点击浏览器菜单栏的查看-->>选择查看网页源代码。

       7. 显示网页源码快捷键

       1右键点击浏览器的空白处,选择查看源代码;

       2.

       查看网页HTML源代码的快捷键为:Ctrl键+U键;

       3.

       点击浏览器菜单栏的查看-->>选择查看网页源代码。

       8. 网页源码查看快捷键

       第一种：打开一个网页后点击鼠标的 右键就会有"查看源文件"操作 鼠标右键--->查看源文件 即可弹出一个记事本，而记事本内容就是此网页的html代码。

       可能会碰到一些网页鼠标右键无反应或提出提示框，那是因为做网页的加入了JS代码来禁止用户查看源文件代码或复制网页内容，但是这种方法也没用,只有你稍微懂得以下第二种方法即可查看此网页的源代码源文件。

       第二种：通过浏览器状态栏或工具栏中的股票趋势密码源码点击 “查看”

       然后就用一项“查看源代码”，点击查看源代码即可查看此网页的源代码源文件。

       在微软IE下 查看--->源文件 即可查看此网页代码在傲游浏览器下截图：查看别人网页的源代码可以为我们制作网页时候有帮助，以后将介绍查看源代码更多方法及怎么运用到别人的源代码文件。三、其它浏览器具体查看html网页源代码方法步骤 - TOP首先请打开您的网络浏览器，然后访问任何一个网页。完成上述步骤后，您可以通过以下针对不同网络浏览器的简单步骤快速查看html网页源代码。

       1)、Firefox浏览器，请按以下步骤操作：

       2）、谷歌浏览器，请按以下步骤操作：或直接谷歌浏览器中使用快捷键“Ctrl+U”即可查看被访网页源代码。对于这些的话，新手朋友可以参考附件里面的知识学习下

       9. 查看网站源码快捷键

       通过电脑命令行查看电脑代码：

       1、打开电脑，进入电脑系统，在电脑开始菜单中的查询框中输入cmd。找到命令行运行程序。或者也可以通过电脑键盘组合键，快捷键组合为：windows + R，即可直接打开命令行运行程序了。

       2、确定或者敲键盘回车，进入电脑命令行，在电脑命令行中，输入systeminfo命令，等待查询电脑配置信息。

       3、在查询出来的电脑配置信息中，找到电脑系统类型，这就是当前电脑的代码了。