如何给附件中所述的网页密码框赋值？用VB的webbrowse1访问编程也可以

请专家朋友帮忙解答，十分感谢！

这个是利用webbrowser实现input的输入用户名、密码并点击。

         <input name="UserName" type="text" id="UserName" tabindex="1" autocomplete="off" class="username" />
         <input name="password" type="password" id="password" tabindex="2" class="pwd" autocomplete="off" />
         <input type="submit" name="login" value="登录" onclick="checkUser();" id="login" class="login-btn"

        Set doc = Webbrowser1.Document
        doc.body.All("UserName").Value = Text1(1).Text             '==用户名
        doc.body.All("password").Value = Text1(2).Text             '==密码
        doc.body.All("login").Click      

[此贴子已经被作者于2021-5-11 15:54编辑过]

这个是包含表单等的赋值
  id可以是A，input，table等
  Set vtag = webbrowser1.Document.getElementsByTagName(ID)
  VCOUNT = vtag.length
  For i = 0 To VCOUNT - 1
      If vtag(i).ID = "TestPwd"  Then vtag(i).Value = "密码"
        vtag(i).Click
        Exit For
      endif
  next

[此贴子已经被作者于2021-5-11 15:58编辑过]

看代码密码框是一个 独立的对象，这种对象一般是网银用的多。

你要有这个控件的 属性，那么就可以 针对这个控件进行操作。
或者打开网页中断下，然后对本地窗口中搜索一个这个控件，看看有些啥属性。