怎么产生A-Z的随机数

求助：如何产生A-Z的随机数？
如题：如何产生A-Z的随机字母？

[解决办法]
Dim r As Random = New Random()
Dim s As Char = Chr(r.Next(65, 91))