用VB怎样把textbox里面的内容写到网站的输入框里面

2025-02-24 22:11:11
推荐回答(1个)
回答1:

'使用本代码需要Ctrl+T里面勾选Microsoft Internet Control 6.0,并在窗体上画一个,默认名称是WebBrowser1
'然后添加一个文本框Text1和一个按钮Command1

Private Sub Command1_Click()
WebBrowser1.Document.getElementById("su").Click
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "www.baidu.com"
End Sub

Private Sub Text1_Change()
WebBrowser1.Document.getElementById("kw").Value = Text1.Text
End Sub