C# と VB.NET の質問掲示板

■No61428 (やんまー さん) に返信
>>あるいは、画像の部分をSelectして、クリップボード経由で画像を取得できるかもしれません。
> 
> そうですね！その方法でも良さそうです！
> 
> ちょっと調べたのですが、各行を選択させることは出来るのでしょうか・・・
> 
> 
> Select(Int32, Int32) テキスト ボックスでテキストの範囲を選択します。

VB2008での確認ですが、Selectで画像は選択できます。
ちょっと試してみましたが、例えば、以下の例のように、RichTextBoxの内容をスキャンし、
その内容がOLEオブジェクトであれば、クリップボードにコピーし、クリップボードからイメージを取得する、
という方法があります。

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim img As Image = Nothing

        For i As Integer = 0 To RichTextBox1.TextLength - 1
            RichTextBox1.Select(i, 1)
            If RichTextBox1.SelectionType = RichTextBoxSelectionTypes.Object Then
                RichTextBox1.Copy()
                img = Clipboard.GetImage()
                If img IsNot Nothing Then
                    Exit For
                End If
            End If
        Next

        '以下略

    End Sub