关于vb里的webbrowser中的网页按钮 调用form

Question

在form1里加载了webbrowser1,显示登录页面的网页index.asp，点击“登录”按钮之后，我要在form2里显示receive.asp。说白了其实就是点击了index网页里的“登录”按钮之后使form2显示出来！这个该怎么实现呢？我在网上看了很多，好像都没有这方面的，都是千篇一律的希望回答的能详细点！先谢谢了

Answer 1

引用Microsoft   HTML   Object   Library   
Private WithEvents m_oDoc  As HTMLDocument
Dim oEvent  As CEventObjPrivate Sub Command1_Click()
  
End SubPrivate Sub Form_Load()
  WebBrowser1.Navigate "http://localhost:82/index.asp"
End Sub
Private Function m_oDoc_onclick() As Boolean
            Set oEvent = m_oDoc.parentWindow.event
          If oEvent.srcElement.id = "login" Then
            Form2.Show
            Form2.WebBrowser1.Navigate "http://localhost:82/receive.asp"
          End If
End Function    
  Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
          Set m_oDoc = pDisp.Document
  End Sub
index.asp<form>
<input type='button' value="登陆" id="login"></input>
</form>