Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
06/07/2012 01:38
Konu Sahibi
zetyu
Yorumlar
2
Okunma
1609
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

zetyu

Aktif Üye
4282
Ze.... Yı....
 47
 45
 152
 12/03/2009
6
 İstanbul
 serbest meslek
 Ofis 2003
 08/05/2019,23:35
Çözüldü 
Hayırlı cumalar

3 tane komut düğmesi var bu komut düğmelerinin belirli saat aralıklarında görülmesini diğer saatlerde görünmesini istemiyorum.aşağıdakı kod ile if ile denedim ama oldmadı hatam nerede olabilir.örnek ekte .

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Form_Current()
If Metin6 > #10:30:00 AM# And Metin6 < #12:30:00 AM# Then
Komut18.Visible = True
Komut19.Visible = False
Komut20.Visible = False
ElseIf Metin6 > #1:30:00 PM# And Metin6 < #3:30:00 PM# Then
Komut18.Visible = False
Komut19.Visible = True
Komut20.Visible = False
ElseIf Metin6 > #4:30:00 PM# And Metin6 < #7:30:00 PM# Then
Komut18.Visible = False
Komut19.Visible = False
Komut20.Visible = True
End If
End Sub


Şimdiden tüm emeği gecenlere teşekkür ederim

Ek Dosyalar
if saate göre olurmu.rar


zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 480
 12.053
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,00:25
Çözüldü 
önce metin6'nın denetim kaynağındaki =Now() kodu yerine =Time() kodu yaz,
formun geçerli olduğunda olayındaki kodu aşağıdaki ile değiştir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
If Metin6 > "10:30" And Metin6 < "12:30" Then
Komut18.Visible = True
Komut19.Visible = False
Komut20.Visible = False


ElseIf Metin6 > "13:30" And Metin6 < "15:30" Then
Komut18.Visible = False
Komut19.Visible = True
Komut20.Visible = False

ElseIf Metin6 > "16:30" And Metin6 < "19:30" Then
Komut18.Visible = False
Komut19.Visible = False
Komut20.Visible = True

End If


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

zetyu

Aktif Üye
4282
Ze.... Yı....
 47
 45
 152
 12/03/2009
6
 İstanbul
 serbest meslek
 Ofis 2003
 08/05/2019,23:35
Çözüldü 
Elinize sağlık.
Teşekkür ederim ilginize.
Konu kapanmıştır


zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Saat 17:00Da Otomatik Mail Atsın haziran4 6 181 26/04/2019, 15:52
Son Yorum: ozanakkaya
Çözüldü Takvim Ajanda Programını Ofis 2016 Da Çalıştırmak İçin Çevirmek hayalibey 11 238 28/03/2019, 21:04
Son Yorum: haliliyas
Çözüldü Sunum İçin Powerpointe access acemisi 11 378 24/03/2019, 17:38
Son Yorum: access acemisi
Çözüldü Rezervasyon Tarih Ve Saat Kriterine Göre İlgili Etiketi Renklendirme. Oğuz Türkyılmaz 9 370 14/01/2019, 15:55
Son Yorum: Oğuz Türkyılmaz
Çözüldü Sorgunun Son 5 Veri İçin Çalışması ertans 2 260 03/01/2019, 08:39
Son Yorum: ertans

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.