Merhaba arkadaşlar excelde
=1,67*LOG(15000/(D30*D24))
formülü ile hesaplanan değeri acsess te aynı şekilde hesaplatmak için kodu nasıl yazmalıyım?
Bir çok kombinasyon denedim ancak sonuçlar hiç tutmadı
Bu acemiye yardım ettiğiniz şimdiden teşekkürler...
acsess te log alma işlevi
Kod:
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function
Kod:
Dim MyAngle, MyLog
' Define angle in radians.
MyAngle = 1.3
' Calculate inverse hyperbolic sine.
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
@benbendedeilem
Son Düzenleme: 10/05/2012, 18:47, Düzenleyen: accessman.
D30=1.86 , D24=316 olduğunda excelin verdiği sonuç 2,34 ancak burda verdiğiniz kodlarla hesaplattığımda sonuç 5.4 çıkıyor sanırım Dim kodunu yalnış yere kopyalamış olabilirim o kod nereye yazılmalı ?
accessman'ın verdiği
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function
kodu vb sayfasına yapıştır.MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
olarak verilen koduMyLog = Log10(MyAngle + Sqr(MyAngle * MyAngle + 1))
şeklinde kullan, sizin kodunuza göre;MyLog = 1.67 * Log10(15000 / (1.86 * 316))
teşekkürler sorun çözülmüştür.
Konuyu Okuyanlar: 1 Ziyaretçi