网页中INPUT搜索框的问题呀。。。囧~

Question

话说网页中有个搜索文本框，代码如下
 <input  id="KeyWord"  name="KeyWord" type="text" value="" search="1"/>正常是有些灰色的默认字体的：“请输入关键词”要输入关键词，只要点一下搜索文本框。焦点在搜索文本框上后，灰色字体消失，才能输入你的关键词
于是 我想用VB做这个效果1。 先聚焦到这个文本框上， 这个没问题。
2。 给这个文本框的VALUE赋值。就是赋值不了啊Set vTag = WebBrowser1.Document.getElementsByTagName("input")
vTag(4).FOCUS
vTag(4).Value = "ABCDEFG"上面只能实现聚焦，不能实现赋值。求助哦

Answer 1

用 getElementById 或 getElementsByName 试试

Answer 2

发现一个问题， 下面的语句，不要vTag(4).FOCUS 就能实现vTag(4).Value = "ABCDEFG" 
但是两者同时用的话，就不行。只能实现vTag(4).FOCUS， 下面的语句不起作用了。Set vTag = WebBrowser1.Document.getElementsByTagName("input") 
vTag(4).FOCUS 
vTag(4).Value = "ABCDEFG" 

Answer 3

WebBrowser1.Document.getElementById("KeyWord").Value = "ABCDEFG"

Answer 4

不行的。网页里面有2个这样的搜索框啊。楼上的句子，实现的是给第一个搜索框输入文字我要的是第二个搜索框。
vTag(4).Value = "ABCDEFG"  '里面的(4)就是说明我要找的搜索框在网页元素里面的位置啊

Answer 5

不过按照你的思路， 我使用WebBrowser1.Document.getElementsByName("KeyWord").Value = "ABCDEFG", 结果跟我第一个方法是一样的。
聚焦能实现，赋值不能实现。
不加聚焦语句的时候，赋值才可以实现为什么呢

Answer 6

咳都怪我没把事情说明白。听我慢慢道来。1. 打开网页，搜索框里面有默认灰色的字 ：“请输入关键词” 
2. 如果你这个时候点搜索，这些灰色的字就会消失，于是变成搜索空白了3. 如果你使用赋值，例如语句vTag(4).Value = "ABCDEFG"  那么字体也是灰色的
4. 同理，你赋值了vTag(4).Value = "ABCDEFG"， "ABCDEFG"就是灰色的。 点搜索，"ABCDEFG" 就消失，于是，再次搜索空白。
5. 我就开始想了，那我先聚焦这个文本框先吧。 于是我使用了vTag(4).FOCUS 
6. 但是使用了vTag(4).FOCUS吧 是成功啊，但是vTag(4).Value = "ABCDEFG" 这个句子又不能赋值了。以上就是我的痛苦经历哈哈哈哈

Answer 7

试试这样，看能中不？？
vTag(4).FOCUS 
sendkys "ABCDEFG" 

Answer 8

这样？
Set vTag = WebBrowser1.Document.getElementsByTagName("input") 
vTag(4).Click 
vTag(4).Value = "ABCDEFG"
________
问题解决后一定要结帖啊

Answer 9

我这样就成功过啊:
在内网上的一个登录页面，登录框大小有点儿问题，不能用
vTag(4).Click 
我只好用上面的方法，还行，能过