tutorial Criando Um Navegador

1 º Passo Abra o VB 2008-_- 
2 º Passo CRIE UM Projeto e logotipo los SEGUIDA Adicionar o Em Seu Projeto 5 BOTOES, um CAIXA e hum botao do Lado que TEXTBOX e renomeie o TEXTBOX ligação Como 

3 º Passo CRIE UM WebBrowser 

4 º Passo> no Primeiro botao adicionar o seguinte Comando> 

WebBrowser1.GoBack () 
ESSE Comando servir de para voltar a pagina 


5 º Passo> No Segundo Botão adicionar o seguinte Comando> 

WebBrowser1.GoForward () 
ESSE Comando servir de para avançar um page 

6 º Passo> No Terceiro Botão adicionar o seguinte Comando> 

WebBrowser1.Refresh () 
ESSE Comando servir de para atualizar a page 

7 º Passo> No Quarto Botão adicionar> 

WebBrowser1.Stop () 
ESSE Comando servir de para Parar a Navegação 

8 º Passo> no quinto botao add> 

WebBrowser1.GoHome () 
ESSE Comando servir Pará Ir à página Inicial 

9 º Passo> No botao do Lado não CAIXA adicionar o seguinte Comando> 

WebBrowser1.Navigate (link.Text) 
ESSE Comando servir de para direcionar o Navegador de para uma pagina colocada nenhuma CAIXA 

10 º Passo> Adicionar nenhum script Seu o seguinte:

Código HTML:

 Private Sub Teclou_Enter (sender System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles link.KeyUp
                Se e.KeyCode = Keys.Enter seguida
                        WebBrowser1.Navigate (link.Text)
                End If

        End Sub

Roteiro ESSE servir parágrafo when o Looks Favoritos teclar  entrar  Navegar Pará uma pagina indicada nenhuma CAIXA

Chegamos Ao Fim fazer Nosso tutorial. 

OUTROS codigo Interessantes>

Código HTML:

Private Sub WebBrowser1_ProgressChanged (sender System.Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
                Se e.CurrentProgress * 100 / e.MaximumProgress> 1 Then
                        ProgressBar1.Value = e.CurrentProgress * 100 / e.MaximumProgress
                End If

        End Sub

Roteiro ESSE Sirva parágrafo Colocar UMA barra de Progresso, mas os antes Localidade: Não esqueça de colocar hum ProgressBar não Seu Projeto

Código HTML:

  Private Sub Form1_Load (sender System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize
                WebBrowser.Height = Me.Height - 110
                WebBrowser.Width Me.Width = - 10
        End Sub

Roteiro ESSE Sirva parágrafo when o Looks Favoritos redimensionar o **** o webbrowser serviços redimensionado automáticamente (OBS: Adapte o Me.heidht - 110 EO me.width -10 AO Seu Gosto assim Modificar o -110 OE -10) 


Caso Achem sândalo Erro postem ai MIM parágrafos ajudar a resolver