Curso VB

AEEEEEE>.......
Pessoal Agora vamos começar as aulas de VB6.0 blz?

Primeiramente vocês precisam baixar o programa chamado Visual Basic 6.0 ou outra versão
eu recomendo que você baixe o VB6.0 porque é leve mais você pode entrar no site e baixar oque você quiser...pesquise no google

www.rpgmak.tk

Primeiro vamos reconhecer  a interface:

Somente clik em Abrir

Agora clik no botão e adicione ele no formulario ( o botão fica no menu da esquerda)

Clik em Text no menu a esquerda e adicione ele no formulario

Para mudar o nome do botão basta olhar no menu direito na parte de baixo NÃO MUDE o nome mude somente onde esta escrito "Caption" ali é o nome do botão tipo assim "Command1"

e para mudar o nome do text basta procurar na propiedade no menu direito escrito "Text" e mudar ou deixar em branco mas não mude a propiedade NOME  que sempre se encontra no topo.

agora vamos mudar o nome do text1 porque no código em vez de usarmos "text1" ao se referir a caixa de texto vamos usar "textonovo" blz?
procure no menu a direita na caixa de propiedade a propiedade "Nome" na frente esta escrito Text1 vamos trocar por "textonovo"
olhe a imagem:

Feto isso clik 2 vezes sobre o Command1 (o botão)
abrira uma janela de código ali será o código do nosso botão (Command1)
Veja a imagen:

agora nosso código do botão vai ser digitado entre
Private Sub Command1_Click()

aqui vai o código do nosso botão

End Sub

vou explicar o codigo:


tn = textonovo.Text

 'estão vendo aqui nosso "textonvo"? .text é para dizer que ele é um texto
e o tn = textonovo.Tex serve para dizer que de agora em diante o tn é a mesma coisa que textonovo.Tex

MsgBox ("") & tn    

 'MsgBox ("") serve para exibir mensagem MsgBox ("aqui vai a mensagen") as não deixei nada dentro a letra & serve para dizer que... ela vai dizer..
olha o 'tn' na frente dela então tudo que tiver no "tn" vai para o MsgBox ("") o & é como se fosse um caminho de tal coisa até tal coisa no caso ele faz o caminho do "tn" até o MsgBox ("") entendenram?

recomendo que vocês escrevam o código e não copiem, para aprender é melhor escrever


tn = textonovo.Text
MsgBox ("") & tn

Agora vamos testar Clik em Start na flechina no topo
ou no menu superio>run>Start

digite a mensagem na caixa de texto e clik em Command1

Aé pessoal por hj é só   qualquer duvida é só postar mas não poste como anonimo se não eu não vou poder responder para o seu E-mail.

By Rôney