Manipulação de Datas no VB6

[Guest --Roberto --]

Pessoal, boa tarde!

Tenho os seguintes campos em um formulário VB6:

Data Inicial;

Qtdade Dias;

Data Final.

Preciso que o campo Data Final, tenha como resultado a soma do campo Data Inicial com a Qtdade Dias, só que em dias úteis. Por exemplo:

Data Inicial: 03/09/08

Qtdade Dias: 03

Data Final: 08/09/2008

Alguém poderia me ajudar por favor?

[Cassiano Sousa]

Pessoal, boa tarde!

Tenho os seguintes campos em um formulário VB6:

Data Inicial;

Qtdade Dias;

Data Final.

Preciso que o campo Data Final, tenha como resultado a soma do campo Data Inicial com a Qtdade Dias, só que em dias úteis. Por exemplo:

Data Inicial: 03/09/08

Qtdade Dias: 03

Data Final: 08/09/2008

Alguém poderia me ajudar por favor?

Olha não sei se tem uma maneira + facil.

você pode somar usando a função DateAdd()

Automaticamente você ira verificar a nova data.

Depois você usa a funcao weekday()

Com a weekday, ele retorna o numero da semana sendo 1 para domingo e 7 para sabado

Se for sabado você manda adicionar mais 2 dias, se for domingo adicione + 1.

Espero ter ajudado no que entendi