[VBA Access2000] DefaultValue in een form

[J.Hollemans]

Ik heb een doorlopend formulier met een ComboBox.

Ik wil graag hebben, dat wanneer ik een keuze uit de
ComboBox maak, deze keuze als standaardwaarde wordt
ingesteld voor nieuwe records (die via het formulier
worden ingevoerd).

Ik heb de volgende code bij de Change event gebruikt:

code:

Private Sub ComboBoxName_Change()
    ComboBoxName.DefaultValue = ComboBoxName.Value
End Sub

Dit werkt helaas niet. De defaultvalue wordt wel gewijzigd
in de juiste waarde (gecontroleerd in debug-venster), maar
wordt niet weergegeven.

Dit is in een bestaande database. Ik ben een nieuwe database
begonnen om een beetje te rommellen, en daar werkt het wel

Zie ik een eigenschap over het hoofd of doe ik iets grandioos
verkeerd ?

[El_Quedro]

ik denk dat je een eigenschap verkeerd zit.:)
Probeer het eens met:

ComboBoxName.Text = ComboBoxName.Value


Grtz Y'All

[J.Hollemans]

Ik ben een nieuwe database begonnen om een beetje te rommellen,
en daar werkt het wel

Ik denk dat je in de war bent met VB. Ik heb het namelijk
over VBA voor Access2000, daar heeft een ComboBox meer
properties

[3volution]

[gokje]
Het zou kunnen dat je in je oude database een default-value hebt toegekend aan het onderliggende veld in de tabel waardoor de boel elke keer wordt overschreven.
[/gokje]

[J.Hollemans]

Opgelost....

De waarde die was opgeslagen is in de meeste gevallen een
numerieke waarde, soms is het echter ook een string-value.
Daarom heb ik het datatype string gebruikt in het desbetreffende
veld.

Als ik nu de DefaultValue op de geselecteerde waarde zet
en het is een numerieke waarde (bijv. "01003") wordt de
DefaultValue ook numeriek (1003 ipv. "01003").

Oplossing:

code:

ComboBoxName.DefaultValue = """" & ComboBox.Value & """"

Maar waar slaat dit op _{access... zucht}