maalesef olmuyor sn alpeki99 çözümü yokmu
siz örnekte denediniz ve olduysa ekleyebilirmsiniz

Nasıl olmuyor test edip gönderdim. Eğer sıfıra bölünürse hata vermeden sizin yazdırmış olduğunuz hata mesajını gösteriyor.

sizin gönderdiğinizi yazdım ama olmuyor bir bakın

Bende çalışıyor sizin örnek dosyanız

4 / 0 Hesapla tıklıyorum. msgbox "geçersiz sonuc" işletiliyor.

Sn accesman,
Sn alpeki99,

Aynı örneği bendeki 2003 de çalıştırdığım zaman accessman haklı
Aynı örneği bendeki 2010 da çalıştırdığım zaman alpeki99 haklı

Her ikisininde referanslarına baktım tek farklı referans

2003 Microsoft Access 11.0 Object Library
2010 Microsoft Access 14.0 Object Library

kullanıyor. Sebeb bu olabilir. 14.0 Object Library bunu görüyor fakat 11 görmüyor.

Bu benim düşüncem. Saygılarımla.

İşte access'in insanları deli eden tarafları.

Private Sub Komut0_Click()

On Error GoTo Hata_Kontrol



    If Metin1 / Metin3 <> Metin1 \ Metin3 Then

    MsgBox "geçersiz sonuç"

    Else

    Metin6 = Metin1 / Metin3

    End If

    

Hata_Kontrol:

        On Error Resume Next



End Sub

Birde bu şekilde deneyin bende problem çıkarmıyor. Sizde de tahminime göre çıkarmaması gerek. 2003 olmadığı için test edemiyorum.