VB 的 richtextbox 可以粘贴图片吗，怎么做？
答案:2 悬赏:30 手机版
解决时间 2021-01-25 06:14
- 提问者网友：最爱你的唇
- 2021-01-24 07:59
VB 的 richtextbox 可以粘贴图片吗，怎么做？
最佳答案
- 五星知识达人网友：鱼芗
- 2021-01-24 08:15
.....................这个是在运行中动态添加图片到richtextbox中的代码
用sendmessage 函数 原理是先把图片“放”到剪贴板中 然后 再发送方到richtexhbox中
先声明
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
添加一个Picture 用来显示图片
在picture 的 click 事件中写如下代码
Clipboard.Clear '清除剪贴板
Clipboard.SetData ImageList1.ListImages(Index + 1).Picture '把图片框中的图片 保存到 剪切板中
SendMessage RichTextBox1.hWnd, &H302, 0, 0 '发剪贴板中的数据到richtextbox中
用sendmessage 函数 原理是先把图片“放”到剪贴板中 然后 再发送方到richtexhbox中
先声明
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
添加一个Picture 用来显示图片
在picture 的 click 事件中写如下代码
Clipboard.Clear '清除剪贴板
Clipboard.SetData ImageList1.ListImages(Index + 1).Picture '把图片框中的图片 保存到 剪切板中
SendMessage RichTextBox1.hWnd, &H302, 0, 0 '发剪贴板中的数据到richtextbox中
全部回答
- 1楼网友：神鬼未生
- 2021-01-24 09:09
richtextbox.image="文件路径"
RichTextBox.ImageAlign可以设置图像的位置
你说的粘贴图片,直接复制粘贴就可以了
ctrl+V
RichTextBox.ImageAlign可以设置图像的位置
你说的粘贴图片,直接复制粘贴就可以了
ctrl+V
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯