Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

valore predefinito casella combinata

203 views
Skip to first unread message

pop...@gmail.com

unread,
Jul 30, 2009, 7:38:37 AM7/30/09
to
salve a tutti.. ho un problema (probabilmente stupido) con una casella
combinata.
da un pulsante apro una maschera per inserire un nuovo record,
passando un valore:

Dim cat As Integer
cat = Me.id_link_cat
DoCmd.OpenForm "link_scheda", acNormal, , , acFormAdd, , cat

in questa maschera ho una casella combinata [settore] collegata
all'elenco delle categorie:
origine riga: SELECT [link_cat].[id_link_cat], [link_cat].[link_cat]
FROM [link_cat] ORDER BY [link_cat];
(con due colonne, la prima nascosata con l'id e la seconda con la
descrizione)

vorrei che all'apertura della maschera, se esiste una variabile in
openargs, la casella combinate avesse come valore predefinito il
valore passato:

Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
Dim valore As Integer
valore = Me.OpenArgs
Me.Settore.DefaultValue = valore
End If
End Sub

Alessandro Cara

unread,
Jul 30, 2009, 8:01:48 AM7/30/09
to
francesco...@tele2.it ha scritto:
Il codice sembra corretto anche se io avrei scritto semplicemente
Sub Form_Open(Cancel As Integer)
Me!Settore.DefaultValue = "" & me.openargs
exit sub

e forse usato l'evento load
--
ac

pop...@gmail.com

unread,
Jul 30, 2009, 9:27:56 AM7/30/09
to
:))

effettivamenteil codice funziona, scivevo me.settore (nome origine
controllo) invece che il nome della casella combinata..:/.. scusate

ps.. comunque funziona solo sull'evento open, e non su load

grazie a tutti

0 new messages