if then saat için kullanabilirmiyim
Tarih
06/07/2012 01:38
Konu Sahibi
zetyu
Yorumlar
2
Okunma
1222
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



zetyu
Aktif Üye
Kullanici Avatari
Aktif Üye
121
12/03/2009
0
Belirtilmemiş
Ofis XP
09/11/2016,20:42
Çö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.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.041
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,07:45
Çö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

Cevapla


zetyu
Aktif Üye
Kullanici Avatari
Aktif Üye
121
12/03/2009
0
Belirtilmemiş
Ofis XP
09/11/2016,20:42
Çözüldü 
Elinize sağlık.
Teşekkür ederim ilginize.
Konu kapanmıştır
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Tabloda ileriki hesaplamalar için kullanılmak üzere seçim yaptırmak nightashes 6 128 02/12/2016, 20:52 atoz112
  iş planı için termin tarihi belirleme brsknm 4 186 26/11/2016, 01:10 brsknm
  Evrak Kayıt uygulaması için nasıl bir yol izlemeliyim talebe10 7 231 06/11/2016, 13:57 atoz112
  Okullar İçin Evrak Kayıt-Takip Programı mehami 7 179 17/10/2016, 12:51 mehami
  Sorguda kriteri boş bırakma için yardım. okumas 3 174 24/09/2016, 11:43 okumas


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya