Birazdan yeni web sitemize yönlendirileceksiniz...!!
 ----
Eğer yönlendirilmezseniz "Yeni web sitemize gitmek için buraya tıklayın..."


Visual Basic Dersleri

Trafik Işıkları Kodu

Trafik Işıkları Kodu.

Visual Basicte trafik ışıkları yapma…3 button,1 groupbox ve 1tane timer.

trafik

Burada 3 button , 1 groupbox ve 1 tane timer kullanacağız resimdede göründüğü buttonların arka plan rengi belirli bir saniye yanıp daha sonra diğer buttona geçiyor ve hangi buttona geliyorsa groupbox ta o buttonun ne anlama geldiği yazıcak..

yapmaya başlayalım..

Timer1_Tick yazılacak Kodlar;


sayac = sayac + 1 If sayac > 45 Then sayac = 0 Select Case sayac Case 0 To 20 : Button1.BackColor = Color.FromArgb(255, 0, 0) Button2.BackColor = Color.Empty Button3.BackColor = Color.Empty GroupBox1.Text = "DUR" Button1.Text = 20 - sayac Button2.Text = (" ") Button3.Text = (" ") Case 21 To 25 : Button2.BackColor = Color.FromArgb(255, 255, 0) Button1.BackColor = Color.Empty Button3.BackColor = Color.Empty GroupBox1.Text = "HAZIRLAN" Button2.Text = 25 - sayac Button1.Text = (" ") Button3.Text = (" ") Case 26 To 45 : Button3.BackColor = Color.FromArgb(0, 255, 0) Button1.BackColor = Color.Empty Button2.BackColor = Color.Empty GroupBox1.Text = "GEÇ" Button3.Text = 45 - sayac Button1.Text = (" ") Button2.Text = (" ") End Select

Form1_Load yazılacak kod;

sayac = 0






Bu sayfa hakkında yorum ekle:
İsminiz:
E-mail adresiniz:
Siteniz:
Mesajın:

Bugün 25 ziyaretçikişi burdaydı!
=> Sen de ücretsiz bir internet sitesi kurmak ister misin? O zaman burayı tıkla! <=