Private Sub Ayrıntı_Format(Cancel As Integer, FormatCount As Integer)
if me.cinsiyet="erkek" then
me.erkek=true
me.kadın=false
else
me.erkek=false
me.kadın=True
end if
if me.mednihali="evli" then
me.evli=true
me.bekar=false
else
me.evli=false
me.bekar=True
end if
End Sub
#7
meşhur çin atasözü "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
