division by zero

yanlış anlama için özür dilerim

(10/09/2010, 00:39)accessman yazdı: ghgjhgj

Bu hangi dilde yazılmış, anlayan varsa bende öğrenmek isterim.

(10/09/2010, 01:00)BlackEagle yazdı:

(10/09/2010, 00:39)accessman yazdı: ghgjhgj

Bu hangi dilde yazılmış, anlayan varsa bende öğrenmek isterim.

Arkadaş siteye olan saygısını dile getirmek istemiş.

(10/09/2010, 00:39)accessman yazdı: ghgjhgj

sn accessman üstteki mesajınıza bende anlam veremedim, çözüm bulunamadığını düşünüp AccessTr.neT'e mi tepki gösteriyorsunuz ?

on error resume next kullanmadan aşağıdaki kodu deneyin

If Me.Metin3 = 0 Then

Me.Metin6 = 0

Exit Sub

End If

If Metin1 / Metin3 <> Metin1 \ Metin3 Then

MsgBox "geçersiz sonuç"

Else

Metin6 = Metin1 / Metin3

End If

meselenin aslı şu
gecenin bir vakti laptopda yaptığım bu programı masaüstünde denemem gerekiyordu
onun için foruma ekledim
ama vaktim dardı
mesaja illa bir şeyler yazmak gerekiyormuş
öylesine tuşlara basmıştım
accesstr'i herzaman takdir etmişimdir
sadece bayram gecesi olsa bile aceesstr ziyeretçilerinin eksik olmayacağını hesap etmemişim
saygısızlık olarak algılanabileceği ise hiç mi hiç aklıma gelmemişti
hüsn-ü zan eden arkadaşlara teşekkür ederim

sn.sledgeab cevabınız için teşekkürler
if metin3 =0 bunun için çözüm olabilir belki ama
eklediğim tablolarda işlemler.mdb için çözüm olmayacak
çünkü bir sürü formul
her formulde birsürü değişken olacak
bana genel bir çözüm lazım
şöyle düşündüm
porgramı ilgilendiren her referansın karşılığını masaüstündeki office referansları ile değiştirsem
mesela VBA6 içindekileri ve diğerlerini
ama bazılarının adresleri referans penceresine sığmıyor
bu çözüm olabilir mi

sn accessman,
eklediğim kod sadece 0 için, sayı 0 değilse kodunuz normal olarak çalışacak.

Ayrıca formdaki metin kutuları ilişkisiz mi olacak yoksa tablodaki alanlara bağlanacak mı?