Skicka combobox som inparameter till procedur

1 svar · 357 visningar · startad av d_jonsson 14 sep. 2001

d_jonssonMedlem sedan mars 200113 inlägg

Frågan14 sep. 2001 11:25#1

Hur skickar man ett Combobox-objekt (som finns på ett formulär) som inparameter till en funktion?

ex: Proceduren "Proc1" tar en inparameter som är en combobox:
Private Sub Proc1(cboBox as Combobox)
' gör nåt med cboBox (som ju skickades med "By Reference)
End Sub

anropar man denna procedur med följande kod, så blir det fel, eftersom det är comboboxens värde och inte själva combobox-objektet som skickas:

Proc1(Me.cboKombinationsruta)

Hur gör man fgör att skicka objekltet, och inte dess aktuella värde?

fredrikMedlem sedan dec. 19991 072 inlägg

17 sep. 2001 09:59#2

Felet ligger snarare i hur du gör anropet till proceduren.

Om du ska använda paranteser när du ropar på subben måste du skriva "call" framför:
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
call proc1(me.combo1)

annars för du skippa paranteserna:
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
proc1 me.combo1

Objektet skickas alltså som ett objekt och inte med dess värde.

------------------
Fredrik Klarqvist
f.klarqvist@spray.se
http://server.webwerkstaden.se/fredde/