Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: "Spin-Button" !?
Autor: Nick
Datum: 03.10.02 10:43
Hi, wenn Du den SpinButton doppelklickst kommst Du ja in den Quelltext. Wenn Du dann oben rechts auf die Listbox klickst geht das auswahlmenü für den SpinButton auf. Dort gibt es es dann KeyDown und KeyUp für runter und hochscrollen. Da mußt Du das einsetzen. Oder nenn einfach den SpinButton SpinButton1 und das Textfeld Text1 und füge einfach den folgenen Quelltext ein. Private Sub SpinButton1_KeyDown(KeyCode As MSForms.ReturnInteger, Shift As Integer) Text1.text = Text1.text+1 End Sub Private Sub SpinButton1_KeyUp(KeyCode As MSForms.ReturnInteger, Shift As Integer) If Text1.text > 1 Then Text1.text = Text1.text-1 Else MsgBox "Zahl darf nicht 0 oder kleiner werden!" End if End Sub Gruß Nick

"Spin-Button" !?	106	Jens	23.09.02 10:52
Re: "Spin-Button" !?	71	Nick	23.09.02 18:15
Re: "Spin-Button" !?	66	Jens	02.10.02 08:45
Re: "Spin-Button" !?	71	Nick	03.10.02 10:43
Re: "Spin-Button" !?	2.002	jensnrw	21.10.02 11:00

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen