Fernanda S

Estou tentando inserir imagem em um RichTextBox. Encontrei em vários lugares este exemplo: Private Sub Command1_Click() Dim strOpen As String CommonDialog1.ShowOpen strOpen = CommonDialog1.FileName rtfdados.OLEObjects.Add , , , strOpen End Sub Fiz o teste com este código, mas está dando o seguinte erro: "ActiveX component can't create object" Alguém saberia me dizer porque dá este erro, e o que posso fazer para inserir a imagem? Obrigada, Fernanda