May I know what is the reason that I'm not able to access the character in the array? Is there a way to solve this problem or I've made a small mistake?

' Generate Random Caps Characters
Private Function randomCaps() As Char
Dim charCapsArr() As Char = "A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"}
Dim randNum As Integer
Dim rn As Random
randNum = rn.Next(0, 25)
randomCaps = charCapsArr(randNum)
Return randomCaps
End Function