我的编程环境为Win XP(SP2)+VB6(SP6)。
在Form上增加一个RichTextBox控件(RTB)和一个按钮控件(Command1)。
代码如下:
Private Sub Command1_Click()
rtb.SelStart = Len(rtb.TextRTF) + 2
rtb.SelLength = 0
Clipboard.Clear
Clipboard.SetData LoadPicture("D:\3.jpg")
rtb.SetFocus
SendKeys "{end}"
SendKeys "^V"
DoEvents
Clipboard.Clear
rtb.SetFocus
End Sub为什么当RTB中只有英文时能在最后插入图片?而当存在中文时插入的图片不在最后?
请问如何解决?(不要插入回车换行符)
在Form上增加一个RichTextBox控件(RTB)和一个按钮控件(Command1)。
代码如下:
Private Sub Command1_Click()
rtb.SelStart = Len(rtb.TextRTF) + 2
rtb.SelLength = 0
Clipboard.Clear
Clipboard.SetData LoadPicture("D:\3.jpg")
rtb.SetFocus
SendKeys "{end}"
SendKeys "^V"
DoEvents
Clipboard.Clear
rtb.SetFocus
End Sub为什么当RTB中只有英文时能在最后插入图片?而当存在中文时插入的图片不在最后?
请问如何解决?(不要插入回车换行符)
解决方案 »
- 同类型如何整体 数组给数组赋值
- 求一个计算excel列名的算法。。
- 关于学历的问题
- 求救!!!,我要引入库activeubb.dll里面的函数,是不是要在引入的地方要声明函数??怎么声名
- 【问】如何去除ListBox的滚动条?
- 初用vb,请教报表的生成方法。用带参数的sql来取出数据,单表查询。可不分页。求例子。
- 如何在屏幕显示模拟键盘,并对按键作出反应?
- HELP ME ! 运行时错误‘7’,内存超出
- 请问我在网上下载了一个控件,在工程的部件中引用后可以用,但我把那个控件删掉后(源程序已生成EXE文件)又不可用了,请问是不是我的软件烤到别的机子用时也得把控件一起烤过去吗?
- COM+的问题help
- 跪求
- 调用窗体
SendKeys "^{end}"
然后再
SendKeys "^V"