Skip to main content

AccessTr.neT


etiket kutusuna çıkış tarihine göre üçüncü bir rengin atanması

etiket kutusuna çıkış tarihine göre üçüncü bir rengin atanması

Çözüldü #1
Arkadaşlar,otel yönetim programında odaları gösteren etiket kutularım var bu etiketlerin gri renk boş,kırmızı dolu odaları göstermektedir.Ayrıca odanın çıkış tarihi olan yani o günkü tarih geldiğinde yeşil renge dönüşmesini nasıl sağlayabilirim.
Dosya yüklemeyi unutmuşum.
Ek Dosyalar
Otel Yönetim.rar(414.9 KB)
Son Düzenleme: 09/01/2012, 20:11, Düzenleyen: fascioğlu.
Cevapla
Çözüldü #2
Visual Basic Code
Sub KutuRenk()
On Error Resume Next
  
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    For i = 0 To Me.Liste363.ListCount - 1
        Controls("Etiket" & Me.Liste363.ItemData(i)).BackColor = 213
        Controls("Etiket" & Me.Liste363.ItemData(i)).ForeColor = 16777215
    Next
  If Me.ÇIKIŞ_TARİHİ = Date Then
        Controls("Etiket" & Me.ODA_NO).BackColor = vbGreen
        Controls("Etiket" & Me.ODA_NO).ForeColor = 16777215
       End If
End Sub

KONAKLAMA SÜRESİ, güncelleştirme sonrasında olayına

Visual Basic Code
call kuturenk
kodu ekle




"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. 
Cevapla
Çözüldü #3
Hocam önceki kodu kaldıracakmıyım.
Cevapla
Çözüldü #4
hocam ekledim çalışıyor ama bir sorun var,şöyleki çıkış tarihi oda noya geliyor yanı oysa örnektede görüleceği gibi çıkış tarinde kaç oda varsa boş dolu oda görünümü gibi yeşil olması gerekiyor.Saygılarımla
Ek Dosyalar
Otel Yönetim.rar(419.33 KB)
Cevapla
Çözüldü #5
Hocam yine beni unuttunuz,sanırım.
Cevapla
Çözüldü #6
Hocam soruma cevap alamadım henüz,ilgilenirseniz memnun olurum
Saygılarımla.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da