永发信息网

在VB中如何实现自动填写表单

答案:3  悬赏:0  手机版
解决时间 2021-05-11 20:32
  • 提问者网友:棒棒糖
  • 2021-05-11 00:32
在VB中如何实现自动填写表单
最佳答案
  • 五星知识达人网友:一袍清酒付
  • 2021-05-11 01:08

Dim vDoc, vTag
Dim i As Integer


Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "INPUT" Then
Set vTag = vDoc.All(i)
If vTag.Type = "text" Or vTag.Type = "password" Then
Select Case vTag.Name
Case "name1"
vTag.Value = “内容1”


Case "name2"
vTag.Value = “内容2”


...


End Select


End If
End If
Next i

全部回答
  • 1楼网友:大漠
  • 2021-05-11 04:16
要填写什么表单,请描述清楚。
  • 2楼网友:想偏头吻你
  • 2021-05-11 02:43
请说明你的编程【意图】?作什么界面???
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯