VB代码求助,代码如下,逐条翻译以下每条程序代码的含义

发布网友发布时间：2023-09-25 06:30

共3个回答

热心网友时间：2024-11-23 19:21

建立函数Command1_Click 函数含有参数(Index As Integer)
判断 Index 的值（就是传参传过来的数值）
如果是 0 那么 Trip: WebBrowser1.Stop
1 那么 WebBrowser1.Refresh
2 那么
。。。。
函数结束。
建立函数Text1_KeyPress函数含有参数(KeyAscii As Integer)
判断 KeyAscii 的值（就是传参传过来的数值）
如果等于 17 那么 WebBrowser1.Navigate (Text1.Text)
函数结束。

剩下的都是简单的函数，通过调用直接使用的

这里面比较难懂的就是一些浏览器的函数接口和调用，这些你没必要知道是什么，知道怎么用就好了

热心网友时间：2024-11-23 19:21

WebBrowser1.Stop 停止
WebBrowser1.Refresh 刷新
WebBrowser1.Gohome 主页？！这个不确定，我不用过WebBrowser1控件
WebBrowser1.GoBack 后退
WebBrowser1.GoForward 前进
-----------------------
If KeyAscii = 13 Then
WebBrowser1.Navigate (Text1.Text)如果按了回车，就链接到Text1.Text中输入的地址
End If
---------------------
没了，剩下的你自己去查吧，貌似MSDN中有WebBrowser控件的介绍的，很详细，你去看看吧追问Private Sub Form_Load()
WebBrowser1.GoHome
End Sub

Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)

请问这两个什么意思

追答Private Sub Form_Load()
WebBrowser1.GoHome程序启动的时候就自动转到主页
End Sub
------
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)

End Sub这段代码是空的，可以删除掉，功能我不太清楚，我没用过WebBrowser1控件

热心网友时间：2024-11-23 19:21

简单的IE内核的网页浏览器追问能把程序代码的含义逐条解释一下吗，谢了