How to Create a Simple Traffic Lights in VB.net

Submitted by: 
Visitors have accessed this post 273 times.

The tutorial that I’m going to teach you today is about creating a simple traffic lights in VB.Net. This is a simple program that can be done in an hour or less. A time interval is set in this program so it will work like the actual traffic lights. To see how it works, use the following code below.

Creating Application

Step 1

Open Microsoft Visual Basic 2015 and create a new windows form application.
trafic123

Step 2

Do the form just like shown below.
trafic231

Step 3

Double click the timer to fire the tick event handler of it. Then, add the following codes for changing the traffic lights.

  1. Select Case Cnt
  2. Case 0
  3. If Timer1.Interval = 2000 Then
  4. TextBox1.BackColor = Color.White
  5. TextBox2.BackColor = Color.White
  6. TextBox3.BackColor = Color.FromArgb(0, 255, 0)
  7.  
  8. Cnt = 1
  9. Else
  10. Timer1.Interval = Timer1.Interval + 200
  11. End If
  12. Case 1
  13.  
  14. If Timer1.Interval = 3000 Then
  15. TextBox3.BackColor = Color.White
  16. TextBox2.BackColor = Color.White
  17. TextBox1.BackColor = Color.FromArgb(255, 0, 0)
  18. Timer1.Interval = 1000
  19. Cnt = 2
  20. Else
  21. Timer1.Interval = Timer1.Interval + 200
  22. End If
  23. Case 2
  24. If Timer1.Interval = 4000 Then
  25. TextBox3.BackColor = Color.White
  26. TextBox1.BackColor = Color.White
  27. TextBox2.BackColor = Color.Yellow
  28. Timer1.Interval = 1000
  29. Cnt = 0
  30. Else
  31. Timer1.Interval = Timer1.Interval + 200
  32. End If
  33.  
  34.  
  35. End Select
  36. Me.Text = Now()

Step 4

Do the following codes to start changing traffic lights when the button is clicked.

  1.  
  2. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  3. Cnt = 0
  4. Timer1.Start()
  5. Timer1.Interval = 2000
  6. End Sub

For any questions about this article. You can contact me @

Email – [email protected]
Mobile No. – 09305235027 – TNT
Or feel free to comment below.


Add new comment

Filtered HTML

  • Web page addresses and e-mail addresses turn into links automatically.
  • You may insert videos with [video:URL]
  • Allowed HTML tags: <a> <em> <strong> <cite> <blockquote> <code> <ul> <ol> <li> <dl> <dt> <dd> <table> <tr> <td> <th> <img> <h1> <h2> <h3> <iframe> [video]
  • You can enable syntax highlighting of source code with the following tags: <code>, <blockcode>, <asp>, <c>, <cpp>, <csharp>, <css>, <html4strict>, <java>, <javascript>, <mysql>, <php>, <python>, <sql>, <vb>, <vbnet>. The supported tag styles are: <foo>, [foo].
  • Lines and paragraphs break automatically.

Plain text

  • No HTML tags allowed.
  • Lines and paragraphs break automatically.
CAPTCHA
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.