VB如何将图片插入Richtextbox？

全部展开

在运行时，使用OLEObject集合的Add方法将嵌入式对象（例如位图，图标和应用程序图标）添加到控件中. 在设计时或运行时richtextbox 插入，您可以将任何嵌入式对象拖放到控件中，包括Microsoft Excel电子表格和Microsoft Word文档等文档.

==============================

对于Richtextboxrichtextbox 插入，有三种OLE插入方法:

1. 拖放: 该对象将以文件名加图标的形式显示在richtextbox中，BMP图像也不例外，只是其图标是其自身的缩略图；

2，richtextbox1.OLEOBJECTS.ADD方法:

richtextbox1.OLEOBJECTS.ADD，“文件名”

或richtextbox1.OLEOBJECTS.ADD，“对象类型”

如果文件的创建者或类允许在OLE父级中进行实时显示和编辑（例如excel，word和公式），则内容将直接显示在richtextbox中；否则，显示图标. 不允许在网站上编辑所有类型的图像.

3. 剪贴板模式: 您可以直接在richtextbox中显示内容. 该方法是使用另一个程序“复制”打开文件，然后使用CTRL + V粘贴到richtextbox中的特定位置. 您可以使用画笔，ACDSEE，PHOTOSHOP等打开图像.

因此，只有第三种方法可以在Richtextbox中显示JPG图像.

安绍东的意见:

您无需在其他程序中打开JPG文件. 您可以使用公共对话框直接在该程序中获取文件名，将其图像发送到剪贴板，然后使用SendKeys语句粘贴.

CommonDialog1.ShowOpen

Clipboard.SetData LoadPicture（CommonDialog1.FileName）

RichTextBox1.SetFocus

SendKeys“ ^ v”，True'模拟键盘输入（Ctrl + v）并将按键消息发送到活动窗口

====================

我学会了写一点，一种方法，直接添加:

Private Sub Command1_Click（）

RichTextBox1.SelStart = 1

RichTextBox1.OLEObjects.Add，“ c: \ 1.bmp”

结束子

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-153410-1.html