Pictures In A Rich Text Box

[SteveCRM]

How can i put pictures into a rich text box?

Steve

[christsi3d]

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_PASTE = &H302

then place this code to command1_click():
Clipboard.Clear
Clipboard.SetData Picture1.Picture
SendMessage RichTextBox1.hwnd, WM_PASTE, 0, 0

[SteveCRM]

Wow thanks, that works great!

Steve

[Clunietp]

is there a way to do it without using the clipboard?

Thanks!

Tom