[S] Hilfe bei Visual Basic Problem [B] 1 e*gold

[vdd]

Hi, ich bin gerade etwas verzweifelt und glaube das ich einfach nur ein paar "Brainlaggs" habe aber da ich einfach nicht raus bekomme möchte ich nun euch Fragen. Also...

Ich habe einen Button, wenn man ihn klickt soll sich sein Text von "Text 1" auf "Text 2" ändern.
Wenn man ihn wieder anklickt solln er den Text wieder von "Text 2" auf "Text 1" ändern.

Wer sagen kann wie das geht der bekommt 1 e*gold.

[.ReFleX]

Easy

If button1.click then
textbox1.text = textbox2.text

elseif

textbox2.text = textbox1.text
endif

Ich hoffe du meinst das

Das schreibst du in den Button1 rein.

MFG .ReFleX

[vdd]

Nein Ich meine den Text auf dem Button. Also Button1.Text soll per Klick von "Text 1" auf "Text 2" und von "Text 2" auf "Text 1" geändert werden.

[♣iShoKs™]

Bei dem Button Click event:

if Button1.Text = "Text 1" Then
Button1.text = "Text 2"
endif
if Button1.text = "Text 2" Then
Button1.text = "Text 1"
endif

sollte so gehen

[vdd]

Originally Posted by ♣iShoKs™

Bei dem Button Click event:



sollte so gehen

Funktioniert nicht :S

[.ReFleX]

Originally Posted by vooDooD

#push

Benutz einfach 2 Buttons, einer mit text1 und der 2te mit text 2.

Dann machst du einfach den 2ten Button in den eigenschaften "visible = true" und sobald man button 1 klickt wird button 2 sichtbar und wenn man button 2 klickt wird er wieder unsichtbar


Button1 click event

button2.visible = true


Button2 click event

button2.visible = false

Das ist glaube die einfachste Methode Bei Fragen add mich in Skype.


MFG .ReFleX


p.s. Warum geht die Methode von den anderen User nicht ?

[TacaFlow']

If Button1.Text = TextBox1.Text Then
Button1.Text = TextBox2.Text
ElseIf Button1.Text = TextBox2.Text Then
Button1.Text = TextBox1.Text
Else : Button1.Text = TextBox1.Text
End If

So Müsste es Klappen

[vdd]

Originally Posted by Kaidou.

So Müsste es Klappen

Nichts mit Textbox1 und Textbox2.

Der Text soll einfach so geändert werden.


@.ReFleX: Ja aber es müsste auch mit einem Button gehen.


€: Habs mit einem Label gelöst.

If Label1.Text = "1" Then
Button1.Text = "Text1"
Label1.Text = "2"

Else

Button1.Text = "Text2"
Label1.Text = "1"

End If