Aprender a manipular datas em seus programas lhe dá o poder de manipular os dados sensíveis ao tempo . Muitos aplicativos que dependem de transporte , as vendas e até mesmo a promoção do produto dependem de cálculos de data precisos. Uma computação útil envolve a determinação do número de dias ou semanas entre duas datas de calendário. Ferramenta de programação Visual Basic , da Microsoft tem uma função interna que determina isso para você. Instruções
1
Inicie o Visual Studio. Clique em "Arquivo ". Um menu drop -down aparece. Clique em " New Project ". A janela "New Project " será aberta.
2
Clique em " Visual Basic" e , em seguida, clique duas vezes em " Windows Forms Application " para criar um novo projeto Visual Basic. Um novo formulário irá aparecer na janela de design.
3
Clique duas vezes na barra de título do formulário. A janela de código será aberta e exibirá o seguinte código:
"Sub Form1_Load Privada (sender System.Object , ByVal e As System.EventArgs ) Handles MyBase.Load
End Sub "
4
Adicione o seguinte código antes da instrução "End Sub" :
Dim date1Year as Long Dim
date1Month as Integer Dim
date1Day Como integer
Dim date2Year As Long Dim
date2Month As Integer Dim
date2Day As Integer
Dim Base de calendário As Integer Dim
weekCount Como Decimal
'Definir data1 e data2 valores abaixo
date1Year = 2000
date1Month = 1
date1Day = 1
date2Year = 2009
date2Month = 2
date2Day = 2
' determinar o número de dias entre as duas datas
Dim data1 as New System.DateTime ( date1Year , date1Month , date1Day )
Dim data2 As New System.DateTime ( date2Year , date2Month , date2Day )
Base de calendário = date2.Subtract ( data1 ) . dias
weekCount = Base de calendário /7
MessageBox.Show ( weekCount.ToString ())
5
Localize o comentário de que tem este rótulo: " . Definir data1 e data2 valores abaixo "
As seis linhas de código que seguem esse comentário permitem que você defina o seu data1 e data2 valores. Neste exemplo , é date1Year 2000 , date1Month é 1 e date1Day é 1 . Isso equivale a 1 de Janeiro de 2000. O date2Year é de 2009, o date2Month é 2 eo date2Day é 2. Isso traduz a 2 de Fevereiro de 2009.
Quando esse código é executado, ele calcula o número de semanas entre data1 e data 2 e armazena o valor na variável denominada " weekCount ". A declaração final MessageBox.Show abre uma janela pop -up e exibe o resultado .
6
Pressione a tecla "F5" para executar o projeto . A janela pop- up irá mostrar o número de semanas entre as duas datas . Neste exemplo , esse valor é 474,28 .