Avatar billede hynne Nybegynder
31. oktober 2002 - 13:09 Der er 2 kommentarer og
1 løsning

ByRef virker tilsyneladende ikke i VBA (Word 2000)

Hvis jeg kører nedenstående demo, burde kaldet til funkRef vel ændre 'tal' til 10? Der er tilsyneladende ingen forskel på de to kald?

Sub ref()
  Dim tal As Integer
  Dim før As Integer
  Dim efter As Integer
 
  tal = 5
  før = tal
  funkVal (tal)
  MsgBox "Før: " & før & Chr(13) & "Efter: " & tal, vbOKOnly, "Resultat af ByRef"
  funkRef (tal)
  MsgBox "Før: " & før & Chr(13) & "Efter: " & tal, vbOKOnly, "Resultat af ByRef"
 
End Sub

Sub funkRef(ByRef no As Integer)
  no = no * 2
End Sub

Sub funkVal(ByVal no As Integer)
  no = no * 2
End Sub
Avatar billede ocp Nybegynder
31. oktober 2002 - 13:18 #1
Vil du høre noget morsomt?
Det virker hvis man kalder f.eks. FunkRef direkte fra Form_Load-eventen!
Avatar billede ocp Nybegynder
31. oktober 2002 - 13:22 #2
Avatar billede amerikaner Nybegynder
31. oktober 2002 - 13:44 #3
Fjern () omkrig tal

funkVal tal
funkRef tal
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester