[Allgemein] Wenn Button1 gedrückt, dann...

Beogradjanin

Registrierter Benutzer

Beiträge: 60

Dabei seit: 22. August 2010

Dienstag, 7. September 2010, 10:14

Wenn Button1 gedrückt, dann...

Guten Morgen, gibt es eine Möglichkeit eine IF-Abfrage für einen Button zu erstellen?

Also: Wenn Button 1 gedrückt, dann mache dies, ansonsten das.

Finde leider nichts passendes!

Vielen Dank im Voraus

Zum Seitenanfang

henny

Ego Dominus est - Nobis Servi sunt ;)

Beiträge: 494

Dabei seit: 2. August 2009

Hilfreich-Bewertungen: 8

Dienstag, 7. September 2010, 10:19

Du erstellst eine bool-Variable und setzt diese im Button_Click event auf true.
Dann kannst du die Variable überall abrufen

Zu meiner Homepage
Mein Youtubeblog, auch mit Vb-Tutorials

Zum Seitenanfang

Beogradjanin

Registrierter Benutzer

Beiträge: 60

Dabei seit: 22. August 2010

Dienstag, 7. September 2010, 10:41

Danke für den Tipp. Das Prinzip leuchtet mir ein, jedoch habe ich ein Problem dies in die Tat umzusetzen (ob's an der Müdigkeit liegt weiß ich nicht). Ich möchte gerne über zwei Textboxen die Felder vergleichen. In der zweiten Textbox soll ein Satz, und in der Ersten soll das gesuchte Wort enthalten sein.

Dies habe ich schon alles hinbekommen, nur möchte ich nicht, dass ein Stringvergleich stattfindet, wenn Textbox1 leer ist. Deshalb wollte ich dort eine Abfrage machen, wenn Button 1 gedrückt (und Textbox1 leer), dann Fehlermeldung.

In meiner Klasse deklariere ich die Variable mit:

Dim buttongedrueckt as boolean = false

In der Button1_Click (...) setze ich buttongedrueckt auf true.

Jetzt ist das weitere Vorgehen ein Problem, damit keine Endlosschleife entsteht. Müsste ich hier erst eine Funktion programmieren, die prüft, ob sich in Textbox1 etwas verändert hat, oder geht es auch einfach?

Zum Seitenanfang

henny

Ego Dominus est - Nobis Servi sunt ;)

Beiträge: 494

Dabei seit: 2. August 2009

Hilfreich-Bewertungen: 8

Dienstag, 7. September 2010, 10:49

sorry ganz verstehen tu ich dich ja nicht aber so??!

	Visual Basic Quellcode
1 2 3 4	If textbox1.text <> "" and Buttonisgedrueckt = false then buttonisgedrueckt = true ' ... end if

Zu meiner Homepage
Mein Youtubeblog, auch mit Vb-Tutorials

Zum Seitenanfang

Beogradjanin

Registrierter Benutzer

Beiträge: 60

Dabei seit: 22. August 2010

Dienstag, 7. September 2010, 10:57

Also, wenn oben z.B. TextBox1 leer ist, und der Button gedrückt wird, soll eine Messagebox mit einer Fehlermeldung erscheinen.

Zum Seitenanfang

timi257

dankeschöön :)*

Beiträge: 606

Hilfreich-Bewertungen: 10

Dienstag, 7. September 2010, 11:02

Dann schreibst du einfach ins Button1-Click-Event:

	Visual Basic Quellcode
1	if textbox1.text = "" then msgbox("in der oberen textbox steht nichts!")

Hey, ich wollte Ihnen nur mal Danke sagen

Weil ich einfach keinen Hunger hab! : )

Zum Seitenanfang

Beogradjanin

Registrierter Benutzer

Beiträge: 60

Dabei seit: 22. August 2010

Dienstag, 7. September 2010, 11:07

Ok... Ich Depp hab's raus

Ich habe einfach den Code von dir verwendet, und den restlichen Code in die Else-Anweisung gepackt. Also wenn LEER, dann Fehler, ELSE mache Anweisung.

Was für triviale Sachen jemanden am Morgen nicht einfallen

))

Zum Seitenanfang

timi257

dankeschöön :)*

Beiträge: 606

Hilfreich-Bewertungen: 10

Dienstag, 7. September 2010, 11:11

du kannst auch einfach den Sub abbrechen, wenn leer ist - dann musst du nicht alles andere in die Else-Anweisung schreiben...

Hey, ich wollte Ihnen nur mal Danke sagen

Weil ich einfach keinen Hunger hab! : )

Zum Seitenanfang

Beogradjanin

Registrierter Benutzer

Beiträge: 60

Dabei seit: 22. August 2010

Dienstag, 7. September 2010, 11:16

Meinste da an EXIT SUB?

An sich trifft die ELSE-Anweisung das, was ich will. Er soll ja danach etwas ausführen, was genau zu der Funtion gehört.

Danke noch einmal an alle Beteiligten.

Zum Seitenanfang

yonda

Registrierter Benutzer

Beiträge: 196

Dabei seit: 4. August 2010

Hilfreich-Bewertungen: 3

Dienstag, 7. September 2010, 13:39

Ja so

	Visual Basic Quellcode
1 2 3 4 5 6 7 8 9	if textbox1.text = "" then msgbox("in der oberen textbox steht nichts!") Exit Sub 'beendet hier die Abfrage Else 'Dein Code End If

Zum Seitenanfang

timi257

dankeschöön :)*

Beiträge: 606

Hilfreich-Bewertungen: 10

Dienstag, 7. September 2010, 13:45

Dann kannst du das Else eig. rauswerfen, oder? :huh:

	Visual Basic Quellcode
1 2 3 4 5 6	if textbox1.text = "" then msgbox("in der oberen textbox steht nichts!") Exit Sub 'beendet hier die Abfrage End If 'Dein Code

Und es gilt mal wieder:
Hauptsache, Beiträge gepusht-es hatte jeder verstanden, wie es funktionieren soll und dann postest du einfach nochmal den if-Code nur, dass du das Sub beendest, wenn nichts drinsteht und trotzdem noch eine Else-Anweisung lässt - schlimm..... :thumbdown:

DER HIER SOLLTE MITGELÖSCHT WERDEN!!

Hey, ich wollte Ihnen nur mal Danke sagen

Weil ich einfach keinen Hunger hab! : )

Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »timi257« (8. September 2010, 16:52)

Zum Seitenanfang

der_Kurt

Super Moderator

Beiträge: 1 746

Dabei seit: 25. Mai 2009

Wohnort: Wien

Hilfreich-Bewertungen: 235

Dienstag, 7. September 2010, 14:04

Die saubere Lösung wäre, den Button, der die Aktion auslöst, zu deaktivieren, wenn keine Aktion erfolgen soll:

	Visual Basic Quellcode
1 2 3	Private Sub txtSuchwert_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtSuchwert.TextChanged btSuche.Enabled = Not (CType(sender, TextBox).Text = "") End Sub

Damit der Button zu Beginn des Programms auch deaktiviert ist, die Enabled-Eigenschaft in der Load-Prozedur auf False setzen.

Dann kannst du im Button.Click-Event die eigentliche Aktion ausführen, ohne Überprüfung...

@timi257: Ich finde ein Exit Sub ohne Grund fast noch schlimmer als ein Else-Zweig, der ja noch gefüllt werden könnte. Auch deinen Beitrag könnte man als Post-Pusher missverstehen.

Neu bei VB? :: Wo fange ich an? :: Kennst du dein Arbeitswerkzeug? ::