if&else

Sayın saslan33;
"" ile null değer farklıdır. Kodu aşağıdaki şekilde deneyin.

Private Sub Komut25_Click()

If Me.TedbirErkenBitisTarihi = "" Or IsNull(TedbirErkenBitisTarihi) Then

Me.TedbirBitisTarihi = Me.TedbirBaslamaTarihi + Me.TedbirSuresi

Else

Me.TedbirBitisTarihi = Me.TedbirErkenBitisTarihi

End If

Me.ImhaTarihi = Me.TedbirBitisTarihi + 10

End Sub

Lütfen sonucu bildirin. Kolay gelsin.

Teşekkürler
Tamda böyle istediğim gibi olmuş. Ustalarımın yardımlarını bekliyorum.

(13/05/2011, 13:26)saslan33 yazdı: Teşekkürler
Tamda böyle istediğim gibi olmuş. Ustalarımın yardımlarını bekliyorum.

Hem istediğiniz olmuş hem de yardım istiyorsunuz burayı anlayamadım.
Saygılar...

(13/05/2011, 13:26)saslan33 yazdı: Teşekkürler
Tamda böyle istediğim gibi olmuş. Ustalarımın yardımlarını bekliyorum.

İsteğinizin gerçekleşmiş olduğunu algılayarak konuyu cevaplanmış bölümüne taşıyorum.