Merhaba.
Ekteki örneğimde Form4'te Command1,2,3..7 şeklinde butonlar var. Bu butonlardan hangisine tıklanırsa o butondaki yazının periyodik olarak görünür-görünmez olması hakkında değerli yardımlarınızı rica ederim.
NOT: Ben forumdaki aramalarımla birşeyleri uyarlamaya çalıştım ama yapamadım.
Saygı ve selamlarımla.
Merhabalar,
eklediğiniz örnekte Form3 diye bir form yok.
Form4 var gizleme kodu
Me.butonunadı.Visible = False 'gizleme kodu
Me.butonunadı.Visible = False 'gösterme kodu
Afedersiniz, Form4 olacaktı. İlk mesajımda da düzenledim.
Merhaba.
Yanıp sönme (yazının görünür-görünmez olması) olayında bir yol alamadım..
En azından tıklanan butondaki yazı renginin değişmesi için aşağıdaki gibi bir işlem yapmaya çalışıyorum ama yapamadım. Yardımcı olabilir misiniz?
Teşekkürler.
Private Sub Text0_AfterUpdate()
For x = 1 To 7
If Me.Controls("Command" & x).Caption = Format(Text0, "dd.mm.yyyy") Then
Me.Controls("Command" & x).ForeColor = vbRed
End If
Next
End Sub
Yapılmasını istediğiniz tek şey, yukardaki Pazartesi-Salı biçiminde en üstte olan butonlara tıklandığında, içindeki yazının görünür olması, diğerlerinin ise görünmemesi mi? Tam olarak bu yapılırsa, butonların üzerindeki yazılar görünmediği ya da buton görünmediği için sorun olmayacak mı? Biraz daha açıklar mısınız? Sanırım ben yanlış anlıyorum bu isteğinizi... Bir de yukarda bir sıra buton var, altlarında da metin kutuları var. Onunla ilgili de açıklama yapar mısınız?
Hocam öncelikle ilginize teşekkür ederim.
Ekte yapmak istediğimi gösteren örneği ekliyorum. Burada fark edeceksiniz ki, yazı renk değişimi butonlara tıklanınca yordamlarında yazılı. Her bir buton yordamında aynı kodlar var. Ben bu kodlamayı teke indirmek mümkün mü onu merak ettim. Yani text0 güncellendikten sonra çalışacak bir for-next döngüsü nasıl olabilirin peşindeyim.
Yukarıdaki açıklamalarımla son sorunuza kadar olan sorularınızı cevapladığımı umuyorum. Son sorunuz hakkında da şu şekilde açıklama getireyim...
Hafta değeri güncellendikten sonra butonlar üzerindeki tarihler değişiyor. Altta da bu tarihlerin günlerini (sabit olsa da) belirttim. Bugünü belirten koşulu buton rengini griden başka bir renge değiştirmesi şeklinde yazamadığımdan alttaki etikette olduğumuz günü kırmızıya boyattım..
Saygı ve selamlarımla.