CALCULAR DATA
Bom pessoal preciso de uma força de voces, estou uma semana pesquisando sobre calculos de datas, e como eu sempre fiz esse calculo no excel, agora no vb ta complicado fazer na unha.
Funciona assim: precisava de um comando que quando eu informar a data no textbox1 (01/11/2013) e o numero de dias a ser calculado em outro textbox2(23 dias) resultado aparece no textbox3(25/11/2013), ou seja, vou está calculando a data do credito, só que minha dificuladade está em não cair no fim de semana ou feriado, e se cair ele pula para proximo dia util, ficando assim
01/11/2013 + 23 dias = iria cair no domingo dia 24/11/2013 dai essa data iria para o dia 25/11/2013, só considerando dia util , pra considerar os feriados então não fasso minima ideia como fazer.
alguem tem esse comando ai, ou sabe onde encontro algo parecido..
Funciona assim: precisava de um comando que quando eu informar a data no textbox1 (01/11/2013) e o numero de dias a ser calculado em outro textbox2(23 dias) resultado aparece no textbox3(25/11/2013), ou seja, vou está calculando a data do credito, só que minha dificuladade está em não cair no fim de semana ou feriado, e se cair ele pula para proximo dia util, ficando assim
01/11/2013 + 23 dias = iria cair no domingo dia 24/11/2013 dai essa data iria para o dia 25/11/2013, só considerando dia util , pra considerar os feriados então não fasso minima ideia como fazer.
alguem tem esse comando ai, ou sabe onde encontro algo parecido..
Fiz um exemplo simples que leva em consideração o sábado e o domingo (resta a lógica para os dias de feriados).
Dim dataOrig As DateTime = Date.Parse([Ô]24/11/2013[Ô])
Dim dataDest As DateTime = dataOrig.AddDays(23)
If dataDest.DayOfWeek = DayOfWeek.Saturday Then
dataDest = dataDest.AddDays(2)
ElseIf dataDest.DayOfWeek = DayOfWeek.Sunday Then
dataDest = dataDest.AddDays(1)
End If
MessageBox.Show(dataDest.ToString())
Faça seu login para responder