在线看毛片视频-国产免费av在线-欧美日韩一区二区三区-国产成人无码av在线播放无广告-亚洲人va欧美va人人爽-国产第一草草-西班牙黄色片-四虎在线网站8848-最新av片免费网站入口-东京热无码中文字幕av专区-日本大人吃奶视频xxxx-欧美精品一区二区三区四区五区-国产片天天弄-国产免费内射又粗又爽密桃视频-欧美爱爱网站-日韩v欧美

當(dāng)前位置:雨林木風(fēng)下載站 > 技術(shù)開(kāi)發(fā)教程 > 詳細(xì)頁(yè)面

發(fā)現(xiàn)剪帖板的隱秘

發(fā)現(xiàn)剪帖板的隱秘

更新時(shí)間:2022-05-14 文章作者:未知 信息來(lái)源:網(wǎng)絡(luò) 閱讀次數(shù):

     Windows 中的Ctrl+C 和Ctrl+V  大家應(yīng)該很熟悉了, 但是您知道剪帖板里有啥? 舉個(gè)例子, 在 IE4中選一段東東,按Ctrl+C, 然后在FrontPage 中按Ctrl+V, 您選的東東完整地拷貝到了FrontPage 中, 字體, 顏色等等。 明顯, 剪帖板中一定包含了Html 信息, 而如果我們?cè)诰幊桃惨玫竭@些信息, 該怎么辦呢?

本文提供了兩種技巧, 一是如何得到關(guān)于剪貼格式的名稱(chēng), 一是如何用文本格式顯示剪貼版中特定剪貼格式內(nèi)容。

在我們的第一個(gè)演示中, 利用一個(gè)很笨的方法來(lái)得到 Html 剪貼格式的名稱(chēng)。 GetClipboardFormatName 可以由剪貼板的ID 得到該格式的名稱(chēng), 于是用一個(gè)循環(huán)來(lái)查找所有包含Html 文字的格式。  

在第二個(gè)例子中, 我們使用了在例子一中得到的名稱(chēng), 把在 IE4 中剪貼的Html 內(nèi)容合并到一個(gè) TextBox 中, 好讓我們知道里面有什么樣的信息。

實(shí)現(xiàn)步驟
例子一 得到剪貼格式的名稱(chēng)
1 新建一個(gè)工程。

2 在工程中增加一個(gè)命令按鈕(Command1)。

3 增加下面的代碼:

Private Declare Function GetClipboardFormatName Lib "user32" Alias "GetClipboardFormatNameA" (ByVal wFormat As Long, ByVal lpString As String, ByVal nMaxCount As Long) As Long

Private Sub Command1_Click()
Dim FormatID As Long
Dim BufferLen As Long
Dim Buffer As String * 80
For FormatID = 50000 To 60000 '一般有效的 ID 在該區(qū)內(nèi)
BufferLen = GetClipboardFormatName(FormatID, Buffer, 80)
If BufferLen > 0 Then
If InStr(UCase(Left(Buffer, BufferLen)), "HTML") > 0 Then MsgBox FormatID & ":" & Buffer
End If
Next
End Sub


4 運(yùn)行該程序, 可以發(fā)現(xiàn)多個(gè)帶 Html 的格式名稱(chēng), 經(jīng)過(guò)測(cè)試,HTML Format是我們要找的。 注意: 沒(méi)有 IE4 的話, 可以使用 RTF 進(jìn)行查詢, 以查看 RichText 的剪貼內(nèi)容。

例子二 得到 IE4 的剪貼內(nèi)容
1 新建一個(gè)工程。

2 在工程中增加一個(gè)命令按鈕(Command1), 一個(gè)TextBox(Text1), 允許多行顯示。

3 增加下面的代碼:

Private Declare Function OpenClipboard Lib "USER32" (ByVal hWnd As Long) As Long
Private Declare Function CloseClipboard Lib "USER32" () As Long
Private Declare Function GetClipboardData Lib "USER32" (ByVal wFormat As Long) As Long
Private Declare Function IsClipboardFormatAvailable Lib "USER32" (ByVal wFormat As Long) As Long
Private Declare Function RegisterClipboardFormat Lib "USER32" Alias "RegisterClipboardFormatA" (ByVal lpString As String) As Long
Private Declare Function GlobalLock Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Function GlobalUnlock Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Function GlobalSize Lib "kernel32" (ByVal hMem As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (lpvDest As Any, lpvSource As Any, ByVal cbCopy As Long)

Public Function GetClipboardIDForCustomFormat(ByVal sName As String) As Long
Dim wFormat As Long
wFormat = RegisterClipboardFormat(sName & Chr$(0))
If (wFormat > &HC000&) Then
GetClipboardIDForCustomFormat = wFormat
End If
End Function

Public Function GetClipboardDataAsString(ByVal hWndOwner As Long, ByVal lFormatID As Long) As String
Dim bData() As Byte
Dim hMem As Long
Dim lSize As Long
Dim lPtr As Long

If (OpenClipboard(hWndOwner)) Then
If (IsClipboardFormatAvailable(lFormatID) <> 0) Then
hMem = GetClipboardData(lFormatID)
If (hMem <> 0) Then
lSize = GlobalSize(hMem)
If (lSize > 0) Then
lPtr = GlobalLock(hMem)
If (lPtr <> 0) Then
ReDim bData(0 To lSize - 1) As Byte
CopyMemory bData(0), ByVal lPtr, lSize
GlobalUnlock hMem

GetClipboardDataAsString = StrConv(bData, vbUnicode)

End If
End If
End If
End If
CloseClipboard
End If

End Function


Private Sub Command1_Click()
Dim lID As Long
Dim sText As String

' 如果沒(méi)有 IE4,可以使用 "RTF Format"  
lID = GetClipboardIDForCustomFormat("HTML Format")
If (lID <> 0) Then
sText = GetClipboardDataAsString(Me.hWnd, lID)
Text1.Text = sText
End If

End Sub

4 運(yùn)行該程序。 在IE4 中選任意的東東, 按Ctrl+C, 然后按 Command1, 可以在Text1 中看到如下的內(nèi)容, 漢字顯示問(wèn)題與 GetClipboardDataAsString = StrConv(bData, vbUnicode) 有關(guān):

Version:1.0
StartHTML:000000213
EndHTML:000000863
StartFragment:000000758
EndFragment:000000772
StartSelection:000000758
EndSelection:000000772
SourceURL:file://G:\FrontPage Webs\Content\vbtt\download.htm
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> 

溫馨提示:喜歡本站的話,請(qǐng)收藏一下本站!

本類(lèi)教程下載

系統(tǒng)下載排行

在线看毛片视频-国产免费av在线-欧美日韩一区二区三区-国产成人无码av在线播放无广告-亚洲人va欧美va人人爽-国产第一草草-西班牙黄色片-四虎在线网站8848-最新av片免费网站入口-东京热无码中文字幕av专区-日本大人吃奶视频xxxx-欧美精品一区二区三区四区五区-国产片天天弄-国产免费内射又粗又爽密桃视频-欧美爱爱网站-日韩v欧美
  • <li id="86scu"><menu id="86scu"></menu></li>
    <li id="86scu"></li>
    <button id="86scu"></button>
  • <s id="86scu"></s><button id="86scu"><menu id="86scu"></menu></button>
  • 草草草视频在线观看| 日本黄色福利视频| 麻豆md0077饥渴少妇| 天美星空大象mv在线观看视频| 可以看毛片的网址| 婷婷视频在线播放| 午夜免费看毛片| www.久久久精品| 欧美婷婷精品激情| 亚洲综合婷婷久久| 日本xxxx黄色| 欧美一级视频在线| 吴梦梦av在线| 热久久最新网址| 无码粉嫩虎白一线天在线观看| 欧美日韩中文字幕在线播放| 8x8ⅹ国产精品一区二区二区| 激情成人在线观看| 亚洲av综合色区| www.男人天堂网| 久久久一本二本三本| 中文字幕乱码人妻综合二区三区 | 女人被男人躁得好爽免费视频| 8x8x华人在线| 日本三级免费网站| 国产激情在线观看视频| 亚洲一区精品视频在线观看| 一级黄色免费在线观看| 久久久久久久9| 精品久久一二三| 国产又猛又黄的视频| 亚洲一级片av| 久久国产亚洲精品无码| 国产喷水theporn| www.日本在线视频| 不卡av免费在线| 午夜啪啪福利视频| 黄色片一级视频| 中国一级大黄大黄大色毛片| 伊人成色综合网| 超碰成人在线免费观看| 又粗又黑又大的吊av| 在线观看av免费观看| 午夜精品久久久久久久无码| 亚洲精品久久久中文字幕| 香港三级日本三级a视频| 免费涩涩18网站入口| 成人在线国产视频| 久久久久久综合网| 天天影视综合色| 成人午夜视频在线观看免费| 色播五月激情五月| 成人一级片网站| 久久国产精品网| 日本丰满少妇黄大片在线观看| 欧美综合在线观看视频| 国产精品videossex国产高清 | caoporn超碰97| 国产欧美日韩小视频| 欧美 日韩 国产 在线观看| 无人在线观看的免费高清视频 | 欧美亚洲色图视频| 国产成人免费高清视频| 91女神在线观看| 91热这里只有精品| 女人和拘做爰正片视频| 草草视频在线免费观看| 麻豆映画在线观看| 国内外成人激情免费视频| 91aaa精品| 日本在线观看视频一区| 狠狠干狠狠操视频| 亚洲欧美日韩三级| 粉色视频免费看| 日日噜噜夜夜狠狠| 中文字幕国产高清| 国产麻豆电影在线观看| 一本之道在线视频| 糖心vlog在线免费观看| 300部国产真实乱| 欧美做受777cos| 人人干视频在线| 青青草原av在线播放| 日韩精品无码一区二区三区免费| 亚洲人成色77777| 91人人澡人人爽人人精品| 不卡的av中文字幕| 污免费在线观看| 男人天堂av片| 成年人在线观看视频免费| 成人亚洲精品777777大片| 日本一二三区在线| 国产黄色激情视频| 国产成人久久777777| 天天插天天操天天射| 97超碰免费观看| 男女私大尺度视频| 日本人69视频| www.成年人视频| 爱情岛论坛成人| 大桥未久一区二区三区| 日本在线xxx| 91小视频在线播放| 91九色在线观看视频| 加勒比av中文字幕| 国产www免费| 午夜精品久久久久久久99热影院| 乱子伦一区二区| 亚洲成熟丰满熟妇高潮xxxxx| 污污动漫在线观看| 热99这里只有精品| 一级 黄 色 片一| 国产男女无遮挡| 日韩欧美色视频| aa免费在线观看| 欧美a级免费视频| 亚洲视频一二三四| 成人羞羞国产免费网站| 日韩a级黄色片| 性生活免费在线观看| 无码粉嫩虎白一线天在线观看| www亚洲成人| 黄色一级二级三级| 成人免费观看cn| 国产免费一区二区视频| 国产精品h视频| 亚洲一二三不卡| 麻豆三级在线观看| 黄色三级视频片| 日韩一级在线免费观看| 久久久久久久午夜| 欧洲精品一区二区三区久久| 欧美少妇一区二区三区| 中文字幕一区久久| 性生生活大片免费看视频| 国产裸体免费无遮挡| 日本一本二本在线观看| av日韩一区二区三区| 日韩欧美国产综合在线| 免费看黄在线看| 成人精品视频在线播放| 成人精品视频在线播放| 日本阿v视频在线观看| 一本久道高清无码视频| av网站手机在线观看| 国产妇女馒头高清泬20p多| 99色这里只有精品| 日本三级免费网站| 男人和女人啪啪网站| 97xxxxx| 免费看a级黄色片| 五月天婷婷激情视频| 亚洲va综合va国产va中文| 99精品视频网站| 97超碰人人澡| 欧在线一二三四区| 三级性生活视频| 国产树林野战在线播放| 免费网站在线观看视频| 国产免费黄色av| 婷婷激情5月天| 蜜桃视频一区二区在线观看| 水蜜桃色314在线观看| 国产九九热视频| 国产精品夜夜夜爽张柏芝| 亚洲美免无码中文字幕在线| 久久婷婷国产91天堂综合精品| 国产又粗又长又爽又黄的视频| 国产又粗又猛又爽又黄的网站 | 欧日韩免费视频| 国产九九热视频| 韩日视频在线观看| 在线观看免费av网址| 美脚丝袜脚交一区二区| 在线观看免费污视频| wwwwww欧美| 国产九九九视频| 国产在线观看福利| 女人色极品影院| 九九九九九九九九| 能在线观看的av| 一二三在线视频| 九九热精品国产| 天天爽人人爽夜夜爽| 9久久9毛片又大又硬又粗| 中文字幕一区二区三区四区五区人| 人妻无码久久一区二区三区免费 | 97免费视频观看| 三区视频在线观看| 午夜dv内射一区二区| av在线免费观看国产| 精品一区二区成人免费视频 | 天天干天天色天天爽| 一区二区三区 日韩| 91免费视频网站在线观看| 日本福利视频一区| 乱熟女高潮一区二区在线| 超碰人人草人人| 色一情一区二区三区| 性猛交ⅹ×××乱大交|