VB.NET- Random String from a set

A Quick Code Snippet in VB.Net/ ASP.Net- Picks a random string from the set.

1Dim RandomNumber As Integer = RandomClass.Next(0, 3)
2Dim RandomString As String = {"red", "green", "yellow"}(RandomNumber)