Desenvolvendo um programa no Visual Basic 2010

[johnny_sys]

Olá galera vou ensinar vocês, jovens desenvolvedores como eu, a criar um programa bem legal em Visual Basic estou utilizando o programa ‘Visual Basic 2010 Express’.
É muito fácil, mãos a obra:

Criando o projeto
1. Inicie o ‘Visual Basic’.
2. No menu File clique em New Project.
3. Selecione Windows Forms Application e clique em OK (aparecerá o Form Designer de seu programa).

Adicionando 4 controles
1. Clique no painel Toolbox (caixa de ferramentas).
DICA: (ctrl+alt+x)
2. Procure na toolbox o controle Panel em seguida arraste-o para a parte de cima do Form (não se preoculpe se ficar desalinhado).
3. Procure também o controle Textbox, arraste e posicione-o na parte superior dentro do Panel.
4. Na mesma guia, arraste um controle Button e posicione-o na parte superior dentro do Panel, à direita do controle TextBox.
5. E por fim, selecione um controle WebBrowser e posicione-o embaixo do Panel.
DICA: Se o controle WebBrowser não couber, você pode redimensionar o formulário arrastando a borda ou canto do formulário.

Feito isso seu formulário ficou mais ou menos assim:

Personalizando o formulário
1. No Form Designer, clique no controle Panel.
2. Em seguida encontre a janela Properties no canto direito que exibe todas as propriedades para o controle Panel chamado Panel1.
3. Na janela Properties, selecione a propriedade Dock e em seguida, defina o valor para Top. O controle Panel expande-se para preencher a parte de cima do formulário.
4. Em seguida encontre na propriedade Size os valores de Width e Height do controle Panel e altere o valor de Height, que está definido como 100, para 50.


5. No Form Designer, clique no controle WebBrowser. Na janela Properties, defina sua propriedade Dock como Fill. O controle WebBrowser expande-se para preencher a parte de central do formulário.


6. No Form Designer, clique no controle Button.
7. Na janela Properties, selecione a propriedade Text do controle Button e apague o “Button1” que está escrito e substitua-o por “Go!”.


8. Redimensione ou realoque qualquer um dos controles e redimensione o formulário de acordo com seu gosto.

Inserindo o código
1. No Form Designer, simplismente clique duas vezes no controle Button.
3. Uma nova janela chamada Editor de Códigos é aberta. É onde você adicionará todo o código para o programa.
5. No Editor de Códigos, digite o seguinte.

WebBrowser1.Navigate(Textbox1.Text)

Feito isso seu código ficará assim:



Esse código informa o programa para tirar o texto que foi digitado em TextBox1 e passá-lo como um argumento para o método Navigate do controle WebBrowser (chamado WebBrowser1).

Testando o programa
1. Conecte seu computador à Internet.
2. No menu Debug do Visual Basic, clique em Start Debugging.
DICA: Você pode usar a tecla de atalho F5.
3. Na caixa de texto, digite http://www.guiadohacker.com ou qualquer outro endereço e clique no botão “Go!”.
4. No menu Debug, clique em Stop Debugging para encerrar o programa.

É so isso pessoal espero que tenham gostado mais tarde farei novos posts, envie seu comentário.

[ghoac0]

onde eu coloco
o código :
Imports System.IO
se poder me ajudar
g_h_o_@hotmail.com

[Anonymous_do_Futuro]

onde eu coloco
o código :
Imports System.IO
se poder me ajudar
g_h_o_@hotmail.com

Você coloca em cima de Public Class Form1
Ficará assim:

Imports System.IO
Public Class Form1

[~$N4P~]

Segue abaixo o codigo para adicionar outros button comuns nos Browser´s: para Avançar, Voltar, Parar, HomePage.

name: btnFrente
name: btnVolta
name: btnPara
name: btnHome

Private Sub btnFrente_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFrente.Click

   WebBrowser1.GoForward()

End Sub
 

Private Sub btnVolta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVolta.Click

  WebBrowser1.GoBack()

End Sub

 

Private Sub btnPara_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPara.Click

   WebBrowser1.Stop()

End Sub

 

Private Sub btnHome_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHome.Click

   WebBrowser1.GoHome()

End Sub