Saati Komuta Düğmesiyle Yazdırma yardım...

Katılım
13 Ağustos 2006
Mesajlar
9
Ben Bir Metin Kutusunda yazarak değil,kutunun yanına koyacağımız bir buton yardımıyla Windows saatini yazdırmak istiyorum,ayrıca bu saatin metin kutusuna atıldıktan sonra bu kutunun renginin diğerlerinden farklı olarak saklanması ve değiştirilmemesini istiyorum,

Ayrıca bir konu daha var.iki ayrı metin kutumuz var formumuzda örneğin.İlkine "a" değerini girdiğimizde diğeri aktif halde kalacak ve değer girebileceğiz fakat "b" değeri girdiğimizde ikinci kutu otomatik olarak pasif konuma geçecek ve değer girişine kapalı olacak.

Yardım edebilirseniz sevinirim.
 
Katılım
13 Ağustos 2006
Mesajlar
9
Ayrıca saat farkını nasıl hesaplayabileceğim konusundada yardım ederseniz sevinirim.
Şimdiden teşekkürler...
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın milonga,

Öncelikle forumumuza hoş geldiniz.

Sorduğunuz soruların cevapları ekteki örnekte

Soru sorarken basit bir örnek de eklerseniz cevaplandıracak kişinin bir de veritabanı oluşturmakla zaman harcamaktan kurtarmış olursunuz.

İyi çalışmalar :D

Modalı: Aşağıda aşıkladığım hatayı düzelterek dosyayı güncelledim 13.08.2006 12:24
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın milonga,

Daha sonra aklıma geldi. Gece yarısından sonraki bir zamanın farkını almak istediğimizde hata oluşacak. onun için farkı hesaplayan metin kutusunun veri alanına lütfen ekteki formülü kopyalayıp yapıştırın.

=IIf([txtSaat2]<[txtSaat1];DateDiff("s";[txtSaat2];[txtSaat1])/3600;DateDiff("s";DateAdd("h";-24;[txtSaat2]);[txtSaat1])/3600)

İyi çalışmalar :D
 
Katılım
13 Ağustos 2006
Mesajlar
9
Sayın modalı dosyayı indirdim yalnız hata veriyor.
Ben ambulans takip programı yazmak istiyorum,veri olarak formda çağrının geldiği saat,ambulansa vakanın verildiği saat,ambulansın çıkış saati vs gibi bilgileri gireceğim bölümler olacak yapacağım formda.Saati klavye yardımıyla yazmak yerine tek tuşla bu işlemleri windows saatini kullanarak yapmak servisimizde takip işlerini hızlandırmış olacak.Yalnız sizin gönderdiğiniz dosyada metin kutusuna saati atmıyor.
İkincisi; formda bazı bölümler var örneğin bir vakamız var,112 aranmış komuta merkezi istasyona görev vermiş diyelim.Ambulans eğer bu vakayı almış ise kesinlikle bir tanı koymak zorunda ekip doktoru.Yani Görev Sonucu :Yerinde Müdahale ise Ambulans Ön Tanısı: Akut Myokard Infarktusu gibi. Ama Ambulansa görev verildiği halde hasta başka araçla nakledilmişse (Hasta Yakını Tarafından) Görev sonucu:Başka Araçla nakil Ambulans Ön Tanısı: Bu kısıma veri girişi yapılmaması gerekiyor.Kısaca GÖrev sonucu Başka Araçla Nakil seçildiğinde alttaki Ön Tanı Kutusu Kapalı olmalı.Yerinde Müdahale ise Tanı koyma zorunluluğu olacağından kutu açık olmalı.

Yardımlarınızı bekliyorum...
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın milonga,

Herhangi bir hata yok. Nerede görüyorsunuz hatayı. Saat kayıt düğümesine basılınca yanındaki metin kutusuna saat kaydoluyor. Saat farkını dakika olarak almak için saat farkı mein kutusunun veri bölümündeki formül 3600 yerine 60 olarak değiştirilmesi gerekiyor.

Örnek eklemeseniz başka yanıt alamazsınız.

iyi çalışmalar :(
 
Katılım
13 Ağustos 2006
Mesajlar
9
Sayın modalı;
Forumda kullanmak istediğim birçok örnek var ama bunları bir türlü kendi formuma aktaramıyorum,dış veri al diyorum, benim formum dışında bir başka form olarak aktarılıyor.Kendi formuma gelen bu yeni formu kopyaladığımda ise iki ayrı form görüntüsü oluyor.
Bu konuda da yardımcı olursanız sevinirim.
Hata veren kısmı gönderdim.
Teşekkür ederim...
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın milonga,

Hatalı satırı şu şekilde değiştirip deneyin

Me.txtSaatKayıt = Time()

Dakika olarak zaman farkını almak için ise şu formülü kullanın

=IIf([txtSaat2]<[txtSaat1];DateDiff("s";[txtSaat2];[txtSaat1])/60;DateDiff("s";DateAdd("h";-24;[txtSaat2]);[txtSaat1])/60)

İyi çalışmalar :D
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın milonga,

Sisteminizde veya referanslarınızda bir hata var. İmkansız mutlaka çalışıyor.

Microsoft Access 1*.0 Object Library referansıyla çalışıyor.

İyi çalışmalar :D
 
Üst