" . WebBrowser " Visual Basic 2008, incluindo a versão gratuita Express, vem com um componente embutido renderização HTML chamado , apropriadamente, Isso permite que um desenvolvedor, com quase nenhuma programação ou o tempo de investimento , para criar um navegador ou permitir a sua aplicação a sua própria exposição de documentação HTML. Coisas que você precisa
Visual Basic 2008
Show Mais instruções
1
Adicionar uma caixa de texto para o topo da sua forma. Nomeie-o " AddressBar " e mude o texto para " http://www.google.com " ou qualquer outro endereço da Web padrão que você gostaria de usar.
2
Adicionar um botão ao lado do caixa de texto. Nomeie-o " GoButton " e altere sua propriedade de texto para "GO ".
3
Adicione o controle " WebBrowser " para a lista de componentes e arrastar as suas fronteiras para que ele preenche o resto do janela . Vá para a lista de propriedades no lado direito inferior da tela e localize a entrada "Âncora " . Ele vai ler " superior, inferior . " Clique na caixa suspensa para alterá-lo para " Superior, Inferior, Esquerda, Direita . " Isso irá garantir que seu controle navegador sempre enche a janela, se o usuário redimensiona -lo.
Seguida, vá para a propriedade URL do controle de navegador e alterá-lo para ler " http://www.google . com. " Se você escolher um outro site padrão na etapa 1 , o uso que, em vez .
4
duplo clique no botão " GoButton " que você criou no passo 2. Isto irá criar uma função de evento chamado " GoButton_Click " e levá-lo a ele automaticamente. Cole o seguinte código para ele. As linhas REM descrever o que o código está fazendo em cada linha :
REM Separe um pouco de memória para armazenar uma nova url URL.Dim Como Uri
REM Tente criar um URL do texto em o endereço bar.Tryurl = New Uri ( AddressBar.Text )
REM Se o texto na barra de endereços não faz sentido como uma URL , dar o warningREM de usuário e , em seguida, dizer-lhes que você está indo para o Google em vez . pegar ex Como ExceptionMsgBox ( " URL inválido . indo para o Google em seu lugar. " ) url = New Uri ( " http://www.google.com " ) AddressBar.Text = " http://www.google.com "
End Try
REM Diga o componente navegador para abrir o URL.WebBrowser1.Url = url