Agregar imagen a un RichTextBox con problemas
Publicado por JUAN MANUEL (124 intervenciones) el 23/10/2003 18:42:35
Yo agrego la imagen de la siguiente forma:
Dim objOLE As OLEObject
Set objOLE = Me.richText1.OLEObjects.Add(, , App.Path & "\logo.bmp") '"Paint.Picture"
y me lo trae con el entorno del Paint...
Como pueo hacer para que traiga solo la imagen (sin posibilidad de edicion ni la pantalla del paint)
GRACIAS TOTALES
Dim objOLE As OLEObject
Set objOLE = Me.richText1.OLEObjects.Add(, , App.Path & "\logo.bmp") '"Paint.Picture"
y me lo trae con el entorno del Paint...
Como pueo hacer para que traiga solo la imagen (sin posibilidad de edicion ni la pantalla del paint)
GRACIAS TOTALES
Valora esta pregunta
0