发布网友 发布时间:2022-04-23 00:43
共1个回答
热心网友 时间:2023-07-12 13:56
Private Sub Form_Load()
WebBrowser1.Navigate "http://www.baidu.com"
End Sub
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
If Left(Text, 4) = "http" Then
Text1.Text = Text
End If
End Sub