Um requisito básico de qualquer linguagem de programação é a capacidade de adicionar dois valores , se os valores de valor numérico ou de string. Do Microsoft Visual Basic fornece esses recursos para o programador . Para valores numéricos , você pode escolher qualquer número de tipos de dados, incluindo inteiros , decimais e outros , mais científicos , tipos . O que quer que os valores que você precisa adicionar , Visual Basic deve ser capaz de lidar com a operação com bastante facilidade. Instruções 
 Configuração inicial 
 1 
 Comece a aplicação do Visual Basic. Abra o projeto existente ou clique em " Novo Projeto ". 
 2 
 Passe o cursor sobre o menu Caixa de ferramentas à esquerda e clique duas vezes em duas caixas de texto , um botão e um rótulo. Isso adiciona esses controles ao seu formulário na janela do projeto . 
 3 
 Arraste os controles em torno da forma até que sejam devidamente alinhados de uma forma que parece organizado e faz sentido. As duas caixas de texto irá realizar a entrada do usuário , o rótulo irá receber os resultados de seu código, eo botão vai realmente executar o código. 
 4 
 Dê um duplo clique no botão no formulário. A janela de codificação será aberta eo editor de Visual Basic irá posicionar o cursor entre um título procedimento Sub e uma linha End Sub. Seu código vai entre essas linhas . Quando você realmente executar o seu programa , este é o código que será executado quando você clicar no botão . 
 Adicionando valores numéricos 
 5 
 Para adicionar números , adicione o seguinte código entre a linha de procedimento Sub ea linha End Sub para somar dois números : 
 
 Dim Num1 , Num2 , TotalNum como Integer 
 
 Se Textbox1.Text > Nada Então 
 
 Se Textbox2.Text > Nada Então 
 
 Experimente em 
 Num1.Focus () 
 
 Num1 = Integer.Parse ( Textbox1.Text ) 
 
 Num2.Focus () 
 
 Num2 = Integer.Parse ( Textbox2.Text ) 
 
 TotalNum = Num1 + Num2 
 
 Label1.Text = TotalNum.ToString () 
 
 pegar 
 
 MessageBox.Show (" Um número válido é exigido " ) Tente 
 
 Fim 
 
 Else 
 
 MessageBox.Show (" é necessário um número de o segundo campo " ) 
 
 Retornar 
 
 Else 
 
 MessageBox.Show (" é necessário um número no primeiro campo " ) 
 
 Retornar 
 
 End If 
 
 A instrução Dim declara três variáveis do tipo Integer, eo código subseqüente força o usuário a digitar valores numéricos ou uma mensagem de erro é gerada. Ao clicar no botão faz com que o código para executar e analisar as seqüências de número de operações matemáticas por Visual Basic. Os números são somados e colocado no campo TotalNum , que VB então se converte em um valor de seqüência e coloca no campo Label1.Text . 
 6 
 Clique no ícone de seta verde para depurar seu projeto. O formulário deve abrir para testar seu código. 
 7 
 Realizar um teste positivo, que é às vezes chamado de descer o "caminho feliz". Digitar um número no primeiro campo e um número para o segundo campo. Clique no botão . Você deve ver o resultado aparecer no campo de rótulo. 
 8 
 Realizar um teste negativo teclando caracteres alfabéticos em um ou ambos os campos e clicar no botão. Você deverá ver uma mensagem de erro para qualquer campo onde você digitou caracteres não numéricos . 
 Adicionando ( concatenação de cadeias de caracteres ) 
 9 
 Insira o seguinte código entre o procedimento sub cabeçalho ea linha de fuga Sub End : 
 
 Se Textbox1.Text > Nada Então 
 
 Se Textbox2.Text > Nada Então 
 
 Label1.Text = Textbox1.Text & Textbox2.Text 
 
 Else 
 
 MessageBox.Show ("A cadeia é necessária no segundo campo " ) 
 
 Retornar 
 
 Else 
 
 MessageBox.Show ("A cadeia é necessária no primeiro campo " ) 
 
 Retornar 
 
 End If 
 
 esse código verifica para garantir que um valor é inserido em cada campo e depois concatena as duas strings , colocando a string resultante no campo Label1.Text . 
 10 
 Clique no ícone de seta verde para depurar seu projeto. O formulário deve abrir para testar seu código. 
 11 
 Realizar um teste positivo digitando uma seqüência de caracteres para o primeiro campo e uma corda no segundo campo . Clique no botão eo código deve alinhavar as duas cordas juntas e colocar o resultado no campo Label1.Text . 
 12 
 Realizar um teste negativo teclando nada em um ou ambos os campos e clicar no botão. Você deverá ver uma mensagem de erro para qualquer campo onde você não digitar nada