[VBA] Variabelen naar nieuw form doorsturen

[Thunk]

In een subform, heb ik deze dingen:

Private Sub cmdContinue_Click()
NewProdt.Naam = txtNaam.Text
NewProdt.Desc = txtDesc.Text
NewProdt.Code = txtCode.Text
NewProdt.Stck = txtStck.Text
NewProdt.Supp = txtSupp.Text
frmAddProdt2.Enabled = True
frmAddProdt2.Show
frmAddProdt.Hide

In dit nieuwe form komt nog een vergelijking met waardes in een datafile, en dan moet je daar nog iets invullen, en uiteindelijk moet alles bij elkaar weggeschreven worden.
Onthoudt VBA deze variabelen naar het nieuwe form?

Of moet je met een speciale manier NewProdt.Naam etc doorgeven aan het nieuwe form?

[ATS]

Wat is newprod voor een object? Dat is me niet echt duidelijk hier. Je kan variabelen laten onthouden door ze Global te maken in een module declaratie, maar dat moet je als het even kan zien te voorkomen. Je gaat uiteindelijk jezelf voor de voeten lopen met Globals. Blijft over dat je gewoon het nieuwe form een property geeft die je set vanuit het oude form.
Of snap ik je vraag niet goed?

[dusty]

Wat heb je zelf al geprobeerd of probeer je ons nu gewoon als helpdesk te gebruiken?

[Thunk]

Ik wil in het hoofdscherm een product toevoegen aan een datafile.
Daarvoor klik ik op Add Product en het nieuwe form wordt geladen.

Dan wil ik alles invullen en weer terugsturen in de datafile.

Ik ga het anders doen dan ik net vroeg, 2 toevoegforms moet je te veel doorsturen en lijkt me erg foutgevoelig en requires nogal veel extra routines.
Ga het eerst is zo proberen.

[Thunk]

Op maandag 03 juni 2002 21:09 schreef dusty het volgende:
Wat heb je zelf al geprobeerd of probeer je ons nu gewoon als helpdesk te gebruiken?

Heb al een hoop zelf geprobeerd.. wees maar niet bang.

[dusty]

Op maandag 03 juni 2002 21:11 schreef 0px het volgende:
[..]
Heb al een hoop zelf geprobeerd.. wees maar niet bang.

Zoals wat?

[Thunk]

dingen public maken, hele routines kopieren naar nieuwe form, etc

moet ik mezelf nou gaan bewijzen voor je? niet lullig bedoeld, maar als je geen zin heb om ff te helpen reageer dan gewoon niet?
ga nou ajb niet de topic dichtgooien om dat ik dat zeg, is algemene opmerking verder nix mee bedoeld.

[Thunk]

Tis allemaal bijna gelukt
Ik heb alleen deze dingen en die wil ik in een nieuw form oproepen:

txtNaam.Text = RTrim$(Supply(SProdt).Naam)

Sprodt = selected product
Dat wordt allemaal gedefineerd in het hoofdscherm...
maar dat pakt ie gewoon niet.. hoe kan ik dat oplossen

[ATS]

Ik begrijp werkelijk niet wat je nou wil.
Even op een rijtje zetten:
Je hebt een systeem in VBA, waarbij je een knop heb op formulier A met AddProduct. Die knop opent een dialoogvenster B waarin je iets over dat product kan invoeren. Bij het sluiten van het dialoogvenster moeten de ingevoerde gegevens beschikbaar gemaakt worden in een ander formulier (weer A?) Klopt dit?
Dan de vraag: hoe heb je je gegevens over het nieuwe product opgeslagen? In je eerste posting leek het erop dat je een object had gemaakt voor producten waarin alle eigenschappen opgeslagen kunnen worden. Dat is op zich een heel goede manier.... Maargoed, later lijkt het dat je het toch simpeler aan wil pakken.

Als je gewoon een textbox in een ander formulier wil benaderen, dan moet je behave de naam van de tekstbox ook de naam van het formulier gebruiken:

code:

Forms("FormulierA").MyTargetTextBox=MyValue

Brengt dat je verder op weg? Zo niet, dan zal je je vraag toch wat duidelijker moeten formuleren vrees ik....

[Thunk]

Dat is wat ik wou ja. Ik zal eerst even kijken of dat me verder op weg helpt. Alvast bedankt, hopend dat t zal werken

[Thunk]

Forms("frmChangeProdt").txtNaam.Text = RTrim$(Supply(SProdt).Naam)

Ik werk in VBA.. bij FORMS zegt ie: Sub of Function not defined werkt dan zeker alleen in VB?

[whoami]

Heb je eigenlijk al ooit eens de moeite genomen om een boek/manual of tutorial door te nemen?

[NetForce1]

Op dinsdag 04 juni 2002 12:05 schreef 0px het volgende:
Forms("frmChangeProdt").txtNaam.Text = RTrim$(Supply(SProdt).Naam)

Ik werk in VBA.. bij FORMS zegt ie: Sub of Function not defined werkt dan zeker alleen in VB?

Kun je niet zeggen frmChangeProdt.txtNaam.Text?
Zo spreek ik iig een sub in een ander form aan.

[Thunk]

Op dinsdag 04 juni 2002 12:16 schreef whoami het volgende:
Heb je eigenlijk al ooit eens de moeite genomen om een boek/manual of tutorial door te nemen?

ja