El que me salta es este
Código
#Const key1 = " c2FkZjg3NjhxdzRoa2psZnNkODk3eTgzNCZzODkyISQltyJTRCK3JVNERnNhZGY0d2U " #Const key2 = " aHNkbGtmamhsYXNpNzg5NDM1M7ckJV+3JDMkJVa3JbckIDMsIbc0LTU0NTZ+I36sMrcltyQlMw " #Const key3 = " JSS3JSYkJSK3JEO3Ika3VkJTRSUmQiQlJi8lJCZDICIzcjIzY2xra2huZnJrZXcytyQlJCUmLyQlamlqaWo " Public Function srandom() ---> La instrucción no es valida en un espacio de nombres Dim dim1 As String Dim dim2 As Integer p**a = key1 + key2 + key3 For warra = 1 To 50 srandom = srandom & Mid$(p**a, Int((Rnd() * Len(p**a)) + 1), 1) Next warra End Function Public Class Form ...
Y mas adelante cuando llamo a srandom, me pone que no esta declarado o que es inaccesible.