Kod:
docmd.maximize
Kod:
me.form.requery
Madem form boyutuyla oynamadan olmuyor o zaman önce tam ekran yapıp sonra da docmd.restore kullanarak eski haline getirelim. O zaman sorun çıkmıyor)))
Formun açıldığında olayını şu şekilde yapın
Kod:
Private Sub Form_Open(Cancel As Integer)
DoCmd.Maximize
DoCmd.Restore 'SADECE BUNU EKLİYORUZ
Me.ILKTARIH = ""
Me.SONTARIH = ""
Me.köyseç = ""
Me.Form.Requery
End Sub
Yalnız şimdşi farkettim, siz yukarda docmd.minimize yazmışsınız. Bendeki örnekte orası maximizedir. Minimize yaparsanız simge durumuna küçülür. Orayı benim gönderdiğim kodlarla aynen değiştirin.