VB クリップボード操作 |
Clipboard オブジェクト Clipboard オブジェクトを使うと、システムのクリップボードへアクセスすることができます。 |
|
【サンプルリスト】 Private Sub Sample() Dim strBuff As String If (Clipboard.GetFormat(vbCFText)) Then 'クリップボードにテキストデータがあるか? strBuff = Clipboard.GetText 'クリップボードよりテキストを取得 Debug.Print strBuff Else MsgBox "クリップボード上にテキストがありません。" End If End Sub |
●GetText メソッド 【機能】クリップボードからテキスト文字列を返します。 【書式】 result = Clipboard.GetText result = Clipboard.GetText(フォーマット形式)
※ クリップボードにテキスト文字列が入っていない場合は、ヌルストリング("")を返します。 |
●GetFormat メソッド 【機能】指定した形式のデータがクリップボード上にあるときは真 (True) を、ないときは偽 (False) を返します。 【書式】result = Clipboard.GetFormat(フォーマット形式)
【例】result = Clipboard.GetFormat(VbCFText) |
●SetText メソッド 【機能】クリップボードへテキスト文字列をセットします。 【書式】 Clipboard.SetText テキストデータ Clipboard.SetText テキストデータ, フォーマット形式
Clipboard.Clear 'クリップボードの内容をクリア Clipboard.SetText "Hello!" 'クリップボードへテキスト文字列をセット |
●Clear メソッド 【機能】クリップボードの内容をクリアします。 【書式】Clipboard.Clear 【例】 Clipboard.Clear 'クリップボードの内容をクリア Clipboard.SetText "Hello!" 'クリップボードへテキスト文字列をセット |
●GetData メソッド 【機能】クリップボードから画像データを返します。 【書式】 Picture = Clipboard.GetData Picture = Clipboard.GetData(フォーマット形式)
※ フォーマット形式を省略すると、GetDataは自動的に適切な形式を使います。 ※ 指定した形式と一致するピクチャがクリップボードにない場合は、GetDataは何も返しません。 ※ クリップボードにカラーパレットしかない場合は、最小のサイズ (1 x 1) のデバイスに依存しないビットマップが作成されます。 |
●SetData メソッド 【機能】クリップボードへ画像データをセットします。 【書式】 Clipboard.SetData 画像データ Clipboard.SetData 画像データ, フォーマット形式
※ フォーマット形式を省略すると、SetDataは自動的に適切な形式を選択します。 ※ Clipboard オブジェクトに挿入するピクチャは、LoadPicture 関数、あるいは Form オブジェクト、イメージ (Image) コントロール、またはピクチャ ボックス (PictureBox) コントロールの各 Picture プロパティで設定します。 |