Ir em baixo
Fox
Fox

Mensagens : 1913
Pontos : 11718
Evolução : 50
[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos

[Tutorial] VB.net #1  Empty [Tutorial] VB.net #1

em Sex 18 Jan 2013 - 11:12
Reputação da mensagem: 100% (2 votos)
Aprenda a desenvolver os seus próprios softwares com os nossos tutoriais de visual basic .net, seguindo a nossa seria de tutoriais você pode adquirir muito conhecimento .

Vamos começar,
hoje vamos estudar sobre variáveis.

  • O que são variáveis ?
    Variáveis: algo que varia .
    Seria onde podemos armazenar e recuperar esse valor, para leitura.
    A mesma segura varias informações e torna o software mais dinâmico .

    Bom ,não sou muito bom com explicações, más posso mostrar na pratica.
    Obs: Todo o texto encontrado após o ' , são observações sobre aquela linha de código .

    Crie um Windows Form Application
    De um duplo click, e acima de "End Class", adicione esse código.


Código:

        Public Sub Exemplo()
        Dim faraday As Long ' Criamos a variavel Faraday
        Dim euteamo As Long ' criamos a variavel euteamo
        Dim muito As Long
        Dim Gerson As Long ' criamos a variavel Gerson
        Dim quer_o_gerson_na_cama As Long


        euteamo = 1 + 1 ' definimos que euteamo é = 1 +1 (ou seja 2 )
        muito = 1
        Gerson = 1 + 2 ' definimos que Gerson é igual 1 +2 (ou seja 3)
        quer_o_gerson_na_cama = 6 'define que querogersonnacama é igual a 6
        faraday = euteamo + muito + Gerson ' definimos que o faraday é igual ao valor de euteamo + gerson (ou seja 5 )



        If faraday = quer_o_gerson_na_cama Then ' se o faraday quer_o_gerson_na_cama , então...
            MessageBox.Show("O Faraday ama mesmo o Gerson!", "Tutorial") ' envia a mensagem
        End If ' fecha a condição

    End Sub


agora vamos ao Private Sub Form_Load,
e adicione
Código:

Exemplo() ' aqui estamos chamando o public sub exemplo que é o do código acima.

O nosso resultado final seria.
Código:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Exemplo() ' chama a public sub exemplo()
    End Sub

    Public Sub Exemplo()
        Dim faraday As Long ' Criamos a variavel Faraday
        Dim euteamo As Long ' criamos a variavel euteamo
        Dim muito As Long
        Dim Gerson As Long ' criamos a variavel Gerson
        Dim quer_o_gerson_na_cama As Long


        euteamo = 1 + 1 ' definimos que euteamo é = 1 +1 (ou seja 2 )
        muito = 1
        Gerson = 1 + 2 ' definimos que Gerson é igual 1 +2 (ou seja 3)
        quer_o_gerson_na_cama = 6 'define que querogersonnacama é igual a 5
        faraday = euteamo + muito + Gerson ' definimos que o faraday é igual ao valor de euteamo + gerson (ou seja 5 )



        If faraday = quer_o_gerson_na_cama Then ' se o faraday quer_o_gerson_na_cama , então...
            MessageBox.Show("O Faraday ama mesmo o Gerson!", "Tutorial") ' envia a mensagem
        End If ' fecha a condição

    End Sub

End Class


Bom , esse é o nosso primeiro tutorial sobre VB.net .

Até a proxima .


Créditos - Fox


Última edição por Fox em Sex 18 Jan 2013 - 15:21, editado 2 vez(es)
BGames
BGames

Mensagens : 1808
Pontos : 16497
Evolução : 100
[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos

[Tutorial] VB.net #1  Empty Re: [Tutorial] VB.net #1

em Sex 18 Jan 2013 - 15:13
Esse subto amor guei, veio de onde?

D:

"A fruta que você NÃO gosta, eu chupo até o caroço" (ppks no caso)
Fox
Fox

Mensagens : 1913
Pontos : 11718
Evolução : 50
[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos[Tutorial] VB.net #1  Reputation_highpos

[Tutorial] VB.net #1  Empty Re: [Tutorial] VB.net #1

em Sex 18 Jan 2013 - 15:16
tópico atualizado.
adicionado a variavel quer_o_gerson_na_cama , um pouco da lógica
do programa foi alterada, sugiro que leia novamente .
Kozzie
Kozzie

Mensagens : 1350
Pontos : 5077
Evolução : 4
[Tutorial] VB.net #1  Reputation_highpos

[Tutorial] VB.net #1  Empty Re: [Tutorial] VB.net #1

em Sex 18 Jan 2013 - 15:27
[Tutorial] VB.net #1  1743711520
Não acredito que paguei 40 dos meus preciosos pontos por isso. [Tutorial] VB.net #1  901768235

- o povo é morto e não sabe quem matou... falomermo.

'obrigado por compartilhar' ._.
Conteúdo patrocinado

[Tutorial] VB.net #1  Empty Re: [Tutorial] VB.net #1

Voltar ao Topo
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum