Skip to content

Instantly share code, notes, and snippets.

@jda0
Created December 12, 2013 17:35
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jda0/7932009 to your computer and use it in GitHub Desktop.
Save jda0/7932009 to your computer and use it in GitHub Desktop.
Public Class Form1
' Form Controls: Button BtnRed, Button BtnAmber, Button BtnGreen, TextBox TbxActor
Private Sub BtnRed_Click(sender As System.Object, e As System.EventArgs) Handles BtnRed.Click
TbxActor.BackColor = Color.Red
TbxActor.Text = "RED"
End Sub
Private Sub BtnAmber_Click(sender As System.Object, e As System.EventArgs) Handles BtnAmber.Click
TbxActor.BackColor = Color.Gold
TbxActor.Text = "AMBER"
End Sub
Private Sub BtnGreen_Click(sender As System.Object, e As System.EventArgs) Handles BtnGreen.Click
TbxActor.BackColor = Color.YellowGreen
TbxActor.Text = "GREEN"
End Sub
End Class
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment