做一个vb 的聊天界面 RichTextBox2中表情图片无法显示

lw7124168 发布于 2015-03-08 19:28， 1286 次点击

程序代码：

Private Sub Command1_Click()

    Winsock1.SendData RichTextBox1.Text


     'Clipboard.SetText RichTextBox1.TextRTF, vbCFRTF

     ' RichTextBox2.TextRTF = RichTextBox1.TextRTF


      RichTextBox2.Text = "ÎòËμμÄ»°: " + RichTextBox1.Text + vbCrLf + RichTextBox2.Text

      RichTextBox1.TextRTF = ""
End Sub

点击发送只有文字没有图片这个RichTextBox2.TextRTF = RichTextBox1.TextRTF 可以显示但不是我想要的样子求大神解决

3 回复

风吹过b2015-03-09 13:12

RichTextBox1.Text 这个属性只取文本，不取格式和图像。

显示部分，我感觉使用 HTML 来做更好一点。没头绪。

xzlxzlxzl2015-03-09 14:30

回复 2楼风吹过b

风版主是不是疏忽了？richtext是可以编辑图片的，不过，我没涉及，也不知道详情，还望其他版主抽空琢磨下。

只有本站会员才能查看附件，请登录

lianyicq2015-03-10 10:14

如果本地和远程机器内都有相同的表情库，那好办，建一个索引。winsock控件传索引值。直接在富文本框内显示。
如果是某端自定义的表情，那要通过WINSOCK传图片文件再显示到富文本框中。

做一个vb 的聊天界面 RichTextBox2中 表情图片无法显示

做一个vb 的聊天界面 RichTextBox2中表情图片无法显示