VB.NET-Quellcode
- Public Class Form1
- Private Sub generieren_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles generieren.Click
- Randomize()
- Dim chart() As Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789".ToCharArray
- Dim pw As Integer = CInt(Int((chart * Rnd()) + 1))
- ergebnis.Text = pw
- End Sub
- End Class
Die Fehlermeldung lautet:
Der Wert vom Typ "1-dimensionales Array von Char" kann nicht in "Double" konvertiert werden.
Markiert wird hier:
Dim pw As Integer = CInt(Int((chart * Rnd()) + 1))
Danke für eure Hilfe