Tags
Author: Zeki Gürsoy - Replies: 2 - Views: 2517
Alternatif Round Fonksiyonu "RoundA"
Hatalı sonuç üreten Round fonksiyonuna alternatif olarak geliştirdiğim RoundA fonksiyonunu paylaşmak istiyorum.

Nesne yerine değişken girdisi kullanılacaksa Variant ya da String olmalıdır.
Çünkü Double değişken tanımlandığında sayı anlamlı 16 digit haneye yuvarlandıktan fonksiyona girecektir.

Fonksiyon, Exceldeki YUVARLA fonksiyonu ile eşdeğer sonuçlar üretmektedir.

[code]Function RoundA(Sayi, Optional Basamak As Long)
Kat& = 10 ^ Abs(Basamak)
If Basamak >= 0 Then RoundA = CDb
Author: gitarisyen - Replies: 14 - Views: 21498
YAŞMATİK ("DateDiff" Fonksiyonu Anlatımı Amaçlı)

[align=justify]Merhaba;

Aşağıdaki örneği "DateDiff" fonksiyonuna ve formu boşaltarak temizlemeye basit bir örnek olması amacıyla hazırladım.

Bilindiği gibi "DateDiff", tarih aralığını veren bir fonksiyondur ve iki tarih arasındaki farkı gün, ay, yıl, saat, saniye, hafta v.s. cinslerinden gösterebiliriz. Bu fonksiyonu sorgularda, denetimlerimizin "denetim kaynağında" veya VBA kodlarında kullanabiliriz. An
Author: gitarisyen - Replies: 33 - Views: 55530
BASİT SU FATURASI ÖRNEĞİ - (Sorgu, hesaplamalar ve IIf fonksiyonu anlatımı amaçlı)

[align=justify]Merhaba;

Bilindiği gibi Access’te veritabanının bütün yükünü sırtlanan nesneler tablolardır ve iyi yapılmış bir tablo tasarımı ve tabloda gereksiz fazlalıkların olmaması, yapacağımız uygulamanın performansını artırır... Yine hesaplanmış alanların veya hesaplamaların da tablolarda tutulmaması gerekir. Zira bu alanlar tabloların (dolayısıyla veritabanının) gereksiz yere şişmesine, per
Author: adnan - Replies: 7 - Views: 6017
Gelir vergisi fonksiyonu
Merhaba;

Nereden buldum hatırlamıyorum aşağıdaki gelir vergisi fonksiyonunu çalıştıramadım. Yardımcı olabilirmisiniz.

Selamlar


Function VERGI(Barem1, Barem2, Barem3, Barem4, BirikimliMatrah, AylıkMatrah)
If BirikimliMatrah <= Barem1 Then
VERGI = AylıkMatrah * 0.15
ElseIf BirikimliMatrah - Barem1 <= AylıkMatrah Then
VERGI = (BirikimliMatrah - Barem1) * 0.2 + (AylıkMatrah - (BirikimliMatrah - Barem1)) * 0.15
ElseIf BirikimliMatrah <= Barem2 Then
VERGI = AylıkMatrah * 0.2
Author: adnanyurdakul - Replies: 9 - Views: 7777
Fix Fonksiyonu
Eğer bir sayının virgüle kadar olan kısmını almak için fix komutu kullanılır
kullanımı
fix(sayı)
örnek
sonuç=fix(12.98)
sonuç=12
Author: Taruz - Replies: 5 - Views: 7812
Abs Fonksiyonu
Bu fonksiyon - (eksi) değeri mutlak değere çevirir..

Vba kullanımına örnek...:

Visual Basic
  1. Dim Sayi As Double
  2.  
  3. Sayi = Abs (-210.6)
  4.  
  5. 'Sonuç 210.6



Sorgudaki kullanımı ise bu şekilde..:

[Resim: http://www.access-sql.com/resim/abs.jpg]

Buradaki değişkenler yerine alan isimlerini de kullanabileceğimizi hatırlatalım..
Author: Taruz - Replies: 3 - Views: 6903
Trim Fonksiyonu
Bu fonksiyon değişkendeki boşlukları silmemizi sağlar..

Vba için kullanım örneği..:

Visual Basic
  1. Dim Trz As String
  2.  
  3. Trz = Trim (" Access ")
  4.  
  5. 'Sonuçta kenardaki boşluklar yok olacak



Sorguda kullanımı..:

[Resim: http://www.access-sql.com/resim/trim.jpg]

Buradaki değişkenler yerine alan isimlerini de kullanabileceğimizi hatırlatalım..
Author: Taruz - Replies: 1 - Views: 4339
Space Fonksiyonu
Bu fonksiyon bize belirlediğimiz sayıda boşluk verir..

Vba da bu şekilde kullanabiliriz..:


Visual Basic
  1. Dim AFC As String
  2.  
  3. AFC= "Taruz" & Space(5) & "Access"
  4.  
  5. 'Sonuç Taruz Access olaraktır.. iki değişkenin arasında 5 boşluk oluşturduk..



Sorguda ise böyle..:

[Resim: http://www.access-sql.com/resim/space.jpg]

Buradaki değişkenler yerine alan isimlerini de kullanabileceğimizi hatırlatalım..
Author: Taruz - Replies: 4 - Views: 3990
CurDir Fonksiyonu
Bu fonksiyon geçerli Belgelerimin klasör yolunu verir bize..

Vba kullanımına örnek...:

Visual Basic
  1. Dim Surucu As String
  2.  
  3. Surucu = CurDir ()
  4.  
  5.  
  6. 'CurDir ("D")
  7.  
  8. 'gibi ana dizini belirtirsek o sürücüdeki yolu verir.





Sorgudaki kullanımı ise bu şekilde..:

[Resim: http://www.access-sql.com/resim/CurDir.jpg]
Author: Taruz - Replies: 2 - Views: 3466
StrReverse Fonksiyonu
Bu fonksiyon yazılanı tersten okur.. Wink Benim çok eğlencekli bulduğum bir fonksiyondur ayrıca.. Smile

Vba kullanımına örnek...:

Visual Basic
  1. Dim Ters As String
  2.  
  3. Ters = StrReverse ("Taruz)
  4.  
  5. 'Sonuç: zuraT



Sorgudaki kullanımı ise bu şekilde..:

[Resim: http://www.access-sql.com/resim/StrReverse.jpg]

Buradaki değişkenler yerine alan isimlerini de kullanabileceğimizi hatırlatalım..