0 
Public Function random_key(ByVal lenght As Integer) As String
    Randomize()
    Dim s As New System.Text.StringBuilder("")
    Dim b() As Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz".ToCharArray()
    For i As Integer = 1 To lenght
        Randomize()
        Dim z As Integer = Int(((b.Length - 2) - 0 + 1) * Rnd()) + 1
        s.Append(b(z))
    Next
    Return s.ToString
    Console.WriteLine(s.ToString)

End Function

s=textbox1.text などのように印刷したい...

4

1 に答える 1

1

を使用して何が問題なのConsole.WriteLineですか?

return の背後にあるコードには到達できないため、メソッド内のreturnステートメントの背後に置くべきではないことに注意してください。

Dim random As String = random_key(10)
Console.WriteLine(random)
于 2012-05-23T14:23:58.490 に答える