Zufälliges Wort erstellen

Da fehlt eine Klammer -> Abgesehen davon zeigt Dir VisualStudio die syntaktischen Fehler in lesbarer Form an, wäre wohl gut, wenn Du mal die Fehlerbeschreibung hierher packst.

mfg chmee
 
Da haben wir uns wohl verpasst.
Ich hatte 2 Minuten zuvor meinen Beitrag Editiert und die Fehlermeldung hinzugefügt.

Die Zufallswort-Funktion gibt nicht für alle Codepfade einen Wert zurück. Wenn das Ergebnis verwendet wird, kann zur Laufzeit eine Nullverweisausnahme auftreten.

Und das mit der Klammer habe ich in meinem Projekt richtig. Warum diese im Beitrag nicht vorhanden ist ist mir ein Rästel.
Also nun nochmal mein Quellcode.

Function (Zufallswort):
Code:
        Dim rnd As New Random
       v = v & Chr(rnd.Next(65, 90))



Button_Click:
Code:
Zufallswort()

Ich würde mich über eine Antwort sehr freuen :)

PS:
v ist eine Char Variable

EDIT///
AHA
v muss eine String Variable sein
Problem gelöst =)
Danke an alle
 
Zuletzt bearbeitet:
Deine Funktion hat außerdem keinen Rückgabewert.
Entweder machst eine Sub draus:
Code:
Sub Zufallswort()
    Dim rnd As New Random
    v = v & Chr(rnd.Next(65, 90))
End Sub
oder du benutzt "return":
Code:
Function Zufallswort() As Char
    Dim rnd As New Random
    Return Chr(rnd.Next(65, 90))
End Function

Private Sub bGenerieren_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bGenerieren.Click
    TextBox1.Text &= Zufallswort()
End Sub
 

Neue Beiträge

Zurück