SALVAR DATA EM BRANCO

ELMO01 15/12/2015 13:31:15
#455183
Oi pessoal,

Estou com um probleminha, tenho uma variável data com a seguinte máscara __/__/____, caso esta variável não esteja preenchido com data, como faço para gravar nulo ou branco nesta variável?

Estou fazendo assim:

Cmd.Parameters.AddWithValue([Ô]@DtFim_Con[Ô], IIf(Me.Msk_FimCom.Text.Equals([Ô] / /[Ô]), vbNullString, FormatDateTime(Me.Msk_FimCom.Text, DateFormat.ShortDate)))

já tentei assim:

Cmd.Parameters.AddWithValue([Ô]@DtFim_Con[Ô], IIf(Me.Msk_FimCom.Text.= [Ô]__/__/____[Ô], vbNullString, FormatDateTime(Me.Msk_FimCom.Text, DateFormat.ShortDate)))

dos dois métodos mas não está dando certo, como faço para gravar a data em branco?

Obrigado,
PERCIFILHO 15/12/2015 14:30:08
#455186
Tente trocar o vbNullString pelo DbNull.Value

Cmd.Parameters.AddWithValue([Ô]@DtFim_Con[Ô], IIf(Me.Msk_FimCom.Text.Equals([Ô] / /[Ô]), DbNull.Value, FormatDateTime(Me.Msk_FimCom.Text, DateFormat.ShortDate)))
JABA 15/12/2015 14:33:59
#455187 Resposta escolhida
A sua variável de data precisa ser declarada desta maneira para aceitar valores nulos:
Dim Data As Nullable(Of Date)



Cmd.Parameters.AddWithValue([Ô]@DtFim_Con[Ô], IIf(Me.Msk_FimCom.Text.Equals([Ô]  /  /[Ô]), [txt-color=#e80000]Nothing[/txt-color] , FormatDateTime(Me.Msk_FimCom.Text, DateFormat.ShortDate)))
Tópico encerrado , respostas não são mais permitidas
Voltar