Visual Basic - Dando um Complemento no Browser com TabControl

Neste poste você terá os códigos necessários para deixar seu browser(navegador para a internet) mais completo.

Iniciando a Programação

Public Class Form1
    Dim int As Integer = 0

    Private Sub Loading(ByVal sender As Object, ByVal e As Windows.Forms.WebBrowserProgressChangedEventArgs)
        ToolStripProgressBar1.Maximum = e.MaximumProgress
        ToolStripProgressBar1.Value = e.CurrentProgress
    End Sub
=========================================================================


    Private Sub Done(ByVal sender As Object, ByVal e As Windows.Forms.WebBrowserDocumentCompletedEventArgs)
        TabControl1.SelectedTab.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).DocumentTitle
        TextBox1.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Url.ToString

        ToolStripStatusLabel1.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Url.ToString
    End Sub






Form1

        Dim Browser As New WebBrowser
        TabControl1.TabPages.Add("New Page")
        Browser.Name = "Web Browser"
        Browser.Dock = DockStyle.Fill
        TabControl1.SelectedTab.Controls.Add(Browser)
        AddHandler Browser.ProgressChanged, AddressOf Loading
        AddHandler Browser.DocumentCompleted, AddressOf Done
        int = int + 1
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()




Voltar
        
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoBack()
    
 Avançar
        
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoForward()
   

 Parar
        
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Stop()
    
 Pagina Inicial
        
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()
   

 Recarregar
       
 CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Refresh()
    


  Ir

        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox1.Text)
    

  Google   

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Navigate("www.google.com")

  Ir TextBox2

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate(TextBox2.Text)

  

   Timer1

ToolStripStatusLabel1.Text = CType(TabControl1.SelectedTab.Controls.Item(0), 

WebBrowser).StatusText

Códigos para ToolStripMenuItem

Nova Janela

        Dim f As New Form1
        f.Show()
    

   Fechar Janela

        

Me.Close()
    

  Nova Aba

        

        Dim Browser As New WebBrowser
        TabControl1.TabPages.Add("New Page")
        TabControl1.SelectTab(int)
        Browser.Name = "Web Browser"
        Browser.Dock = DockStyle.Fill
        TabControl1.SelectedTab.Controls.Add(Browser)
        AddHandler Browser.ProgressChanged, AddressOf Loading
        AddHandler Browser.DocumentCompleted, AddressOf Done
        int = int + 1
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()
    

   

Fechar Aba

        If Not TabControl1.TabPages.Count = 1 Then
            TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)
            TabControl1.SelectTab(TabControl1.TabPages.Count - 1)
            int = int - 1
        End If

     Configurar Pagina
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).ShowPageSetupDialog()

   Visualizar Impressão

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).ShowPrintPreviewDialog()

   

   Imprimir 

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).ShowPrintPreviewDialog()

   Propiedade da Pagina
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).ShowPropertiesDialog()
  

     Fechar
       

 Close()

Desfazer
        

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Document.ExecCommand("Undo", False, vbNull)
  

    Refazer
      

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Document.ExecCommand("Redo", False, vbNull)


     Copiar
        

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Document.ExecCommand("Copy", False, vbNull)
    

     Colar
        

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Document.ExecCommand("Paste", False, vbNull)

    Excluir
        

CType(TabControl1.SelectedTab.Controls.Item(0),WebBrowser).Document.ExecCommand("Cut", False, vbNull)
    

   Selecionar Tudo
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Document.ExecCommand("SelectAll", True, vbNull)
    

    Voltar
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoBack()
    

    Avançar
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoForward()
    

   PaginaInicial        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).GoHome()

    

   Recarregar Página
        

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Refresh()
 
  Relogio
        

Relogio.Show()

   Cronometro
        

Cronometro.Show()

  

Introdução do Visual Basic Parte 3

Ir para o início da introdução

3.2 Manipulação de Alguns controles Comuns

3.2.1 A Caixa de Texto  

A caixa de texto é o controle padrão para aceitar entrada do usuário, bem como para mostrar a saída.Ele pode lidar com string (texto) e dados numéricos, mas não imagens ou fotos.String em uma caixa de texto pode ser convertido para um dado numérico, usando a função Val (texto).O exemplo a seguir ilustra um programa simples que processa a entrada do usuário. 

Exemplo 3.1

Neste programa, duas caixas de texto são inseridos no formulário, juntamente com algumas etiquetas.As duas caixas de texto são usados ​​para aceitar entradas do usuário e uma das etiquetas serão utilizadas para mostrar a soma de dois números que são inseridos nas duas caixas de texto.Além disso, um botão de comando também está programado para calcular a soma dos dois números usando o operador de adição.A usar o programa cria uma quantia variável de aceitar o somatório de valores de uma caixa de texto e procedimento de caixa de texto 2.A para calcular e exibir a saída na etiqueta é mostrada abaixo.A saída é mostrado na Figura 3.2

Private Sub Command1_Click ()

"Para adicionar os valores na caixa de texto e uma caixa de texto 2

Soma = Val (Text1.Text) + Val (Text2.Text)

'Para exibir a resposta na etiqueta um

Label1.Caption = Sum

End Sub 

Figura 3.3

3.2.2 O Selo    

O rótulo é um controle muito útil para Visual Basic, uma vez que não só é usado para fornecer instruções e guias para os usuários, também pode ser usado para mostrar resultados.Uma de suas propriedades mais importantes é Caption .Usando a sintaxe label.Caption , ele pode exibir texto e dados numéricos.Você pode mudar sua legenda na janela de propriedades e também durante a execução.Por favor, consulte Exemplo 3.1 e Figura 3.1 para o uso do rótulo.

 3.2.3 O botão de comando

O botão de comando é um dos controles mais importantes, uma vez que é usado para executar comandos.Ele exibe uma ilusão de que o botão for pressionado quando o usuário clicar sobre ele.O evento mais comuns associados com o botão de comando é o evento Click e, a sintaxe para o procedimento é

Private Sub Command1_Click ()

Declarações

End Sub

3.2.4 A caixa de imagem 

A caixa de imagem é um dos controles que é usado para manipular gráficos.Você pode carregar uma imagem em fase de projeto, clicando no item de imagem na janela de propriedades e selecione a imagem da pasta selecionada.Você também pode carregar a imagem em tempo de execução usando oLoadPicture método.Por exemplo, a declaração irá carregar o grape.gif imagem na caixa de imagem.

Picture1.Picture = LoadPicture ("C: \ VB programa \ Images \ grape.gif")

Você vai aprender mais sobre a caixa de imagem em lições futuras.A imagem na caixa de imagem não é redimensionável.

 3.2.5 A Caixa de Imagem

A Caixa de imagem é outro controle que lida com imagens e fotos.Ele funciona de forma quase idêntica à caixa de imagem.No entanto, existe uma grande diferença, a imagem em uma caixa de imagem é elástica, o que significa que podem ser redimensionados.Este recurso não está disponível na caixa de imagem.Similar à caixa de imagem, ele também pode usar o método LoadPicture para carregar a imagem.Por exemplo, a instrução carrega o grape.gif imagem na caixa de imagem.

Image1.Picture = LoadPicture ("C: \ VB programa \ Images \ grape.gif")

 3.2.6 A caixa de listagem

A função da caixa de listagem é apresentar uma lista de itens onde o usuário pode clicar e selecionar os itens da lista.Para adicionar itens à lista, podemos usar o método AddItem .Por exemplo, se você quiser adicionar um número de itens a lista da caixa 1, você pode digitar as seguintes declarações.

Exemplo 3.2

Private Sub Form_Load ()

List1.AddItem "Lesson1"

List1.AddItem "Lesson2"

List1.AddItem "Lesson3"

List1.AddItem "Lesson4"

End Sub

Os itens na caixa de listagem pode ser identificado pelo ListIndex propriedade, o valor do ListIndex para o primeiro item é 0, o segundo item tem um ListIndex 1, eo segundo item tem um ListIndex 2 e assim por diante.

3.2.7 A Caixa Combo 

A função da caixa de combinação é também para apresentar uma lista de itens onde o usuário pode clicar e selecionar os itens da lista.No entanto, o usuário precisa clicar na seta pequena à direita da caixa de combinação para ver os itens que são apresentados em uma lista drop-down., A fim de adicionar itens à lista, você também pode usar o método AddItem .Por exemplo, se você quiser adicionar um número de itens a caixa Combo 1, você pode digitar as seguintes declarações

Exemplo 3.3

Private Sub Form_Load ()

Combo1.AddItem "Item1"

Combo1.AddItem "Item2"

Combo1.AddItem "Item3"

Combo1.AddItem "Item4"

End Sub

3.2.8 A caixa de seleção

O controle caixa de seleção permite que o usuário seleciona ou unselects uma opção.Quando a opção for assinalada, o seu valor é definido como 1 e quando ele estiver desmarcada, o valor é definido como 0.Você pode incluir declarações Check1.Value = 1 para marcar a caixa de seleção e Check1.Value = 0 para desmarcar a caixa de seleção, bem como utilizá-los para iniciar certas ações.Por exemplo, o programa irá alterar a cor de fundo do formulário para vermelho quando a caixa de seleção está desmarcada e vai mudar para azul quando a caixa de seleção está marcada.Você vai aprender sobre a instrução condicional If .... Então .... Elesif na lição depois.VbRed e vbBlue são constantes cor e BackColor é a propriedade cor de fundo do formulário.

Exemplo 3.4

Private Sub Command1_Click ()

Se Check1.Value = 1 E Check2.Value = 0 Then
MsgBox "A Apple está selecionado"
ElseIf Check2.Value = 1 E Check1.Value = 0 Then
MsgBox "A laranja é selecionado"
Outro
MsgBox "Todos são selecionados"
End If

End Sub
 

3.2.9 A Caixa de Opção

 O controle de caixa de opção também permite que o usuário seleciona uma das opções.No entanto, duas ou mais caixas de opção devem trabalhar juntos, porque como uma das caixas de opção for selecionada, as caixas de outra opção será desmarcada.Na verdade, apenas uma caixa de opção pode ser selecionada em uma hora.Quando uma caixa de opção for selecionada, seu valor é definido como "True" e quando ela estiver desmarcada, o seu valor é definido como "False".No exemplo a seguir, o controle forma é colocado no formulário, juntamente com seis caixas de opção.Quando o usuário clica na opção de caixas diferentes, formas diferentes irá aparecer.Os valores do controle forma são 0, 1, 2,3,4,5 e que irá fazê-lo aparecer como um retângulo, um quadrado, uma forma oval, um retângulo arredondado e um quadrado arredondado, respectivamente.

Exemplo 3.5

Private Sub Option1_Click ()

Shape1.Shape = 0

End Sub

Private Sub Option2_Click ()

Shape1.Shape = 1

End Sub

Private Sub Option3_Click ()

Shape1.Shape = 2

End Sub

Private Sub Option4_Click ()

Shape1.Shape = 3

End Sub

Private Sub Option5_Click ()

Shape1.Shape = 4

End Sub

Private Sub Option6_Click ()

Shape1.Shape = 5

End Sub

 3.2.10 A caixa de listagem Drive

O ListBox Drive é para exibir uma lista de unidades disponíveis no seu computador.Quando você coloca este controle no formulário e executar o programa, você será capaz de selecionar diferentes unidades de seu computador, como mostrado na Figura 3.3.

Figura 3.3

3.2.11 O Box List Directory

A caixa de listagem do diretório é para exibir a lista de diretórios ou pastas em um drive selecionado.Quando você coloca este controle no formulário e executar o programa, você será capaz de selecionar diretórios diferentes de uma unidade selecionada em seu computador, conforme mostrado na Figura 3.4

Figura 3.4 Caixa de Listagem do Diretório

3.2.12 A Caixa de Lista de Arquivos

A caixa de listagem de arquivos é para exibir a lista de arquivos em um diretório ou pasta selecionada.Quando você coloca este controle no formulário e executar o programa, você será capaz de mostra a lista de arquivos em um diretório selecionado.

Você pode coordenar a caixa de listagem Drive, a caixa de listagem de diretório e a caixa de listagem de arquivos para procurar os arquivos que você deseja. O procedimento será discutida em lições posteriores. 

Introdução do Visual Basic Parte 2

Ir para o início da introdução

2.1 Criando sua primeira aplicação

Nesta seção, não vou entrar em aspectos técnicos de programação Visual Basic, no entanto, o que você precisa fazer é apenas tentar os exemplos abaixo para ver como faz em VB  programa como:

Exemplo a imagem abaixo é um programa simples. Primeiro de tudo, você tem que iniciar o Microsoft Visual Basic. Normalmente, um formulário padrão com o nome Form1 estarão disponíveis para que você comece seu novo projeto.Agora, clique duas vezes em Form1, a janela de código fonte para Form1 como mostrado na abaixo aparecerá. A parte superior da janela de código fonte consiste de uma lista de objetos e seus eventos associados ou procedimentos. Na figura abaixo, o objeto exibido é o formulário e o procedimento associado é de carga.

Quando você clicar na caixa de objeto, a lista drop-down irá mostrar uma lista de objetos que você tem inserido em seu formulário. Aqui, você pode ver um formulário com o nome Form1, um botão de comando com o nome Command1, uma etiqueta com o nome Label1 e uma caixa de imagem com o Picture1 nome. Da mesma forma, quando você clica na caixa de procedimento, uma lista de procedimentos associados com o objeto será exibido. Alguns dos procedimentos associados com o objeto Form1 são Activate, Click, DblClick, DragDrop, keyPress e muito mais. Cada objeto tem seu próprio conjunto de procedimentos.Você pode sempre selecionar um objeto e códigos escrever para qualquer um de seus procedimento, a fim de executar certas tarefas.

3.1 As propriedades de controle

Antes de escrever um procedimento de evento para o controle a resposta à entrada de um usuário, você tem que definir determinadas propriedades para o controle para determinar o seu aparecimento e como ele vai trabalhar com o procedimento de evento. Você pode definir as propriedades dos controles na janela de propriedades ou em tempo de execução.

Figura 3.1 à direita é uma janela de propriedades típicas de um formulário.Você pode renomear a legenda formulário para qualquer nome que você mais gosta.Na janela de propriedades, o item aparece na parte superior é o objeto selecionado (na figura 3.1, o objeto selecionado é Form1).Na parte inferior, os itens listados na coluna da esquerda representam os nomes de várias propriedades associadas ao objeto selecionado, enquanto os itens listados na coluna da direita representam os estados das propriedades.Propriedades podem ser definidas, destacando os itens na coluna da direita, em seguida, alterá-los digitando ou selecionando as opções disponíveis.

Por exemplo, para alterar a legenda, apenas destacar Form1 sob a legenda nome e mudá-lo para outros nomes.Você também pode tentar alterar a aparência da forma, definindo-a 3D ou apartamento. Outras coisas que você pode fazer são para mudar seu plano e cor de fundo, alterar o tipo e tamanho da fonte, habilitar ou desabilitar minimizar e maximizar botões e etc.

Você também pode alterar as propriedades em tempo de execução para dar efeitos especiais, tais como mudança de efeito de cor, animação, forma e assim por diante.Por exemplo, o código a seguir irá alterar a cor do formulário para cada vez que vermelho o formulário é carregado. VB utiliza o sistema hexadecimal para representar a cor. Você pode verificar os códigos de cor nas janelas de propriedades que estão sob apareceu ForeColor e BackColor.

Private Sub Form_Load ()

Form1.Show
Form1.BackColor = & & H000000FF

           End Sub

Outro exemplo é mudar a forma de controle para uma forma particular em tempo de execução por escrito o seguinte código.Este código irá mudar a forma de um círculo em tempo de execução.Mais tarde você vai aprender como mudar as formas aleatoriamente usando o RND função.

Private Sub Form_Load ()

Shape1.Shape = 3  

          End Sub 

Eu gostaria de salientar que saber como e quando definir as propriedades dos objetos é muito importante, pois ele pode ajudá-lo a escrever um bom programa ou você pode deixar de escrever um bom programa.Então, eu aconselho você a gastar muito tempo jogando com propriedades dos objetos.

Não vou entrar em detalhes sobre como definir as propriedades.No entanto, eu gostaria de salientar alguns pontos importantes sobre a configuração das propriedades.   

                                                                                                                                              

Você deve definir a propriedade Caption de um controle claramente para que o usuário sabe o que fazer com esse comando.Por exemplo, no programa de calculadora, todas as legendas dos botões de comando, tais como +, -, MC, MR são comumente encontrados em uma calculadora comum, um usuário deve ter nenhum problema em manipular os botões. Um monte de programadores gostam de usar um nome significativo para a propriedade Name pode ser porque é mais fácil para eles para escrever e ler o procedimento de evento e mais fácil de depurar ou modificar os programas mais tarde. No entanto, não é uma obrigação de fazer isso, desde que você identifique os seus objectos de forma clara e usar comentários no programa sempre que achar necessário.T Uma propriedade mais importante é se o controle está habilitado ou não. Finalmente, você também deve considerar tornar o controle visível ou invisível em tempo de execução, ou quando ele deve se tornar visível ou invisível.                                                           << VOLTAR      CONTINUAR >>

Introdução do Visual Basic

Para começar a programar no Visual Basic (Visual Studio) é interessante saber um pouco da sua história 


1.1 O Conceito de Programação no Computador


Vamos entender alguns conceitos básicos de programação. De acordo com Webopedia, um programa de computador é uma lista organizada de instruções que, quando executado, faz com que o computador se comportar de uma maneira predeterminada. Sem programas, os computadores são inúteis. Portanto, a programação significa projetar ou criar um conjunto de instruções para pedir ao computador para realizar certas tarefas que normalmente são muito mais rápido do que os seres humanos podem fazer.

Muita gente acha que CPU de computador é uma coisa muito inteligente, que na realidade é um objeto mudo e inanimados que não podem fazer nada sem ajuda humana. Os microchips de uma CPU só pode compreender dois estados elétricos distintos, a saber, os estados ligado e desligado, ou 0 e 1 códigos no sistema binário. Assim, a CPU só entende uma combinações de 0 e 1 códigos, uma linguagem que chamamos de linguagem de máquina. Linguagem de máquina é extremamente difícil de aprender e não é para nós leigos para dominá-lo facilmente. Felizmente, temos muitos programadores inteligentes que escreveu intérpretes e compiladores que podem traduzir a linguagem humana-como programas como o BASIC em linguagem de máquina para que o computador pode executar as instruções inseridos pelos utilizadores.Linguagem de máquina é conhecida como a linguagem primitiva, enquanto intérpretes e compiladores como o Visual Basic são chamados de linguagem de alto nível.Algumas das linguagens de alto nível ao lado do computador Visual Basic são Fortran, Cobol, Java, C, C + +, Turbo Pascal, e etc . 




1.2 O que é Visual Basic?

VISUAL BASIC é uma linguagem de programação de alto nível que evoluiu a partir da versão anterior chamado DOS BASIC. BASIC significa Beginners  All-purpose Symbolic Instruction Code; traduzindo significa Código de instrução simbólica com finalidade para os iniciantes. É uma linguagem de programação muito fácil de aprender. O código de olhar muito como o Inglês.Empresas de software diferentes, produzidos diferentes versões do BASIC, como o Microsoft QBASIC, QuickBasic, GWBASIC, BASICA IBM e assim por diante.No entanto, as pessoas preferem usar o Microsoft Visual Basic de hoje, pois é uma linguagem de programação bem desenvolvida e recursos de suporte estão disponíveis em todos os lugares. Agora, há muitas versões do VB existentes no mercado, o mais popular e ainda amplamente utilizado por muitos VB programadores não é outro senão o Visual Basic. Temos também VB.net, VB2005, VB2008 e as últimas VB2010.Ambos Vb2008 e VB2010 são totalmente orientada a objetos da linguagem de programação (OOP).

Visual Basic é uma linguagem de programação Visual e eventos dirigidos. Estas são as principais divergências do BASIC de idade. Em BASIC, a programação é feita em um ambiente de somente texto e o programa é executado sequencialmente. Em VB, a programação é feita em um ambiente gráfico. No BASIC velho, você tem que escrever o código do programa para cada objeto gráfico que você deseja exibi-lo na tela, incluindo a sua posição e sua cor. No entanto, em VB, você só precisa arrastar e soltar qualquer objeto gráfico em qualquer lugar no formulário, e você pode mudar a sua cor a qualquer momento usando as janelas de propriedades.

Por outro lado, porque o usuário pode clicar em um determinado objeto de forma aleatória, de modo que cada objeto tem que ser programado de forma independente para ser capaz de resposta a essas ações (eventos). Portanto, um programa VB é composto de muitos sub-programas, cada um tem seu próprio código de programa, e cada um pode ser executado de forma independente e ao mesmo tempo, cada um pode ser ligados entre si de uma forma ou de outra.

1.3 Que programas você pode criar com o Visual Basic 6?

Com VB, você pode criar qualquer programa, dependendo do seu objetivo. Por exemplo, se você é um professor universitário ou faculdade, você pode criar programas educativos que ensinam de negócios, economia, engenharia, ciência da computação, contabilidade, gestão financeira, sistema de informação e muito mais para tornar o ensino mais eficaz e interessante.

Se você está no negócio, você também pode criar programas de negócios, como o sistema de gerenciamento de inventário, ponto-de-venda, sistema de folha de pagamento, programação financeira, bem como programa de contabilidade para ajudar a gerenciar o seu negócio e aumentar a produtividade.Para aqueles de vocês que gostam de jogos e trabalhando como programador de jogos, você pode criar esses programas também.De fato, não há limite para o que programa você pode criar!Há muitos programas como neste tutorial, por isso você deve gastar mais tempo com o tutorial para aprender como criar esses programas.

1.4 O Visual Basic 6 Ambiente de Desenvolvimento Integrado


Antes que você pode programar em VB, você precisa instalar o Visual Basic 6 no seu computador. 


Download Visual Basic 2008 Express Edition

No arranque, Visual Basic irá mostrar uma caixa de diálogo você pode optar por iniciar um novo projeto, abrir um projeto existente ou selecionar uma lista de programas abertos recentemente.Um projeto é uma coleção de arquivos que compõem o seu pedido.Existem vários tipos de aplicações que poderíamos criar, no entanto, deve se concentrar na criação de programas EXE Standard (EXE significa programa executável). Agora, clique no ícone do EXE padrão para entrar no ambiente de programação Visual Basic.




                                                              
                                                            CONTINUAR >>