Convertendo data para Extenso

[SoftwareS 1.984]

Imagem de como o projeto deverá ficar!

 

Execute o visual basic 2008 ou 2010 depois clique em File >> New Project e adicione um Windows Form Aplication de o nome para DataExtenso depois de ok, logo em seguida..

 

Adicione:

4 TextBox

1 Label

1 Button

 

Renomeie:

 

Label 1 >> Informe Data

Button 1 >> Converter para Extenso

 

Em Name:

TextBox 1 >> txtDia

TextBox 2 >> txtMes

TextBox 3 >> txtAno

TextBox 4 = Em modo Multiline

depois em Name >> txtResultado

 

Button 1 >> btnConverter

 

Depois de 2 cliques sobre o Form1 acima de Public Class Form1 adicione o seguinte codigo

:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Logo em seguida abaixo de Public Class Form1 adicione o seguinte codigo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Depois de 2 cliques sobre o Button 1 e adicione o seguinte codigo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E por ultimo Logo abaixo adicione esse codigo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

-Creditos-

Macoratti