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 |
|
|
|
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 |
|
|
Frage zu Klassenprogrammierung |
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:
Trägheit |
Datum:
18.05.2021 15:38:43 |
Views:
531 |
Rating:
|
Antwort:
|
Thema:
Frage zu Klassenprogrammierung |
Supi.
Noch mal zum Vergleich:
'Klasse 'Auto1'
Option Explicit
'
Private m_intBaujahr As Integer
'
Public Property Get Baujahr() As Variant
Baujahr = m_intBaujahr
End Property
Public Property Let Baujahr(ByVal vNewValue As Variant)
m_intBaujahr = vNewValue
End Property
Verwendung:
auto1.Baujahr = 2021 'Property Let
If auto1.Baujahr = 2021 Then 'Property Get
Ich denke der Unterschied zu deiner Umsetung wird jetzt bereits sichtbar.
'Klasse 'Auto2'
Option Explicit
Dim alter As Integer '<- man sollte hier Private nutzen ... ist einfacher zu verstehen als Dim
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
Verwendung:
auto2.setAlter 10
If auto.getAlter() = 10 Then
|
- 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 |
|
|
|
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 |
|
|
Frage zu Klassenprogrammierung |
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 |
|
|