Forum
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.
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