[size=2][color=#0000ff]Private [/color][/size][size=2][color=#0000ff]Sub[/color][/size][size=2] Button1_Click([/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] sender [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.Object, [/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] e [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.EventArgs) [/size][size=2][color=#0000ff]Handles[/color][/size][size=2] Button1.Click
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myAlphabet [/size][size=2][color=#0000ff]As [/color][/size][size=2][color=#0000ff]String[/color][/size][size=2] = "abcdefghijklmnopqrstuvwxyz" [color=teal]'you can add CAPITAL letters too[/color]
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myRandomLetter [/size][size=2][color=#0000ff]As [/color][/size][size=2][color=#0000ff]Char[/color][/size][size=2] = myAlphabet.Substring(getRandomNumber(0, 26), 1)
MessageBox.Show(myRandomLetter)
[/size][size=2][color=#0000ff]End [/color][/size][size=2][color=#0000ff]Sub[color=#000000]