14/07/2009, 17:17
mehmetdemiral
İlginç bir durumdur ama ben de anlamadım, formu büyütmek için
komutunu kullanmışsınız. Onu kaldırınca
komutu hata yapıyor. Nedenini anlamış değilim, bir form tam ekran olmadan güncelleme kody neden çalışmasın ki? Ben size çözümü şöyle anlatayım.
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
Kolay Gelsin.
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.
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
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
Kolay Gelsin.
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.