一个粘贴文本到外部程序的问题

[hahamy]

有个form1,form1上有个button1和一个text1,打开IE,让IE的地址栏获得焦点,运行form1,怎么实现单击button1,将text1里的字符串粘贴到IE地址栏里?

[cangwu_lee]

private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

call ShellExecute(0, "open", "<Your_URL>", "", "", 1)

[hahamy]

上面的试了,没反应,我的初步想法是将text1的文本放到剪切板里,然后让外部获得焦点的文本框进行粘贴;

另一种想法是将其放到剪切板后,用命令模拟ctrl+v,使获得焦点处得到文本的粘贴

[cangwu_lee]

你真的是过了？ 骗小孩子是不好的。

这样调用：

private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

call ShellExecute(0, "open", "http://www.163.com", "", "", 1)

[hahamy]

你理解错我的意思了,你这是调用IE,然后用IE打开那url,我要的是在地址栏里粘贴进文本,现在已经模拟出ctrl+v的击键了,但问题是不能使外部的程序的文本框获得焦点,不知道怎么弄

[cangwu_lee]

google 查找 VB 模拟按键，会有不少的结果。俺就懒了贴了。



个人认为，那么想法过于费劲。

[hahamy]

其实我要实现的功能就是,用VB写一个窗体(窗体是永远位于前端显示的),通过单击窗口上的按钮,将一段指定的文本粘贴到IE的一个文本框中
现在想法是将文本放入剪切板,然后模拟ctrl+V,粘贴上去,但单击后,集点就转移到按钮上了,所以必须得使IE里的文本框获得焦点,但不知道语句怎么写

如果有什么更好的方法就更好了,我弄了一下午了,还没眉目,真郁闷

[cangwu_lee]

这特麻烦了。首先，WebBrowser 是特殊的窗口。里面的控件，不是常规的。

将一个WebBrowser 嵌入自己的窗口，会简单很多。

[cangwu_lee]

Internet Explorer 编程简述（十二）正确地设置和转移焦点
http://www.itwenzhai.com/data/2006/0612/article_24552.htm

[hahamy]

先谢了, 看看先

[hahamy]

还是没想到办法,先结贴吧,谢谢楼上的