Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Textbox (gün Ay Yıl) Tarih Toplama Ve Çıkarma

malatyalı
malatyalı
Excel Cevaplanmış Soruları
13
929

Textbox (gün Ay Yıl) Tarih Toplama Ve Çıkarma

#9
malatyalı
Aktif Üye
malatyalı
Bul
Aktif Üye
Adı Soyadı: İl.... YÜ....
Yaşı: 49
Konum: Malatya
Ofis Versiyonu: Ofis 2003
Son Oturumu: 30/10/2023,20:27
Yorumları: 160
Konuları: 37
Kayıt Tarihi: 31/01/2010
Teşekkür Puanı: 0
Ustam mükemmel çalıştı. Tekrar elleriniz kollarınıza sağlık.

Kod:
Function TrhTopla()
Dim Sure1, Sure2
Sure1 = Split(Trim(TextBox7), " ")
Sure2 = Split(Trim(TextBox9), " ")
TSon = (CLng(Sure1(0)) + CLng(Sure2(0))) * 365 + (CLng(Sure1(2)) + CLng(Sure2(2))) * 30 + (CLng(Sure1(4)) + CLng(Sure2(4)))
TextBox11 = TrhDagit(TSon)
' Debug.Print TSon, CLng(Sure1(0)) + CLng(Sure2(0)), CLng(Sure1(2)) + CLng(Sure2(2)), CLng(Sure1(4)) + CLng(Sure2(4))
End Function
Sadece meraktan soruyorum.
Yıl, ay, gün nasıl ayırılır?

Textbox30  için yıl
Textbox31  için ay
Textbox32  için gün gibi

Belki ileri safhalarda önüme böyle bir sorun çıkarsa en azından elimde bulunur
Son Düzenleme: 20/03/2021, 22:40, Düzenleyen: malatyalı.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Textbox (gün Ay Yıl) Tarih Toplama Ve Çıkarma - Yazar: malatyalı - 20/03/2021, 22:37