Módulo, Subrotina e Função no VB

[Marcos]

Fala Galera, segue mais uma contribuição minha para o grupo de sala.

Desta vez venho explicar como funciona o Módulo, além de dar pincelar
o funcionamento da Subrotina e da Função.

MÓDULO

O módulo funciona como uma área para que possamos fazer uma
programação que possa ser usada por todos os formulários. Nele se
utiliza variáveis, subrotinas, funções e outros similares.

Para abrir um módulo a duas opções:

1- No menu superior (file, edit, view... ou arquivo, editar,
exibir...) clique em project (projeto) e depois em add module
(adicionar módulo), de um nome para o módulo e confirme.

2 - No lado da tela há um menu chamado Solution Explorer (olhe bem na
lateral da tela, pois ele pode estar minimizado é uma unica barra, dai
é só passar o mouse em cima e ele abre), lá de um clique com o botão
direito do mouse em cima do projeto (do projeto e não do formulário),
vá em add (adicionar) e selecione module (módulo), de nome ao módulo e
confirme.

Pronto, agora é só acrescentar ao módulo o que você quer que seja
utilizado por todos os formulários.

Obs: Geralmente o projeto possui apenas um módulo, mas pode ser
incuído quantos módulos quiser.

Exemplo:

Dentro do módulo programe:

Public Sub sair()
If (MessageBox.Show("Deseja fechar o programa", "AVISO",
MessageBoxButtons.YesNo) = DialogResult.Yes) Then
End
End If
End Sub

Já no formulário:

Private Sub mnu_sair_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles mnu_sair.Click
sair()
End Sub

Private Sub btn_button_Click(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles btn_button.Click
sair()
End Sub

SUBROTINA

A subrotina é utilizada quando um codigo se repete várias vezes
durante a execução de um programa. Ela pode ser encarada como uma
função void. Ela pode ser Private e Public.

Private Sub só pode ser acessada na área em que foi programada.

Quando damos um duplo clique em um objeto da tela de design, seja um
botão ou qualquer outra coisa, nos é aberta uma Private Sub
instataneamente, onde programos aquilo que queremos que aconteça
naquele determinado botão. Mas podemos utilizar essa mesmo Subrotina
para mais de um objeto, utilizando o Handles, o qual você deve ter
reparado no fim da linha de início de Subrotinas dessas, mas isso eu
explicarei em outro tópico aqui do grupo.

Um bom exemplo já foi demonstrado acima.

Public Sub é o contrário, pode ser acessada em qualquer área de
programação. Sua utilização mais frequente é em módulos. Um bom
exemplo também já foi citado acima.

FUNÇÃO

A função funciona como a função de qualquer linguagem, mas ela sempre
tem retorno. Também pode ser Public ou Private.

Bom, em Java temos que declarar métodos especificando se seu retorno é
int, double ou até mesmo um objeto. Mas como todos sabemos que o VB é
uma "mãe", nele não precisamos especificar nada e uma função mesma
função pode retornar milhares de coisas diferentes, desde algo simples
como um inteiro a coisas complexas como uma TextBox. Antes do exempo,
quero avisar que o paramêtro será explicado em outro tópico.

Public Function divisao(ByVal a As Double, ByVal b As Double)
If (b = 0) Then
Return "Não Existe divisão por zero"
Else
Dim c As Double
c = a / b
Return c
End If
End Function

Acima esta uma função que retorna uma String ou um Double.

Bom galera. Está foi mais uma contribuição minha. Na próxima eu
explicarei paramêtros.