[VB6 ] Clipboard.GetFormat語法詢問

看板Visual_Basic作者 (丁丁是個人材)時間18年前 (2007/10/31 11:35), 編輯推噓5(505)
留言10則, 3人參與, 最新討論串1/1
程式碼如下 Public Function ClipboardEmpty() As Boolean Dim dataType As Integer dataType = Clipboard.GetFormat(3) '中繼檔 If dataType = -1 Then ClipboardEmpty = False Else ClipboardEmpty = True End If End Function repeat1: If ClipboardEmpty Then WordApp.Selection.WholeStory WordApp.Selection.Copy sClipText = Clipboard.GetText(vbCFRTF) Clipboard.Clear RaisErr = False Else Set_Timeout (1) Clipboard.Clear GoTo repeat1 RaisErr = True End If RaisErr輸出結果總是True,小弟不懂VB中的Clipboard.GetFormat(3)是什麼意思 猜想是不是有什麼緩衝區要釋放掉,因為起初RaisErr還是True,後來就變False了 網路找不到GetFormat的函式說明,希望VB高手能幫忙一下,謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.120.246.178 ※ 編輯: forkome 來自: 59.120.246.178 (10/31 11:47)

10/31 12:17, , 1F
Clipboard 可以放不同的東西 文字 影像 檔案
10/31 12:17, 1F

10/31 12:18, , 2F
所以需要先看他的格式...再決定能不能用...
10/31 12:18, 2F

10/31 12:53, , 3F
MSDN 中有說明啊...
10/31 12:53, 3F

10/31 12:53, , 4F
vbCFMetafile = 3
10/31 12:53, 4F

10/31 12:53, , 5F
GetFormat(format) 檢查剪貼簿中的內容是否為指定的格式
10/31 12:53, 5F

10/31 12:54, , 6F
回傳值:True、False
10/31 12:54, 6F

10/31 12:54, , 7F
VB6的True = -1,False = 0
10/31 12:54, 7F

10/31 22:16, , 8F
是說剪貼簿中的格式是不是vbCFMetafile嗎?
10/31 22:16, 8F

10/31 22:17, , 9F
中繼檔是使用wmf檔嗎?
10/31 22:17, 9F

10/31 22:26, , 10F
若檢查不是中繼檔格式,我要怎麼設定成中繼檔呢?
10/31 22:26, 10F
※ 編輯: forkome 來自: 218.169.242.12 (10/31 22:31)
文章代碼(AID): #179_WP6m (Visual_Basic)