Hallo,

ich suche eine Möglichkeit, mit der ich Variablen aus einer Klasse in eine andere übergeben kann. Ich steig da nicht so ganz durch. Die muss irgendwie Public sein und in Modulen definiert werden, vielleicht auch mit Static oder so, jedenfalls funzt das net, was ich bisher probiert habe. Kennt sich noch jemand damit aus?

Private Sub Klasse1

dim variable as Integer

variable= 1

End Sub

Private Sub Klasse2

MsgBox variable 'Hier soll der variablenwert von Klasse1 drinstehen, ist aber leer, da _

                 End Sub alle Variablen leert

End Sub

Danke!

Moin !

du mußt dann die Variable am Anfang des Quellcodes deklarieren, noch bevor die Klassen anfangen, z.B. so:

Option Compare Database

Dim rappelzappel As String

Private Sub button1_Click()

rappelzappel = "Huhuhuhu"

End Sub

Private Sub button2_Click()

MsgBox rappelzappel

End Sub

Die Variable behält den Wert dann solange bis Du das Formular schliesst.

gruß

Christian

Hi,

also das mit dem deklarieren oben im otion database bereich fuktioniert, aber die Variable behält ihren Inhalt trotzdem nicht... Ich habe auch die beiden Prozeduren nicht mehr Private Sub sondern Public Sub genannt, leider gehts trotzdem nicht. Ich glaube in der Hilfe gelesen zu haben, dass End Sub die Variablen leert.

Muss man die nicht irgendwie explizit übergeben, z.B. in der Prozedurtitelzeile?

z.B. Public Sub Test1(rappelzappel)

blabla

End Sub

oder so ähnlich?

rappelzappel is cool :D

Gruß

danke @ hades fürs Ändern. Das Problem da oben is leider imma noch nicht gelöst.

Deklarierst du die Variablen in der SUB noch einmal oder nur oben im Option Explecit

eigentlich nur oben, denke ich

EDIT: Ich hab grad nochmal reingeschaut, es war ein saudummer Schreibfehler

text_num hieß die Variable, dann is klar, warums net gehen kann.

Aber die Tipps mit dem Deklarieren oben in der Option-compare zeile haben sehr geholfen. Danke!