Thema Datum  Von Nutzer Rating
Antwort
Rot Subs zusammenfassen
 08.11.2016 09:28:11 Christian Meyer
NotSolved
09.11.2016 19:18:56 Gast36670
NotSolved

Ansicht des Beitrags:
Von:
Christian Meyer		 Datum:
08.11.2016 09:28:11		 Views:
1172		 Rating:
     
Antwort:
  Ja
Thema:
Subs zusammenfassen

Hallo.

Ich habe mehrere Subs. Diese sind click Events und sollen natrüclih auch nur ausgeführt werden, wenn geklickt wird.  Ich möchte diese allerdings nicht alle extra implementieren sondern gerne über eine for schleife aufrufen.

Private Sub CheckBox0_Change()
...hier ist der gleiche code wie hier*
End Sub
 
Private Sub CheckBox1_Change()
*gleicher Code...
End Sub
 
I Prinzip so:
 
Dim i as Integer
 
For i = 0 to 10
 
Private Sub ((CheckBox) & i)_Change()
Code....
End Sub
 
next i

 

 

Hat jmd eine Idee?

Danke"!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Subs zusammenfassen
 08.11.2016 09:28:11 Christian Meyer
NotSolved
09.11.2016 19:18:56 Gast36670
NotSolved