Forum

VB ile 27 butonun r...
 
Bildirimler
Hepsini Temizle

VB ile 27 butonun rengini kontrollü değiştirme

2 Yazılar
2 Üyeler
0 Reactions
627 Görüntüleme
(@Anonim)
Gönderiler: 0
Konu başlatıcı
 

Merhaba , 

Visual basic 6.0 da bir masa rezervasyon programı ile uğraşıyorum. 

Basitçe şöyle anlatmak istiyorum. Form üzerinde işletmedeki masa düzenini temsilen 30 tane buton var ve her button bir masa olarak görünüyor. 

Masa1 'e  tıklandığında , jamies adlı DB'ye bağlanıp ordaki bilgileri çekerek, eğer masa üzerinde rezervasyon var ise, textbox'lar üzerinde rezerve bilgileri görünüyor. 

Masa2-masa3 ...... Masa30'a kadar herhangi bir sorunum yok DB ile ilgili. 
Yapmak istediğim şey şu;

Form_Load olayına ekleyeceğim bir döngü ile bu 30 buton için veritabanındaki "Masa" alanını kontrol ettirip, eğer burada bir değer var ise buton renginin kırmızı, değer yok ise buton renginin yeşil olmasını istiyorum. For each ile bütün command'ların rengini değiştirebiliyoruz ama benim istediğim o şekilde değil.

for i=1 to 30 step 1

if data1.recordset("masa")= i then

command(i).backcolor=red

else 

Command(i).backcolor =green 

end if
next

tarzı bir döngü aradığım fakat ben burada command'in yanına i'nin değerini ekletemiyorum. Yardımcı olursanız sevinirim.

 
Gönderildi : 12/10/2015 12:41

(@eravse)
Gönderiler: 1753
Üye
 

merhaba zannedersem su sekılde eklemenız gerekıyor.  Me.Controls("Button" & i).BackColor = Color.Blue bır denermısınız ?

ProfectSoft Yazılım ve Danışmanlık Hizmetleri
LogPusher & Bifyou E-Commerce System
www.profectsoft.com

 
Gönderildi : 13/10/2015 13:06

Paylaş: