Archiv verlassen und diese Seite im Standarddesign anzeigen : [vb.net] einfache frage!
Hallo ich bin totaler vb.net anfänger naja jezz zu meiner frage:
Also ich habe einen Button und eine Textbox
jetzt will ich das wen ich auf "Button" klicke entweder "1123" oder "1241" oder..
steht ich habe es mal so versucht
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = "123456" Or "12314" ...
hat aber nicht geklapt hat einer eine lösung?
Versuchs mal mit
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim random As Short
Randomize()
random = Rand(1, 2)
Select random
Case Is = 1
TextBox1.Text = "123456"
Case Is = 2
TextBox1.Text = "654321"
End Select
End Sub
hmm ich habe jetzt
Dim random As Short
Randomize()
random = random(1, 2)
Select random
Case Is = 1
TextBox1.Text = "123456"
Case Is = 2
TextBox1.Text = "654321"
ausprobirt aber dan kam beim debuggen immer folgende fehlermeldungen
Fehler 1 Der Ausdruck ist kein Array oder keine Methode, und kann keine Argumentliste haben. C:\Dokumente und Einstellungen\ich\Lokale Einstellungen\Anwendungsdaten\Temporary Projects\WindowsApplication1\Form1.vb 9 18 WindowsApplication1
und
Fehler 2 "Select Case" muss mit einer entsprechenden "End Select"-Anweisung enden. C:\Dokumente und Einstellungen\ich\Lokale Einstellungen\Anwendungsdaten\Temporary Projects\WindowsApplication1\Form1.vb 15 13 WindowsApplication1
pls help!
hmm ich habe jetzt
Code:
Dim random As Short
Randomize()
random = random(1, 2)
Select random
Case Is = 1
TextBox1.Text = "123456"
Case Is = 2
TextBox1.Text = "654321"
Shreib mal
End Select
dahinter,dann sollter Fehler 2 schonmal weg sein.
Zu Fehler 1:
Poste mal deinen GANZEN Source Code
thx fehler 2 ist weg
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim random As Short
Randomize()
random = random(1, 2)
Select random
Case Is = 1
TextBox1.Text = "123456"
Case Is = 2
TextBox1.Text = "654321"
End Select
End Sub
End Class
wegen dem ersten Fehler
dem wert random ist noch keine Funktion zugewiesen , kann von daher also gar nicht funktionieren
Public Function Rand(ByVal Low As Integer, ByVal High As Integer) As Integer
Rand = Int((High - Low + 1) * Rnd()) + Low
End Function
und hier müsste es heißen
random = Rand(1, 2)
MfG
sry the papst deine erklärung verstehe ich nicht aber trozdem thx
ich bin jetzt immernoch an dem problem
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim random As Short
random = Rand(1, 2)
Select random
Case Is = 1
TextBox1.Text = "123456"
Case Is = 2
TextBox1.Text = "654321"
End Select
End Sub
End Class
Fehler 1 Der Name "Rand" wurde nicht deklariert. C:\Dokumente und Einstellungen\ich\Lokale Einstellungen\Anwendungsdaten\Temporary Projects\WindowsApplication1\Form1.vb 6 18 WindowsApplication1
wie soll ich jetzt den befehl Rand deklairen oder ist der befehl überhaupt richtig?
Public Function Rand(ByVal Low As Integer, ByVal High As Integer) As Integer
Rand = Int((High - Low + 1) * Rnd()) + Low
End Function
mach das mal i Source nach gaaaaaanz oben oder unten , damit es deinen source nich durcheinander bringt ;)
danke Gumbal jetzt geht es hat mich echt weiter gebracht!
Und wenn du mehrere Cases hast:
Beispiel
10 Cases
Dann musse bei Rand in den Klammern schreiben (1, 10) , you know ? ;)
wenn du das nicht verstehst solltest du es vll lassen
ich bin mir auch nicht wirklich sicher ob ihr beide den source versteht , den Gumbal hat nichtmal die Funktion gepostet um eine zufallszahl in einem vordefinierten Bereich zu generieren
kann mir nicht vorstellen das er das vergessen hat , wenn man gut vb kann und den source versteht sollte das einem schon auffallen
und @ T-Slide
kurz gesagt:
die Funktion Rand dient dazu eine Zufallszahl zu generieren
du weist dann der Funktion rand einen wert zu , in dem Fall nämlich 1,3 das heißt also es wird eine Zahl von 1-3 generiert
danach wird ein Case mit der Zahl gewählt
somit steht in deiner Textbox immer ein anderer wert
hoffe du hast es wenigstens verstanden , denn der source allein bringt einem nicht viel
MfG
ja thx für deine hilfe habe es jetzt begriffen und auch erfolgreich ausgefürt!
Powered by vBulletin® Copyright ©2024 Adduco Digital e.K. und vBulletin Solutions, Inc. Alle Rechte vorbehalten.