Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
18.05.2021 11:45:45 |
KaKaKa |
|
|
|
18.05.2021 12:32:14 |
Mase |
|
|
|
18.05.2021 12:52:40 |
KaKaKa |
|
|
|
18.05.2021 13:19:55 |
Trägheit |
|
|
Frage zu Klassenprogrammierung |
18.05.2021 13:39:57 |
KaKaKa |
|
|
|
18.05.2021 13:51:09 |
Trägheit |
|
|
|
18.05.2021 14:10:47 |
KaKaKa |
|
|
|
18.05.2021 14:27:51 |
Trägheit |
|
|
|
18.05.2021 14:50:30 |
KaKaKa |
|
|
|
18.05.2021 15:38:43 |
Trägheit |
|
|
|
18.05.2021 15:44:30 |
Mase |
|
|
|
18.05.2021 15:48:17 |
Trägheit |
|
|
|
18.05.2021 17:08:46 |
KaKaKa |
|
|
|
18.05.2021 17:16:14 |
Gast91440 |
|
|
|
18.05.2021 19:09:11 |
xlKing |
|
|
|
18.05.2021 19:32:51 |
Gast75132 |
|
|
|
18.05.2021 19:51:25 |
xlKing |
|
|
|
18.05.2021 20:07:17 |
xlKing |
|
|
|
19.05.2021 07:12:28 |
KaKaKa |
|
|
|
19.05.2021 18:30:44 |
xlKing |
|
|
|
20.05.2021 11:59:26 |
KaKaKa |
|
|
Von:
KaKaKa |
Datum:
18.05.2021 13:39:57 |
Views:
515 |
Rating:
|
Antwort:
|
Thema:
Frage zu Klassenprogrammierung |
Lasse ich aber das Set und Let wie in meinem Beispiel weg, ist es aber dennoch möglich darauf zuzugreifen - über ganz normale Methoden und Funktionen.
Beispiel. Klassenmodul "myClass":
Option Explicit
Dim alter As Integer
Public Function getAlter() As Integer
getAlter = alter
End Function
Public Sub setALter(iAlter As Integer)
alter = iAlter
End Sub
Private Sub Class_Initialize()
alter = 10
End Sub
Modul1:
Option Explicit
Sub programm()
Dim Class1 As myClass
Set Class1 = New myClass
MsgBox (Class1.getAlter) 'gibt 10 aus
Class1.setALter (22) 'setzt den Wert auf 22
MsgBox (Class1.getAlter) 'gibt 22 aus
End Sub
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
|
18.05.2021 11:45:45 |
KaKaKa |
|
|
|
18.05.2021 12:32:14 |
Mase |
|
|
|
18.05.2021 12:52:40 |
KaKaKa |
|
|
|
18.05.2021 13:19:55 |
Trägheit |
|
|
Frage zu Klassenprogrammierung |
18.05.2021 13:39:57 |
KaKaKa |
|
|
|
18.05.2021 13:51:09 |
Trägheit |
|
|
|
18.05.2021 14:10:47 |
KaKaKa |
|
|
|
18.05.2021 14:27:51 |
Trägheit |
|
|
|
18.05.2021 14:50:30 |
KaKaKa |
|
|
|
18.05.2021 15:38:43 |
Trägheit |
|
|
|
18.05.2021 15:44:30 |
Mase |
|
|
|
18.05.2021 15:48:17 |
Trägheit |
|
|
|
18.05.2021 17:08:46 |
KaKaKa |
|
|
|
18.05.2021 17:16:14 |
Gast91440 |
|
|
|
18.05.2021 19:09:11 |
xlKing |
|
|
|
18.05.2021 19:32:51 |
Gast75132 |
|
|
|
18.05.2021 19:51:25 |
xlKing |
|
|
|
18.05.2021 20:07:17 |
xlKing |
|
|
|
19.05.2021 07:12:28 |
KaKaKa |
|
|
|
19.05.2021 18:30:44 |
xlKing |
|
|
|
20.05.2021 11:59:26 |
KaKaKa |
|
|