Parametre i en funktion

Ikke så vidt jeg ved, men du kunne selvfølgelig have værdierne for cvx, acc, yield osv. gemt i et array.

Har man så nogen mulighed for at aflæse, hvorfra funktionen bliver kaldt?

Nej, så skal man selv indføre en ekstra parameter, så man ved kald forskellige steder kan aktivere den på forskellig måde. Så kan du selv til en vis grad indhente denne viden.
Funktionen "ved selv" hvorfra den er blevet kaldt, så den kan returnere det rigtige sted, men denne returadresse kan man ikke aflæse.

Du kan måske bruge ParamArray ;)


Private Sub Form_Load()
  Call WriteKeyFigures("Tekst", 123, 10.5, "Tekst 4")
End Sub

Public Sub WriteKeyFigures(ParamArray arrValue() As Variant)
Dim i As Integer
  For i = LBound(arrValue) To UBound(arrValue)
    MsgBox arrValue(i)
  Next
End Sub

Public Function WriteKeyFigures(bpv As Double, cvx As Double, acc As Double, yield As Double, rowNo As Integer, colNo As Integer)
Dim MyArray
MyArray = Array(bpv, cvx, acc, yield)
Range("sISin").Cells(rowNo, colNo).Offset(, 2).Resize(, 4) = MyArray
End Function

Hvorfor bruge en funktion og ikke en sub - du udnytter jo ikke det en funktion kan i forhld til en sub, så brug en sub i stedet (bare en kommentar fra sidelinien ;-)

enig, martin.

Hvad er det helt præcist en funktion kan i forhold til en sub (er helt ny til VB)?

En funktion kan returnere en værdi direkte.
Her er et eksempel: (jeg undlader at skrive public eller private i det følgende)

funtion F(x,y)
  F=x+y
end function

Nu kunne du et andet sted give ordren x=F(2,3)
og x ville så have værdien 5.

For at få en subrutine til at ændre på en variabel et andet sted, kan du overføre en variabel med en reference.

sub P(ByRef x)
  x=11
end sub

Hvis man nu giver ordren P(z), vil den variable z nu have værdien 11.

sub P(ByVal x)
  x=11
end sub

Så vil den variable z ikke påvirkes af ordren P(z)

Hvis man skriver

sub P(x)
  x=11
end Sub

vil Visual Basic underforstå at der er tale om en overførsel af typen ByRef i modsætning til alle andre programmerinssprog. (Det er ændret i VB.net)
Så nu vil P(z) resultere i at z bliver 11.

Spørg bare løs, hvis du vil vide mere.

kanon :)

Er der en metode, der afslutter kørslen af en sub fuldstændig? F.eks. hvis brugeren indtaster ugyldig data...

Ja, ordren
exit sub
vil resultere i at proceduren afsluttes, og der returneres til det sted, hvorfra den blev kaldt.

Hvad så med variable, der ikke længere er nødvendige? Jeg tænker på, om der findes noget i stil med:

delete myVar;

Lokale variable i en procedure forsvinder jo, når proceduren afsluttes.

Hvis man arbejder med klasser bliver tingene jo først til, når man instantierer et objekt.
Her kan man sætte et objekt til Nothing, når man er færdig med det.
Og så vil de variable i dette objekt ikke mere optage plads.

Globale variable kan man ikke få til at forsvinde.

Altså: Alle variabler (Integers, Real, Long, Date, String, ...) erklærere du med
  "Dim Variabelnavn As ..."
Når du er færdig med dem glemmer du dem - du skal ikke nedlægge dem.

Objekter instantierer du med
  "Set ObjektNavn = New ..."
Eller tilsvarende - New kan undlades hvis du gør noget andet, men SET bruges altid.

Når du er færdig med et objekt, sætter du Objektnavn = Nothing.

Hvis du er rimelig ny, kommer du nok ikke til at bruge objekter. Og dog - skal du bruge databaser, opretter du typisk et recordset, som er et objekt.

Summa sumarum - så længe du ikke bruger det lille ord SET skal du ikke bekymre dig om at slette variabler/objekter

Jeg foretager en del forespørgsler i diverse databaser, og derfor spurgte jeg ang.

myObj = Nothing

fordi det vil spare hukommelse i længden og dermed spare mig tid. Men hvad så med definition af klasser, tilhørende metoder og egenskaber?

Husk at skrive

Set myObj=Nothing

'Set' skal med, når der er tale om objekter.

Når vi begynder at tale om klasser, er pladsen her nok for snæver.
Så jeg vil afstå fra at skrive noget om det.
Du burde nok anskaffe en bog om disse ting.

Men du kan da se lidt her:

http://www.developerfusion.com/show/3959/

Må hellere få lukket det her spørgsmål, og siger tusind tak for hjælpen! :)

nmh: Hvis du vil have ekstra point, så siger du bare til.

Jeg siger da ikke nej til lidt point, ;o)

Du skal svare på http://www.eksperten.dk/spm/484655 :)

Har ledt en del, men kan ikke finde en modulus-operator i VB. Findes der ikke sådan en operator, der returnerer resten ved division?

Modulus operator:
x=15 Mod 4

Nu er x lig med 3

Du kan også benytte heltalsdivision:

x=15-(15\4)*4

det er det samme som 15 Mod 4

Kanon, det var lige det, jeg skulle bruge

Det var godt. Har du flere af den slags små spørgsmål, så kom bare med dem her.

Vil jeg gøre :)