Kod:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim img As Image = Image.FromFile("C:resimnerede.jpg")
Clipboard.SetImage(img)
Me.RichTextBox1.Paste()
End Sub